100.100 REM ***********REC/POL*********** TEMP.MAG=SQR(TEMP.REAL*TEMP.REAL+TEMP.IMAG*TEMP.IMAG) TEMP.PHA=57.296*ATN(TEMP.IMAG/TEMP.REAL) RETURN