diff --git a/Comanche055/ANGLFIND.agc b/Comanche055/ANGLFIND.agc index e4c6bf6ab..d7ff1e43a 100644 --- a/Comanche055/ANGLFIND.agc +++ b/Comanche055/ANGLFIND.agc @@ -145,30 +145,31 @@ ALTCALC VLOAD VAD # IF AM GREATER THAN 170 DEGREES TMFI +12D STORE MFISYM +12D # MFISYM=(MFI+TMFI)/2 SCALED BY 4 + # CALCULATE COF DLOAD SR1 CAM - PDDL DSU # PD0 CAM $4 + PDDL DSU # PD0 CAM $4 DPHALF CAM - BOVB PDDL # PD2 1 - CAM $2 + BOVB PDDL # PD2 1 - CAM $2 SIGNMPAC MFISYM +16D DSU DDV 0 2 - SQRT PDDL # COFZ = SQRT(MFISYM8-CAM)/(1-CAM) - MFISYM +8D # $ ROOT 2 + SQRT PDDL # COFZ = SQRT(MFISYM8-CAM)/1-CAM) + MFISYM +8D # $ ROOT 2 DSU DDV 0 2 - SQRT PDDL # COFY = SQRT(MFISYM4-CAM)/(1-CAM) $ROOT2 + SQRT PDDL # COFY = SQRT(MFISYM4-CAM)/(1-CAM) $ROOT2 MFISYM DSU DDV 0 2 - SQRT VDEF # COFX = SQRT(MFISYM-CAM)/(1-CAM) $ROOT 2 + SQRT VDEF # COFX = SQRT(MFISYM-CAM)/(1-CAM) $ROOT 2 UNIT STORE COF