home *** CD-ROM | disk | FTP | other *** search
/ Carousel Volume 2 #1 / carousel.iso / mactosh / lang / mod4.hqx / M2-4.pit / MATHLIB1.DEF < prev    next >
Encoding:
Modula Definition  |  1985-04-25  |  475 b   |  21 lines
  1. DEFINITION MODULE MathLib1;  (* Math. library 1 *)
  2. (* additional mathematical functions*)
  3.  
  4. (* M. Schneider  4. Juli 1983 *)
  5.  
  6. EXPORT QUALIFIED
  7.   pot, log, arctan2, tan,
  8.   random, setrandom, PI;
  9.  
  10. PROCEDURE pot ( x: REAL ): REAL;
  11. PROCEDURE log ( x: REAL ): REAL;
  12. PROCEDURE arctan2 ( x, y: REAL ): REAL;
  13. PROCEDURE tan ( x: REAL ): REAL;
  14. PROCEDURE random(): REAL;
  15.             (* range: 0.0 <= random < 1.0 *)
  16. PROCEDURE setrandom( x0: REAL );
  17. PROCEDURE PI(): REAL;
  18.  
  19. END MathLib1.
  20.  
  21.