home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / MODULAV2GERMAN.DMS / in.adf / Def.zoo / MathIEEEDoubBas.def < prev    next >
Encoding:
Modula Definition  |  1988-06-14  |  701 b   |  18 lines
  1.  
  2. DEFINITION MODULE MathIEEEDoubBas{"mathieeedoubbas.library",33};
  3.  
  4. PROCEDURE Fix(x{0}:LONGREAL):LONGINT; CODE -30;
  5. PROCEDURE Flt(x{0}:LONGINT):LONGREAL; CODE -36;
  6. PROCEDURE Cmp(x{0},y{2}:LONGREAL):LONGINT; CODE -42;
  7. PROCEDURE Tst(x{0}:LONGREAL):LONGINT; CODE -48;
  8. PROCEDURE Abs(x{0}:LONGREAL):LONGREAL; CODE -54;
  9. PROCEDURE Neg(x{0}:LONGREAL):LONGREAL; CODE -60;
  10. PROCEDURE Add(x{0},y{2}:LONGREAL):LONGREAL; CODE -66;
  11. PROCEDURE Sub(x{0},y{2}:LONGREAL):LONGREAL; CODE -72;
  12. PROCEDURE Mul(x{0},y{2}:LONGREAL):LONGREAL; CODE -78;
  13. PROCEDURE Div(x{0},y{2}:LONGREAL):LONGREAL; CODE -84;
  14. PROCEDURE Floor(x{0}:LONGREAL):LONGREAL; CODE -90;
  15. PROCEDURE Ceil(x{0}:LONGREAL):LONGREAL; CODE -96;
  16.  
  17. END MathIEEEDoubBas.
  18.