INTERFACEMth ; <* INLINE *> PROCEDURE sin (x : REAL) : REAL; <* INLINE *> PROCEDURE cos (x : REAL) : REAL; <* INLINE *> PROCEDURE asin (x : REAL) : REAL; <* INLINE *> PROCEDURE acos (x : REAL) : REAL; <* INLINE *> PROCEDURE sqrt (x : REAL) : REAL; END Mth.