link ,map ercs12:pobject.OPTIONS6y ercs12:pobject.ANALYSER7x ercs12:pobject.ASSGNCODE5x ercs12:pobject.CODEINIT7x ercs12:pobject.CTLSTRUCT9x ercs12:pobject.DATAREPS7x ercs12:pobject.DIAGS3x ercs12:pobject.DUMP5x ercs12:pobject.EXPEVAL9x ercs12:pobject.GENERATOR4x ercs12:pobject.LEXICAL3x ercs12:pobject.MAIN5x ercs12:pobject.PROGPARAM1x ercs12:pobject.PROLOGUE2x ercs12:pobject.SEMANTICS8x ercs12:pobject.SOURCE5x ercs12:pobject.STDPROCS8x ercs12:pobject.SYNTAX1x ercs12:pobject.VARREF9x ercs12:pobject.WITHSTMTS2x ercs12:pobject.STORAGE14x ercs12:pobject.OBJVALUES6x ercs12:pobject.BLOCKS14x ercs12:pobject.CODEUTIL20y ercs12:pobject.PFCALLS13x ercs12:pobject.PRESET3x ERCC07:PDRIVER03Y ERCC07:XGEN25Y .end ercc07:p0y MODIFY P0Y SATISFY REFS .ALL SATISFY DATA .ALL SUPPRESS .ALL RETAIN emaszpascal SUPPRESS DATA .ALL redirect p_dsqrt,s#isqrt p_dsin,s#isin p_dcos,s#icos p_dlog,s#ilog p_dexp,s#iexp .end makedynamic S#ICOS,S#ISIN,S#IEXP,S#ILOG,S#ISQRT CLOSE NEWGEN P0Y,pascal04y