home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / TRSICAT.LZX / CATS_CD2_TRSI / Reference_Library / lib_examples / mathieeesingtrans.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-08-21  |  1.2 KB  |  34 lines
  1. #include <exec/types.h>
  2. #include <libraries/mathieeesp.h>
  3.  
  4. #include <clib/mathsingtrans_protos.h>
  5.  
  6. struct Library *MathIeeeSingTransBase;
  7.  
  8. VOID main()
  9. {
  10. FLOAT f1, f2, f3;
  11.  
  12. if (MathIeeeSingTransBase = OpenLibrary("mathieeesingtrans.library",37))
  13.     {
  14.     f1 = IEEEDPAsin(f2);        /* Call IEEESPAsin entry */
  15.     f1 = IEEEDPAcos(f2);        /* Call IEEESPAcos entry */
  16.     f1 = IEEEDPAtan(f2);        /* Call IEEESPAtan entry */
  17.     f1 = IEEEDPSin(f2);         /* Call IEEESPSin entry */
  18.     f1 = IEEEDPCos(f2);         /* Call IEEESPCos entry */
  19.     f1 = IEEEDPTan(f2);         /* Call IEEESPTan entry */
  20.     f1 = IEEEDPSincos(&f3, f2); /* Call IEEESPSincos entry */
  21.     f1 = IEEEDPSinh(f2);        /* Call IEEESPSinh entry */
  22.     f1 = IEEEDPCosh(f2);        /* Call IEEESPCosh entry */
  23.     f1 = IEEEDPTanh(f2);        /* Call IEEESPTanh entry */
  24.     f1 = IEEEDPExp(f2);         /* Call IEEESPExp entry */
  25.     f1 = IEEEDPLog(f2);         /* Call IEEESPLog entry */
  26.     f1 = IEEEDPLog10(f2);       /* Call IEEESPLog10 entry */
  27.     f1 = IEEEDPPow(d2, f3);     /* Call IEEESPPow entry */
  28.     f1 = IEEEDPSqrt(f2);        /* Call IEEESPSqrt entry */
  29.  
  30.     CloseLibrary(MathIeeeSingTransBase);
  31.     }
  32. else printf("Can't open mathieeesingtrans.library\n");
  33. }
  34.