.data
A:	.word 10,11,32,34,12,12,12,56,32,435,65,334,65,23,56,12
B:	.word 10,11,32,34,12,12,12,56,32,435,65,334,65,23,56,12
C:	.space	16
.text
.globl main

main:
	la $a0,A
	la $a1,B
	la $a2,C

	jal matrix

	li $v0,10
	syscall

	matrix:
		move $t0,$a0
		move $t1,$a1
		move $t2,$a2

		li   $t3,3
		li   $t4,4

		move $s0, $zero # $s0 = Contador i
        		move $s1, $zero	# $s1 = Contador j
        		move $s2, $zero	# $s2 = Contador k
        	for_1:
        		bgt $s0,$t4,fin_funcion
        		j for_2
        	con_1:
        		addi $s0,$s0,1
       		j for_1
        	for_2:
        		bgt $s1,$t4,con_1
        		j for_3
        	con_2:
        		addi $s1,$s1,1
        		j for_2
        	for_3:
        		bgt $s2,$t3,con_2
        		#inicializar la mulriplicancio bidimensional
        		mult $s0, $t4 #i*4
        		mflo $s3
        		add  $s3, $s3, $s2 #suma filas + contador columnas
        		sll  $s3, $s3, 2    #[i][k]

        		add $s3,$s3,$t0		#cargamos el elemento correspondiente a [i][k]
        		lw  $t5,0($s3)

        		mult $s2, $t4 #k*4
        		mflo $s4
        		add  $s4, $s4, $s1 #suma filas + contador columnas
        		sll  $s4, $s4, 2    #[k][j]

        		add $s4,$s4,$t1		#cargamos el elemento correspondiente a [k][j]
        		lw  $t6,0($s4)

        		mult $s0, $t4 #k*4
        		mflo $s5
        		add  $s5, $s5, $s1 #suma filas + contador columnas
        		sll  $s5, $s5, 2    #[i][j]

        		mul $t7,$t5,$t6		#multiplicamos [i][k]*[k][j]
        		add $s5,$s5,$t7

        		add $s6,$s6,$t2
        		sw  $s5,0($s6)

        		addi $s2,$s2,1
        		j for_3
      fin_funcion:
      	jr $ra