Proof page 401

pull/838/head
lewisjb 2021-10-27 20:53:27 +10:00
parent c3ba960480
commit 5aae51193d
1 changed files with 7 additions and 6 deletions

View File

@ -145,6 +145,7 @@ 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
@ -158,7 +159,7 @@ ALTCALC VLOAD VAD # IF AM GREATER THAN 170 DEGREES
DSU DDV
0
2
SQRT PDDL # COFZ = SQRT(MFISYM8-CAM)/(1-CAM)
SQRT PDDL # COFZ = SQRT(MFISYM8-CAM)/1-CAM)
MFISYM +8D # $ ROOT 2
DSU DDV
0