%
O8950(PRECALCULATION)
#783=0 
#784=#950
#959=360./#950 
 
(LEAD TO  C ANGLE) 
IF[#952NE0]THEN#960=360.*[#953-#954]/#952
IF[#952EQ0]THEN#960=0
 
IF[#969NE0]THEN#975=360.*[#953-#954]/#969
IF[#969EQ0]THEN#975=0
 
IF[#971NE0]THEN#976=360.*[#953-#954]/#971
IF[#971EQ0]THEN#976=0
 
IF[#952NE0]THEN#977=360.*[#953-0.0]/#952 
IF[#952EQ0]THEN#977=0
 
M99
 
%