require "Matriz.rb"
require "Fraccion.rb"
class Matriz_dispersa < Matriz

   attr_accessor :filas, :cols, :matriz

   def initialize(m)
   @filas = m.size
   @cols = m[1].size

   aux_m = Hash.new
   for i in 0...@filas do			
      for j in 0...@cols do			
         if m[i][j] != 0
            aux_m[i.to_s+"_"+j.to_s] = m[i][j]
         end
      end
   end
   @matriz = aux_m
   end

def to_s

   aux_m = Array.new
   for i in 0...@filas do
      aux_m[i] = Array.new			
      for j in 0...@cols do			
         if m[i.to_s+"_"+j.to_s] != nil
            aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s]
         else
            aux_m[i][j] = 0
         end
      end
   end
   
   @matriz.each do |fila|			
   puts fila.join(" ")			
   end

end

def + (other)
   aux_m = Array.new
   for i in 0...@filas do
      aux_m[i] = Array.new			
      for j in 0...@cols do			
         aux_m[i][j] = 0;
      end
   end
   if other.is_a?(Matriz_dispersa)
      for i in 0...@filas do			
         for j in 0...@cols do			
            if @matriz[i.to_s+"_"+j.to_s] != nil
               if other.matriz[i.to_s+"_"+j.to_s] != nil
                  aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s] + other.matriz[i.to_s+"_"+j.to_s]
               else
                  aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s]
               end
            else
               if other.matriz[i.to_s+"_"+j.to_s] != nil
                  aux_m[i][j] = other.matriz[i.to_s+"_"+j.to_s]
               end
            end
         end
      end
   elsif other.is_a?(Matriz_densa)
      for i in 0...@filas do			
         for j in 0...@cols do			
            if @matriz[i.to_s+"_"+j.to_s] != nil
               aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s] + other.matriz[i][j]
            else
               aux_m[i][j] = other.matriz[i][j]
            end
         end
      end
   end 
   Matriz.new(aux_m).comprobar()
end

def - (other)
   aux_m = Array.new
   for i in 0...@filas do
      aux_m[i] = Array.new			
      for j in 0...@cols do			
         aux_m[i][j] = 0;
      end
   end 
   if other.is_a?(Matriz_dispersa)
      for i in 0...@filas do			
         for j in 0...@cols do			
            if @matriz[i.to_s+"_"+j.to_s] != nil
               if other.matriz[i.to_s+"_"+j.to_s] != nil
                  aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s] - other.matriz[i.to_s+"_"+j.to_s]
               else
                  aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s]
               end
            else
               if other.matriz[i.to_s+"_"+j.to_s] != nil
                  aux_m[i][j] = -(other.matriz[i.to_s+"_"+j.to_s])
               end
            end
         end
      end
   elsif other.is_a?(Matriz_densa)
      for i in 0...@filas do			
         for j in 0...@cols do			
            if @matriz[i.to_s+"_"+j.to_s] != nil
               aux_m[i][j] = @matriz[i.to_s+"_"+j.to_s] - other.matriz[i][j]
            else
               aux_m[i][j] = -(other.matriz[i][j])
            end
         end
      end
   end
   Matriz.new(aux_m).comprobar()
end

def * (other) 
   aux_m = Array.new
   for i in 0...@filas do
      aux_m[i] = Array.new			
      for j in 0...@cols do			
         aux_m[i][j] = 0;
      end
   end
   if other.is_a?(Matriz_dispersa) 
      for i in 0...@filas do			
         for j in 0...other.cols do			
            for k in 0...other.filas do
               if @matriz[i.to_s+"_"+k.to_s] != nil
                  if other.matriz[k.to_s+"_"+j.to_s] != nil	
                     aux_m[i][j] += @matriz[i.to_s+"_"+k.to_s] * other.matriz[k.to_s+"_"+j.to_s]
                  end
               end	
            end
         end
      end
   elsif other.is_a?(Matriz_densa)
      for i in 0...@filas do			
         for j in 0...other.cols do			
            for k in 0...other.filas do		
               if @matriz[i.to_s+"_"+k.to_s] != nil
                  aux_m[i][j] += @matriz[i.to_s+"_"+k.to_s] * other.matriz[k][j]
               end	
            end
         end
      end
   end
   Matriz.new(aux_m).comprobar()
end

def traspuesta ()
   aux_m = Array.new
   for i in 0...@filas do
      aux_m[i] = Array.new			
      for j in 0...@cols do
         if @matriz[((@filas-1)-i).to_s+"_"+((@cols-1)-j).to_s] != nil
            aux_m[i][j] = @matriz[((@filas-1)-i).to_s+"_"+((@cols-1)-j).to_s]
         else
            aux_m[i][j] = 0
         end
      end
   end
   Matriz.new(aux_m).comprobar
end

def max()

   aux_max = nil

   for i in 0...@filas do			
      for j in 0...@cols do
         if @matriz[i.to_s+"_"+j.to_s] != nil and aux_max == nil
            aux_max = 0
         elsif @matriz[i.to_s+"_"+j.to_s] != nil and aux_max < @matriz[i.to_s+"_"+j.to_s]
            aux_max = @matriz[i.to_s+"_"+j.to_s]
         end
      end
   end

   aux_max
end

def min()

   aux_min = nil

   for i in 0...@filas do			
      for j in 0...@cols do
         if @matriz[i.to_s+"_"+j.to_s] != nil and aux_min == nil
            aux_min = 0
         elsif @matriz[i.to_s+"_"+j.to_s] != nil and aux_min > @matriz[i.to_s+"_"+j.to_s]
            aux_min = @matriz[i.to_s+"_"+j.to_s]
         end
      end
   end

   aux_min
end

end