glabel func_800A7704
/* B1E8A4 800A7704 27BDFFC8 */  addiu $sp, $sp, -0x38
/* B1E8A8 800A7708 AFB00018 */  sw    $s0, 0x18($sp)
/* B1E8AC 800A770C 00808025 */  move  $s0, $a0
/* B1E8B0 800A7710 AFBF001C */  sw    $ra, 0x1c($sp)
/* B1E8B4 800A7714 AFA70044 */  sw    $a3, 0x44($sp)
/* B1E8B8 800A7718 AFA5003C */  sw    $a1, 0x3c($sp)
/* B1E8BC 800A771C AFA60040 */  sw    $a2, 0x40($sp)
/* B1E8C0 800A7720 0C01DE1C */  jal   Math_Sins
/* B1E8C4 800A7724 87A40046 */   lh    $a0, 0x46($sp)
/* B1E8C8 800A7728 87A40046 */  lh    $a0, 0x46($sp)
/* B1E8CC 800A772C 0C01DE0D */  jal   Math_Coss
/* B1E8D0 800A7730 E7A00030 */   swc1  $f0, 0x30($sp)
/* B1E8D4 800A7734 87A40042 */  lh    $a0, 0x42($sp)
/* B1E8D8 800A7738 C7AE0030 */  lwc1  $f14, 0x30($sp)
/* B1E8DC 800A773C 44808000 */  mtc1  $zero, $f16
/* B1E8E0 800A7740 3C013F80 */  li    $at, 0x3F800000 # 0.000000
/* B1E8E4 800A7744 44811000 */  mtc1  $at, $f2
/* B1E8E8 800A7748 46007107 */  neg.s $f4, $f14
/* B1E8EC 800A774C 46000306 */  mov.s $f12, $f0
/* B1E8F0 800A7750 E6000014 */  swc1  $f0, 0x14($s0)
/* B1E8F4 800A7754 E6040010 */  swc1  $f4, 0x10($s0)
/* B1E8F8 800A7758 E610002C */  swc1  $f16, 0x2c($s0)
/* B1E8FC 800A775C E610001C */  swc1  $f16, 0x1c($s0)
/* B1E900 800A7760 E610000C */  swc1  $f16, 0xc($s0)
/* B1E904 800A7764 E6100038 */  swc1  $f16, 0x38($s0)
/* B1E908 800A7768 E6100034 */  swc1  $f16, 0x34($s0)
/* B1E90C 800A776C E6100030 */  swc1  $f16, 0x30($s0)
/* B1E910 800A7770 10800017 */  beqz  $a0, .L800A77D0
/* B1E914 800A7774 E602003C */   swc1  $f2, 0x3c($s0)
/* B1E918 800A7778 E7AC002C */  swc1  $f12, 0x2c($sp)
/* B1E91C 800A777C 0C01DE1C */  jal   Math_Sins
/* B1E920 800A7780 E7AE0030 */   swc1  $f14, 0x30($sp)
/* B1E924 800A7784 87A40042 */  lh    $a0, 0x42($sp)
/* B1E928 800A7788 0C01DE0D */  jal   Math_Coss
/* B1E92C 800A778C E7A00024 */   swc1  $f0, 0x24($sp)
/* B1E930 800A7790 C7AC002C */  lwc1  $f12, 0x2c($sp)
/* B1E934 800A7794 C7A20024 */  lwc1  $f2, 0x24($sp)
/* B1E938 800A7798 C7AE0030 */  lwc1  $f14, 0x30($sp)
/* B1E93C 800A779C 46006182 */  mul.s $f6, $f12, $f0
/* B1E940 800A77A0 46001107 */  neg.s $f4, $f2
/* B1E944 800A77A4 44808000 */  mtc1  $zero, $f16
/* B1E948 800A77A8 46026202 */  mul.s $f8, $f12, $f2
/* B1E94C 800A77AC E6040008 */  swc1  $f4, 8($s0)
/* B1E950 800A77B0 E6000028 */  swc1  $f0, 0x28($s0)
/* B1E954 800A77B4 46007282 */  mul.s $f10, $f14, $f0
/* B1E958 800A77B8 E6060000 */  swc1  $f6, ($s0)
/* B1E95C 800A77BC 46027482 */  mul.s $f18, $f14, $f2
/* B1E960 800A77C0 E6080020 */  swc1  $f8, 0x20($s0)
/* B1E964 800A77C4 E60A0004 */  swc1  $f10, 4($s0)
/* B1E968 800A77C8 10000007 */  b     .L800A77E8
/* B1E96C 800A77CC E6120024 */   swc1  $f18, 0x24($s0)
.L800A77D0:
/* B1E970 800A77D0 E6000000 */  swc1  $f0, ($s0)
/* B1E974 800A77D4 E60E0004 */  swc1  $f14, 4($s0)
/* B1E978 800A77D8 E6100024 */  swc1  $f16, 0x24($s0)
/* B1E97C 800A77DC E6100020 */  swc1  $f16, 0x20($s0)
/* B1E980 800A77E0 E6100008 */  swc1  $f16, 8($s0)
/* B1E984 800A77E4 E6020028 */  swc1  $f2, 0x28($s0)
.L800A77E8:
/* B1E988 800A77E8 87A4003E */  lh    $a0, 0x3e($sp)
/* B1E98C 800A77EC 50800024 */  beql  $a0, $zero, .L800A7880
/* B1E990 800A77F0 E6100018 */   swc1  $f16, 0x18($s0)
/* B1E994 800A77F4 0C01DE1C */  jal   Math_Sins
/* B1E998 800A77F8 00000000 */   nop   
/* B1E99C 800A77FC 87A4003E */  lh    $a0, 0x3e($sp)
/* B1E9A0 800A7800 0C01DE0D */  jal   Math_Coss
/* B1E9A4 800A7804 E7A00024 */   swc1  $f0, 0x24($sp)
/* B1E9A8 800A7808 C60E0010 */  lwc1  $f14, 0x10($s0)
/* B1E9AC 800A780C C7A20024 */  lwc1  $f2, 0x24($sp)
/* B1E9B0 800A7810 C60C0020 */  lwc1  $f12, 0x20($s0)
/* B1E9B4 800A7814 46007182 */  mul.s $f6, $f14, $f0
/* B1E9B8 800A7818 00000000 */  nop   
/* B1E9BC 800A781C 46026202 */  mul.s $f8, $f12, $f2
/* B1E9C0 800A7820 00000000 */  nop   
/* B1E9C4 800A7824 46006482 */  mul.s $f18, $f12, $f0
/* B1E9C8 800A7828 C60C0024 */  lwc1  $f12, 0x24($s0)
/* B1E9CC 800A782C 46027102 */  mul.s $f4, $f14, $f2
/* B1E9D0 800A7830 C60E0014 */  lwc1  $f14, 0x14($s0)
/* B1E9D4 800A7834 46083280 */  add.s $f10, $f6, $f8
/* B1E9D8 800A7838 46007202 */  mul.s $f8, $f14, $f0
/* B1E9DC 800A783C E60A0010 */  swc1  $f10, 0x10($s0)
/* B1E9E0 800A7840 46026282 */  mul.s $f10, $f12, $f2
/* B1E9E4 800A7844 46049181 */  sub.s $f6, $f18, $f4
/* B1E9E8 800A7848 46006102 */  mul.s $f4, $f12, $f0
/* B1E9EC 800A784C C60C0028 */  lwc1  $f12, 0x28($s0)
/* B1E9F0 800A7850 E6060020 */  swc1  $f6, 0x20($s0)
/* B1E9F4 800A7854 46027182 */  mul.s $f6, $f14, $f2
/* B1E9F8 800A7858 460A4480 */  add.s $f18, $f8, $f10
/* B1E9FC 800A785C 46026282 */  mul.s $f10, $f12, $f2
/* B1EA00 800A7860 E6120014 */  swc1  $f18, 0x14($s0)
/* B1EA04 800A7864 46006482 */  mul.s $f18, $f12, $f0
/* B1EA08 800A7868 46062201 */  sub.s $f8, $f4, $f6
/* B1EA0C 800A786C E60A0018 */  swc1  $f10, 0x18($s0)
/* B1EA10 800A7870 E6080024 */  swc1  $f8, 0x24($s0)
/* B1EA14 800A7874 10000002 */  b     .L800A7880
/* B1EA18 800A7878 E6120028 */   swc1  $f18, 0x28($s0)
/* B1EA1C 800A787C E6100018 */  swc1  $f16, 0x18($s0)
.L800A7880:
/* B1EA20 800A7880 8FBF001C */  lw    $ra, 0x1c($sp)
/* B1EA24 800A7884 8FB00018 */  lw    $s0, 0x18($sp)
/* B1EA28 800A7888 27BD0038 */  addiu $sp, $sp, 0x38
/* B1EA2C 800A788C 03E00008 */  jr    $ra
/* B1EA30 800A7890 00000000 */   nop