home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / M2V11-1.LHA / modula / ansi-c / Math.def < prev    next >
Encoding:
Text File  |  1993-11-24  |  1.2 KB  |  43 lines
  1. DEFINITION FOR C MODULE Math ;
  2.  
  3. (* standard ANSI C funtions from math.h *)
  4.  
  5. IMPORT Errno ;
  6.  
  7. CONST
  8.   EDOM     = Errno.EDOM   ;
  9.   ERANGE   = Errno.ERANGE ;
  10.  
  11.   HUGE_VAL = 1.0E300 ;
  12.  
  13. PROCEDURE ldexp( x : LONGREAL ; y : LONGINT ) ;
  14.  
  15. PROCEDURE frexp( x : LONGREAL ; VAR i : LONGINT  ) : LONGREAL ;
  16. PROCEDURE modf ( x : LONGREAL ; VAR f : LONGREAL ) : LONGREAL ;
  17.  
  18. PROCEDURE exp  ( x : LONGREAL ) : LONGREAL ;
  19. PROCEDURE log  ( x : LONGREAL ) : LONGREAL ;
  20.  
  21. PROCEDURE log10( x : LONGREAL ) : LONGREAL ;
  22.  
  23. PROCEDURE cosh ( x : LONGREAL ) : LONGREAL ;
  24. PROCEDURE sinh ( x : LONGREAL ) : LONGREAL ;
  25. PROCEDURE tanh ( x : LONGREAL ) : LONGREAL ;
  26. PROCEDURE fabs ( x : LONGREAL ) : LONGREAL ;
  27. PROCEDURE sqrt ( x : LONGREAL ) : LONGREAL ;
  28. PROCEDURE acos ( x : LONGREAL ) : LONGREAL ;
  29. PROCEDURE asin ( x : LONGREAL ) : LONGREAL ;
  30. PROCEDURE atan ( x : LONGREAL ) : LONGREAL ;
  31. PROCEDURE cos  ( x : LONGREAL ) : LONGREAL ;
  32. PROCEDURE sin  ( x : LONGREAL ) : LONGREAL ;
  33. PROCEDURE tan  ( x : LONGREAL ) : LONGREAL ;
  34. PROCEDURE ceil ( x : LONGREAL ) : LONGREAL ;
  35. PROCEDURE floor( x : LONGREAL ) : LONGREAL ;
  36.  
  37. PROCEDURE atan2( x , y : LONGREAL ) : LONGREAL ;
  38. PROCEDURE fmod ( x , y : LONGREAL ) : LONGREAL ;
  39. PROCEDURE pow  ( x , y : LONGREAL ) : LONGREAL ;
  40.  
  41. END Math.
  42.  
  43.