pi:
        blt $a0, 10, baseCase
        add $sp, $sp, -8
        sw $s0, 0($sp)
        sw $ra, 4($sp)
	rem $s0, $a0, 10
        div $a0, $a0, 10
        jal pi
#        li $v0, 4
#        la $a0, newline
#	syscall
        move $a0, $s0
        li $v0, 1
        syscall
        lw $s0, 0($sp)
        lw $ra, 4($sp)
        add $sp, $sp, 8
        jr $ra
baseCase:
        li $v0, 1
        syscall
        jr $ra
main:
	li $v0, 5
        syscall
        move $a0, $v0
        jal pi
        li $v0, 4
        la $a0, newline
        .data
newline:
        .asciiz "\n"
        .text
        syscall
        li $v0, 10
        syscall