home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 463.lha / ModulaDefs / MathLib0.DEF < prev    next >
Text File  |  1991-01-05  |  518b  |  21 lines
  1. (****************************************
  2.  * Name : MathLib0.DEF                  *
  3.  * purpose : math functions for use     *
  4.  *           with modula-2  SIN COS TAN *
  5.  * Author : JSG                         *
  6.  ****************************************)
  7.  
  8. DEFINITION MODULE MathLib0;
  9.  
  10. PROCEDURE SQRT(x:REAL) : REAL;
  11.  
  12. PROCEDURE SIN(x:REAL;VAR neg: BOOLEAN)  : REAL;  (* x : radiens *)
  13. PROCEDURE COS(x:REAL;VAR neg: BOOLEAN)  : REAL;  (* x : radiens *)
  14. PROCEDURE TAN(x:REAL)  : REAL;  (* x : radiens *)
  15.  
  16. END MathLib0.
  17.  
  18.  
  19.  
  20.  
  21.