.text
main:
     addi $sp, $sp, -4
	 sw $ra, 0($sp)
	 lw $a0, n                 #carico in $a0 il valore di n
	 jal FUNC
	 lw $ra, 0($sp)
	 addi $sp, $sp, 4
	 jr $ra



FUNC:
     addi $sp, $sp, -16
	 sw $s2, 12($sp)
	 sw $s1, 8($sp)
	 sw $s0, 4($sp)
	 sw $ra, 0($sp)
	 add $s0, $a0, $zero    #metto in $s0 il valore di n
	 addi $t0, $zero, 3     #metto in $t0 il valore 3
	 slt $t1, $s0, $t0      #$t1 == 0 se n >= 3
	 beq $t1, $zero, RICO   #se $t1 = 0 --> RICO
     addi $v0, $zero, 1     #metto in $v0 il valore 1(risultato)
     j exit

RICO:
     addi $s2, $a0, -1      #metto in $s2 il valore di n-1
     beq $s2, $zero, exit
     addi $a0, $a0, -1      #decremento n
	 jal FUNC
	 add $t3, $v0, $zero    #metto in $t3 il valore di T(i)
	 mul $s1, $s2, $t3      #metto in $s1 il valore T(i)*i
	 add $v1, $v1, $s2
	 jal RICO


exit:
     lw $ra, 0($sp)
	 lw $s0, 4($sp)
	 lw $s1, 8($sp)
	 lw $s2, 12($sp)
	 addi $sp, $sp, 16
	 jr $ra

.data
n: .word 5