lbl_80097878: /* 80097878 94 21 FF E0 */ stwu r1, -0x20(r1) /* 8009787C 38 00 00 00 */ li r0, 0 /* 80097880 90 03 00 00 */ stw r0, 0(r3) /* 80097884 90 83 00 04 */ stw r4, 4(r3) /* 80097888 38 C0 00 01 */ li r6, 1 /* 8009788C 90 C3 00 08 */ stw r6, 8(r3) /* 80097890 90 A3 00 0C */ stw r5, 0xc(r3) /* 80097894 80 83 00 0C */ lwz r4, 0xc(r3) /* 80097898 2C 04 00 00 */ cmpwi r4, 0 /* 8009789C 41 82 00 08 */ beq lbl_800978A4 /* 800978A0 38 C4 FF FF */ addi r6, r4, -1 lbl_800978A4: /* 800978A4 80 83 00 04 */ lwz r4, 4(r3) /* 800978A8 2C 04 00 02 */ cmpwi r4, 2 /* 800978AC 40 80 00 0C */ bge lbl_800978B8 /* 800978B0 38 00 00 01 */ li r0, 1 /* 800978B4 48 00 00 08 */ b lbl_800978BC lbl_800978B8: /* 800978B8 38 04 FF FE */ addi r0, r4, -2 lbl_800978BC: /* 800978BC C8 42 91 C8 */ lfd f2, lit_3632(r2) /* 800978C0 6C 00 80 00 */ xoris r0, r0, 0x8000 /* 800978C4 90 01 00 0C */ stw r0, 0xc(r1) /* 800978C8 3C 80 43 30 */ lis r4, 0x4330 /* 800978CC 90 81 00 08 */ stw r4, 8(r1) /* 800978D0 C8 01 00 08 */ lfd f0, 8(r1) /* 800978D4 EC 20 10 28 */ fsubs f1, f0, f2 /* 800978D8 6C C0 80 00 */ xoris r0, r6, 0x8000 /* 800978DC 90 01 00 14 */ stw r0, 0x14(r1) /* 800978E0 90 81 00 10 */ stw r4, 0x10(r1) /* 800978E4 C8 01 00 10 */ lfd f0, 0x10(r1) /* 800978E8 EC 00 10 28 */ fsubs f0, f0, f2 /* 800978EC EC 01 00 24 */ fdivs f0, f1, f0 /* 800978F0 D0 03 00 10 */ stfs f0, 0x10(r3) /* 800978F4 38 00 00 00 */ li r0, 0 /* 800978F8 90 03 00 2C */ stw r0, 0x2c(r3) /* 800978FC 38 21 00 20 */ addi r1, r1, 0x20 /* 80097900 4E 80 00 20 */ blr