diff --git a/Luminary099/CONIC_SUBROUTINES.agc b/Luminary099/CONIC_SUBROUTINES.agc index 6e35972..436b0e1 100644 --- a/Luminary099/CONIC_SUBROUTINES.agc +++ b/Luminary099/CONIC_SUBROUTINES.agc @@ -1251,11 +1251,17 @@ POLYCOEF BMN PUSH # 0D=1/W (+2) OR 16/W (+6) PL AT 2 # Page 1190 DEC 5 2DEC .5 + 2DEC -.166666770 + 2DEC .100000392 + 2DEC -.071401086 + 2DEC .055503292 + 2DEC -.047264098 + 2DEC .040694204 TC INTPRET @@ -1269,6 +1275,7 @@ XCOMMON DSQ NORM R1A 0 -12D,1 STODL XI # XI (+6) + R1 SR1 SQRT ROUND DMP