.data
   arr1: .word 4 7 12 5
   arr2: .word 15 3 6 14
   result: .word 0 0 0 0 0

.text

main:
  la $t0, arr1
  la $t1, arr2
  la $t2, result

  addi $s0, $0, 0

for_loop:
  slti $s1, $s0,4
  beq $s1, $0, exit_loop
#------------------Calling the distance function-------------------------------
  add $sp, $sp, -12
  sw $t0, 8($sp)
  sw $t1, 4($sp)
  sw $t2, 0($sp)

  lw $a0, 0($t0)
  lw $a1, 0($t1)
  jal distance

  lw $t2, 0($sp)
  lw $t1, 4($sp)
  lw $t0, 8($sp)
  add $sp, $sp,12
#-------------------------------------------------
  sw $v0, 0($t2)

  addi $t0, $t0,4
  addi $t1, $t1,4
  addi $t2, $t2,4
  addi $s0, $s0,1
  j for_loop

exit_loop:
  li $v0,10
  syscall


swap:
  add $t0, $a0, $0
  add $a0, $a1, $0
  add $a1, $t0, $0
  jr $ra

distance:
  add $t0, $a0, $0
  add $t1, $a1, $0

  slt $t2, $t0, $t1
  beq $t2, $0, if_done


  add $sp, $sp, -4 #Pushing $sp into stack
  sw $ra, 0($sp)

  add $a0, $t0, $0  #call the swap function
  add $a1, $t1, $0
  jal swap

  lw $ra, 0($sp)
  add $sp, $sp,4

  if_done:
    sub $v0, $a0, $a1

  jr $ra