# Sessio 3

    .data
# Declara aqui les variables mat1, mat4 i col
mat1: .space 120
mat4: .word 2,3,1,2,4,3
col:  .word 2

    .text
    .globl main
main:
# Escriu aqui el programa principal
    addiu $sp, $sp, -4
    sw $ra, 0($sp)

    la $a0, mat4
    lw $a1, 8($a0)
    la $a2, col
    lw $a2, 0($a2)
    jal subr
    la $t0, mat1
    sw $v0, 108($t0)  #(4*6+3)*4 + mat1 <-- resultat

    la $a0, mat4
    addiu $a1, $zero, 1
    addiu $a2, $zero, 1
    jal subr
    la $t0, mat1
    sw $v0, 0($t0)

    lw $ra, 0($sp)
    addiu $sp, $sp, 4
    jr $ra

subr:
# Escriu aqui el codi de la subrutina
    addu $t0, $a1, $a1
    addu $t0, $t0, $a1
    addu $t0, $t0, $a2
    sll $t0, $t0, 2


    addu $t0, $t0, $a0
    lw $t0, 0($t0)
    la $t1, mat1
    li $t2, 6
    mult $a2, $t2
    mflo $t2
    addiu $t2, $t2, 5
    sll $t2, $t2, 2
    addu $t2, $t2, $t1
    sw $t0, 0($t2)
    addu $v0, $zero, $a1

    jr $ra