matriz 0.1.1

data/.travis.yml

@@ -0,0 +1,8 @@
+language: ruby
+rvm:
+  - 1.9.3
+  - jruby-18mode # JRuby in 1.8 mode
+  - jruby-19mode # JRuby in 1.9 mode
+  - rbx-18mode
+  - rbx-19mode
+  - 1.8.7

data/Gemfile

@@ -0,0 +1,3 @@
+source "http://rubygems.org"
+
+gemspec

data/Guardfile

@@ -0,0 +1,8 @@
+guard 'bundler' do
+  watch('Gemfile')
+end
+
+guard 'rspec', :version => 2 do
+  watch(%r{^spec/.+_spec\.rb$})
+  watch(%r{^lib/(.+)\.rb$}) { |m| "spec/#{m[1]}_spec.rb" }
+end

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2013 Mª Belen Armas Torres - Aaron Socas Gaspar
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,25 @@
+pract11
+=======
+
+Partiendo de la practica anterior, vamos a incluir las siguientes modificaciones para matrices densas y dispersas.
+
+
+ - La documentacion de la gema (utlizamos RDOC).
+
+ - Utilizaremos métodos con la filosofía de la programación funcional, aunque Ruby está diseñado
+  para utilizar programación orientada a objetos. Este tipo de programación lo hemos implementado
+  en las siguientes funciones (tanto en matrices densas como dispersas):
+    - calculo del maximo
+    - calculo del minimo
+
+  - Para hacer la suma (y resta) y el producto entre matrices (y escalar) hemos usado el método 'time',
+    aunque también lo hemos hecho con el método 'upto' (está comentado en la misma línea). Los usamos
+    para recorrer los arrays y operar.
+
+
+
+Grupo (M-15)
+============
+
+ - María Belén Armas Torres
+ - Aarón Socas Gaspar

data/Rakefile

@@ -0,0 +1,36 @@
+#Fichero de Rakefile para Guard
+
+#!/bin/env rake
+require "bundler/gem_tasks"
+
+$:.unshift File.dirname(__FILE__) + 'lib'
+$:.unshift './lib', './spec'
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new
+task :default => :spec
+
+desc "Ejecutar las espectativas de la clase Matriz e hijas"
+task :spec_local do
+  sh "rspec -I. spec/matriz_spec.rb"
+end
+
+desc "Ejecutar tests"
+task :test do
+  sh "ruby test/tc_matriz.rb"
+end
+
+desc "Ejecutar con documentacion"
+task :doc do
+  sh "rspec -I. spec/matriz_spec.rb --format documentation"
+end
+
+desc "Ejecutar programa"
+task :bin do
+  sh "ruby bin/main.rb"
+end
+
+desc "Ejecutar las espectativas de la clase Matriz version html"
+task :thtml do
+  sh "rspec -I. spec/matriz_spec.rb --format html"
+end

data/Rakefile~

@@ -0,0 +1,33 @@
+#Fichero de Rakefile para Guard
+
+$:.unshift File.dirname(__FILE__) + 'lib'
+$:.unshift './lib', './spec'
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new
+task :default => :spec
+
+desc "Ejecutar las espectativas de la clase Matriz e hijas"
+task :spec_local do
+  sh "rspec -I. spec/matriz_spec.rb"
+end
+
+desc "Ejecutar tests"
+task :test do
+  sh "ruby test/tc_matriz.rb"
+end
+
+desc "Ejecutar con documentacion"
+task :doc do
+  sh "rspec -I. spec/matriz_spec.rb --format documentation"
+end
+
+desc "Ejecutar programa"
+task :bin do
+  sh "ruby bin/main.rb"
+end
+
+desc "Ejecutar las espectativas de la clase Matriz version html"
+task :thtml do
+  sh "rspec -I. spec/matriz_spec.rb --format html"
+end

data/bin/main.rb

@@ -0,0 +1,256 @@
+#Funcion menu
+require './lib/matriz.rb'
+require './lib/matriz_densa.rb'
+require './lib/matriz_dispersa.rb'
+
+def menu1
+  system ("clear")
+  z=0
+  while (z<1 or z>5)
+    op=["\t\tMENU","\t1. Crear matrices","\t2. Generar matrices con valores aleatorios","\t3. Operaciones con matrices","\t4. Mostrar matrices","\t5. Salir"]
+    op.each{|op| puts op}
+    z=gets.chomp
+    z=z.to_i
+    if (z<1 or z>5)
+      puts ("Escoja una opcion entre [1..5]")
+    end
+  end
+  z
+end
+
+def menu2
+  system ("clear")
+  z=0
+  while (z<1 or z>5)
+    op=["\t\tOPERACIONES CON MATRICES","\t1. Suma y resta de matrices","\t2. Producto escalar y entre matrices","\t3. Traspuesta de una matriz","\t4. Calcular maximo y minimo", "\t5. Volver"]
+    op.each{|op| puts op}
+    z=gets.chomp
+    z=z.to_i
+    if (z<1 or z>5)
+      puts ("Escoja una opcion entre [1..4]")
+    end
+  end
+  z
+end
+
+def menu3
+  z=0
+  while (z<1 or z>2)
+    op=["\tQuiere trabajar con enteros o fracciones?","\t1. Numeros enteros","\t2. Numeros racionales"]
+    op.each{|op| puts op}
+    z=gets.chomp
+    z=z.to_i
+    if (z<1 or z>2)
+      puts ("Escoja una opcion entre [1..2]")
+    end
+  end
+  z
+end
+
+def menu4
+  z=0
+  while (z<1 or z>2)
+    op=["\tIntroducir matriz densa o dispersa?","\t1. Matriz densa","\t2. Matriz dispersa"]
+    op.each{|op| puts op}
+    z=gets.chomp
+    z=z.to_i
+    if (z<1 or z>2)
+      puts ("Escoja una opcion entre [1..2]")
+    end
+  end
+  z
+end
+
+#Esta funcion la utilizamos para pausar del programa
+def pausa
+#     while line=gets
+     while gets
+      break
+    end
+end
+
+#Ejecucion del programa principal
+def principal
+   op=0
+  while (op!=5)
+    op= menu1
+    case op
+      when 1
+	puts "CREAR MATRICES"
+	puts "Introduce la dimension de las matriz 1: "
+	print "Filas? "
+	STDOUT.flush
+	f=gets.chomp
+	print "Columnas? "
+	c=gets.chomp
+	op4=menu4
+	case op4
+	  when 1
+	    a= Matriz_densa.new(f.to_i,c.to_i)
+	  when 2
+	    a= Matriz_dispersa.new(f.to_i,c.to_i)
+	end
+	op3=menu3
+	case op3
+	  when 1
+	    a.introducir_datos(1)
+	  when 2
+	    a.introducir_datos(2)
+	end
+
+	puts "Introduce la dimension de las matriz 2: "
+	print "Filas? "
+	STDOUT.flush
+	f=gets.chomp
+	print "Columnas? "
+	c=gets.chomp
+	op4=menu4
+	case op4
+	  when 1
+	    b= Matriz_densa.new(f.to_i,c.to_i)
+	  when 2
+	    b= Matriz_dispersa.new(f.to_i,c.to_i)
+	end
+	op3=menu3
+	case op3
+	  when 1
+	    b.introducir_datos(1)
+	  when 2
+	    b.introducir_datos(2)
+	end
+	puts a.to_s
+	puts b.to_s
+	
+      when 2
+	puts "GENERAR MATRICES CON VALORES ALEATORIOS"
+	puts "Introduce la dimension de la matriz 1: "
+	print "Filas? "
+	STDOUT.flush
+	f=gets.chomp
+	print "Columnas? "
+	c=gets.chomp	
+	op4=menu4
+	case op4
+	  when 1
+	    a= Matriz_densa.new(f.to_i,c.to_i)
+	  when 2
+	    a= Matriz_dispersa.new(f.to_i,c.to_i)
+	end
+	op3=menu3
+	case op3
+	  when 1
+	    a.generar(1)
+	  when 2
+	    a.generar(2)
+	end
+	
+	puts "Introduce la dimension de la matriz 2: "
+	print "Filas? "
+	STDOUT.flush
+	f=gets.chomp
+	print "Columnas? "
+	c=gets.chomp
+	op4=menu4
+	case op4
+	  when 1 #matriz densa
+	    b= Matriz_densa.new(f.to_i,c.to_i)
+	  when 2 #matriz dispersa
+	    b= Matriz_dispersa.new(f.to_i,c.to_i)
+	end
+	op3=menu3
+	case op3
+	  when 1
+	    b.generar(1)
+	  when 2
+	    b.generar(2)
+	end
+	puts a.to_s
+  	puts b.to_s
+
+      when 3
+	  op2=0
+	  while (op2!=5)
+	    op2= menu2
+	    case op2
+	      when 1
+		puts "Suma"
+		puts "M1 + M2 = M3"
+		puts a.to_s
+		puts "+" 
+		puts b.to_s
+		puts "="
+		c = a+b
+		puts c.to_s
+	
+		puts "Resta"
+		puts "M1 - M2 = M3"
+		puts a.to_s
+		puts "-" 
+		puts b.to_s
+		puts "="
+		c = a-b
+		puts c.to_s
+		pausa
+		
+	      when 2
+		puts "Mutiplicacion por un escalar"
+		print "Numero a multiplicar?: "
+		STDOUT.flush
+		num=gets.chomp
+		num = num.to_i
+		puts "#{num.to_i} * M1 = M3"
+		puts a.to_s
+		c= a*num
+		puts c.to_s
+		puts "Producto de matrices"
+		puts "M1 * M2 = M3"
+		puts a.to_s
+		puts "*"
+		puts b.to_s
+		puts "="
+		d=a*b
+		puts d.to_s
+		pausa
+
+	      when 3
+		puts "Traspuesta de matrices"
+		puts "M1"
+		puts a.to_s
+		puts "traspuesta M1"
+		puts "#{a.t.to_s}"
+		puts "M2"
+		puts b.to_s
+		puts "traspuesta M2"
+		puts "#{b.t.to_s}"
+		pausa
+
+	      when 4
+		puts "Elementos maximos y minimos"
+		puts "Maximo y minimo de M1"
+		puts a.to_s
+		puts "Max= #{a.max}"
+		puts "Min= #{a.min}"
+		puts "Maximo y minimo de M2"
+		puts b.to_s
+		puts "Max= #{b.max}"
+		puts "Min= #{b.min}"
+		pausa
+	    end
+	  end
+      when 4
+	puts "MOSTRAR"
+	puts "M1 = "
+	puts a.to_s
+	puts "M2 = "
+	puts b.to_s
+	if a==b
+	  puts "Las matrices son iguales"
+	else
+	  puts "Las matrices son diferentes"
+	end
+    end
+  pausa
+  end
+end
+
+principal

data/lib/gcd.rb

@@ -0,0 +1,13 @@
+def gcd(u,v)	#Calcula el maximo comun divisor entre dos numeros
+  u, v = u.abs, v.abs
+  while (v != 0)
+    u, v = v, u % v
+  end
+  u
+end
+
+def mcm (a, b)	#Calcula el minimo comun multiplo entre dos numeros
+ (a*b)/gcd(a,b)
+end
+
+

data/lib/gcd.rb~

@@ -0,0 +1,14 @@
+def gcd(u,v)	#gcd = MCD = max. común divisor
+  u, v = u.abs, v.abs
+  while (v != 0)
+    u, v = v, u % v
+  end
+  u
+end
+
+def mcm (a, b)	#mcm = MCM = mín. común múltiplo
+ (a*b)/gcd(a,b)
+end
+
+# puts "MCD = #{gcd(ARGV[0].to_i,ARGV[1].to_i)}"
+# puts "MCM = #{mcm(ARGV[0].to_i,ARGV[1].to_i)}"

data/lib/matriz.rb

@@ -0,0 +1,37 @@
+
+class Matriz
+  attr_reader :fil, :col
+  
+  def initialize (m,n) #Crea la matriz con las dimensiones especificadas por parametro
+    raise TypeError, "Error. Tipo de dimensiones incorrectas" if ((m < 0) or (n < 0))
+    @fil, @col = m, n
+  end
+  
+  def to_s
+  end
+  
+  def introducir_datos (o)
+  end
+  
+  def generar
+  end
+  
+  def +(other)
+  end
+  
+  def -(other)
+  end
+
+  def *(other)
+  end
+  
+  def t
+  end
+  
+  def det
+  end
+  
+  def ==(other)
+  end
+
+end