ð#Syntax10.Scn.Fnt  MODULE MathL; (*NW 25.7.86*) CONST pi* = 3.141592653589793D0; e* = 2.718281828459045D0; PROCEDURE sqrt*(x: LONGREAL): LONGREAL; END sqrt; PROCEDURE exp*(x: LONGREAL): LONGREAL; END exp; PROCEDURE ln*(x: LONGREAL): LONGREAL; END ln; PROCEDURE sin*(x: LONGREAL): LONGREAL; END sin; PROCEDURE cos*(x: LONGREAL): LONGREAL; END cos; PROCEDURE arctan*(x: LONGREAL): LONGREAL; END arctan; END MathL.