.set noat      # allow manual use of $at
.set noreorder # don't insert nops after branches

glabel guPerspectiveF
/* 3EF90 80063B90 27BDFFB0 */  addiu     $sp, $sp, -0x50
/* 3EF94 80063B94 F7BA0038 */  sdc1      $f26, 0x38($sp)
/* 3EF98 80063B98 C7BA0060 */  lwc1      $f26, 0x60($sp)
/* 3EF9C 80063B9C F7BC0040 */  sdc1      $f28, 0x40($sp)
/* 3EFA0 80063BA0 C7BC0064 */  lwc1      $f28, 0x64($sp)
/* 3EFA4 80063BA4 F7BE0048 */  sdc1      $f30, 0x48($sp)
/* 3EFA8 80063BA8 C7BE0068 */  lwc1      $f30, 0x68($sp)
/* 3EFAC 80063BAC F7B80030 */  sdc1      $f24, 0x30($sp)
/* 3EFB0 80063BB0 4486C000 */  mtc1      $a2, $f24
/* 3EFB4 80063BB4 AFB00010 */  sw        $s0, 0x10($sp)
/* 3EFB8 80063BB8 00808021 */  addu      $s0, $a0, $zero
/* 3EFBC 80063BBC AFB10014 */  sw        $s1, 0x14($sp)
/* 3EFC0 80063BC0 F7B60028 */  sdc1      $f22, 0x28($sp)
/* 3EFC4 80063BC4 4487B000 */  mtc1      $a3, $f22
/* 3EFC8 80063BC8 AFBF0018 */  sw        $ra, 0x18($sp)
/* 3EFCC 80063BCC F7B40020 */  sdc1      $f20, 0x20($sp)
/* 3EFD0 80063BD0 0C019D28 */  jal       guMtxIdentF
/* 3EFD4 80063BD4 00A08821 */   addu     $s1, $a1, $zero
/* 3EFD8 80063BD8 3C01800A */  lui       $at, %hi(D_80099BB0)
/* 3EFDC 80063BDC D4229BB0 */  ldc1      $f2, %lo(D_80099BB0)($at)
/* 3EFE0 80063BE0 4600C021 */  cvt.d.s   $f0, $f24
/* 3EFE4 80063BE4 46220002 */  mul.d     $f0, $f0, $f2
/* 3EFE8 80063BE8 3C014000 */  lui       $at, 0x4000
/* 3EFEC 80063BEC 4481A000 */  mtc1      $at, $f20
/* 3EFF0 80063BF0 46200620 */  cvt.s.d   $f24, $f0
/* 3EFF4 80063BF4 4614C503 */  div.s     $f20, $f24, $f20
/* 3EFF8 80063BF8 0C00A874 */  jal       cos_rad
/* 3EFFC 80063BFC 4600A306 */   mov.s    $f12, $f20
/* 3F000 80063C00 4600A306 */  mov.s     $f12, $f20
/* 3F004 80063C04 0C00A85B */  jal       sin_rad
/* 3F008 80063C08 46000506 */   mov.s    $f20, $f0
/* 3F00C 80063C0C 4600A503 */  div.s     $f20, $f20, $f0
/* 3F010 80063C10 461CD100 */  add.s     $f4, $f26, $f28
/* 3F014 80063C14 461CD081 */  sub.s     $f2, $f26, $f28
/* 3F018 80063C18 46022103 */  div.s     $f4, $f4, $f2
/* 3F01C 80063C1C 461AD000 */  add.s     $f0, $f26, $f26
/* 3F020 80063C20 461C0002 */  mul.s     $f0, $f0, $f28
/* 3F024 80063C24 46020003 */  div.s     $f0, $f0, $f2
/* 3F028 80063C28 4616A583 */  div.s     $f22, $f20, $f22
/* 3F02C 80063C2C 3C01BF80 */  lui       $at, 0xbf80
/* 3F030 80063C30 44811000 */  mtc1      $at, $f2
/* 3F034 80063C34 00002821 */  addu      $a1, $zero, $zero
/* 3F038 80063C38 AE00003C */  sw        $zero, 0x3c($s0)
/* 3F03C 80063C3C E602002C */  swc1      $f2, 0x2c($s0)
/* 3F040 80063C40 E6140014 */  swc1      $f20, 0x14($s0)
/* 3F044 80063C44 E6040028 */  swc1      $f4, 0x28($s0)
/* 3F048 80063C48 E6000038 */  swc1      $f0, 0x38($s0)
/* 3F04C 80063C4C E6160000 */  swc1      $f22, ($s0)
.L80063C50:
/* 3F050 80063C50 00002021 */  addu      $a0, $zero, $zero
/* 3F054 80063C54 02001821 */  addu      $v1, $s0, $zero
.L80063C58:
/* 3F058 80063C58 C4600000 */  lwc1      $f0, ($v1)
/* 3F05C 80063C5C 461E0002 */  mul.s     $f0, $f0, $f30
/* 3F060 80063C60 24840001 */  addiu     $a0, $a0, 1
/* 3F064 80063C64 28820004 */  slti      $v0, $a0, 4
/* 3F068 80063C68 E4600000 */  swc1      $f0, ($v1)
/* 3F06C 80063C6C 1440FFFA */  bnez      $v0, .L80063C58
/* 3F070 80063C70 24630004 */   addiu    $v1, $v1, 4
/* 3F074 80063C74 24A50001 */  addiu     $a1, $a1, 1
/* 3F078 80063C78 28A20004 */  slti      $v0, $a1, 4
/* 3F07C 80063C7C 1440FFF4 */  bnez      $v0, .L80063C50
/* 3F080 80063C80 26100010 */   addiu    $s0, $s0, 0x10
/* 3F084 80063C84 12200023 */  beqz      $s1, .L80063D14
/* 3F088 80063C88 00000000 */   nop      
/* 3F08C 80063C8C 461CD080 */  add.s     $f2, $f26, $f28
/* 3F090 80063C90 3C01800A */  lui       $at, %hi(D_80099BB8)
/* 3F094 80063C94 D4209BB8 */  ldc1      $f0, %lo(D_80099BB8)($at)
/* 3F098 80063C98 460010A1 */  cvt.d.s   $f2, $f2
/* 3F09C 80063C9C 4620103E */  c.le.d    $f2, $f0
/* 3F0A0 80063CA0 00000000 */  nop       
/* 3F0A4 80063CA4 00000000 */  nop       
/* 3F0A8 80063CA8 45010019 */  bc1t      .L80063D10
/* 3F0AC 80063CAC 3402FFFF */   ori      $v0, $zero, 0xffff
/* 3F0B0 80063CB0 3C01800A */  lui       $at, %hi(D_80099BC0)
/* 3F0B4 80063CB4 D4209BC0 */  ldc1      $f0, %lo(D_80099BC0)($at)
/* 3F0B8 80063CB8 46220083 */  div.d     $f2, $f0, $f2
/* 3F0BC 80063CBC 3C01800A */  lui       $at, %hi(D_80099BC8)
/* 3F0C0 80063CC0 D4209BC8 */  ldc1      $f0, %lo(D_80099BC8)($at)
/* 3F0C4 80063CC4 4622003E */  c.le.d    $f0, $f2
/* 3F0C8 80063CC8 00000000 */  nop       
/* 3F0CC 80063CCC 00000000 */  nop       
/* 3F0D0 80063CD0 45030006 */  bc1tl     .L80063CEC
/* 3F0D4 80063CD4 46201001 */   sub.d    $f0, $f2, $f0
/* 3F0D8 80063CD8 4620100D */  trunc.w.d $f0, $f2
/* 3F0DC 80063CDC 44030000 */  mfc1      $v1, $f0
/* 3F0E0 80063CE0 00000000 */  nop       
/* 3F0E4 80063CE4 08018F40 */  j         .L80063D00
/* 3F0E8 80063CE8 00601021 */   addu     $v0, $v1, $zero
.L80063CEC:
/* 3F0EC 80063CEC 4620008D */  trunc.w.d $f2, $f0
/* 3F0F0 80063CF0 44031000 */  mfc1      $v1, $f2
/* 3F0F4 80063CF4 3C028000 */  lui       $v0, 0x8000
/* 3F0F8 80063CF8 00621825 */  or        $v1, $v1, $v0
/* 3F0FC 80063CFC 00601021 */  addu      $v0, $v1, $zero
.L80063D00:
/* 3F100 80063D00 A6220000 */  sh        $v0, ($s1)
/* 3F104 80063D04 3042FFFF */  andi      $v0, $v0, 0xffff
/* 3F108 80063D08 14400002 */  bnez      $v0, .L80063D14
/* 3F10C 80063D0C 24020001 */   addiu    $v0, $zero, 1
.L80063D10:
/* 3F110 80063D10 A6220000 */  sh        $v0, ($s1)
.L80063D14:
/* 3F114 80063D14 8FBF0018 */  lw        $ra, 0x18($sp)
/* 3F118 80063D18 8FB10014 */  lw        $s1, 0x14($sp)
/* 3F11C 80063D1C 8FB00010 */  lw        $s0, 0x10($sp)
/* 3F120 80063D20 D7BE0048 */  ldc1      $f30, 0x48($sp)
/* 3F124 80063D24 D7BC0040 */  ldc1      $f28, 0x40($sp)
/* 3F128 80063D28 D7BA0038 */  ldc1      $f26, 0x38($sp)
/* 3F12C 80063D2C D7B80030 */  ldc1      $f24, 0x30($sp)
/* 3F130 80063D30 D7B60028 */  ldc1      $f22, 0x28($sp)
/* 3F134 80063D34 D7B40020 */  ldc1      $f20, 0x20($sp)
/* 3F138 80063D38 03E00008 */  jr        $ra
/* 3F13C 80063D3C 27BD0050 */   addiu    $sp, $sp, 0x50