C.2.1 Mathematical Intrinsic Functions

Table C-2 lists the Compaq Fortran 77 mathematical intrinsic functions.

Table C-2 Mathematical Intrinsic Functions

Function      No. of Arguments   Generic Name   Specific Name   Type of Argument   Type of Result 
Arc Cosine [1,2]     ACOS  ACOS  REAL*4  REAL*4 
     Arc Cos a      DACOS  REAL*8  REAL*8 
      QACOS[3]  REAL*16  REAL*16 
 
Arc Cosine [1,2](degree)   ACOSD  ACOSD  REAL*4  REAL*4 
     Arc Cos a      DACOSD  REAL*8  REAL*8 
      QACOSD[3]  REAL*16  REAL*16 
 
Arc Sine [1,2]   ASIN  ASIN  REAL*4  REAL*4 
     Arc Sin a      DASIN  REAL*8  REAL*8 
      QASIN[3]  REAL*16  REAL*16 
 
Arc Sine [1,2](degree)   ASIND  ASIND  REAL*4  REAL*4 
     Arc Sin a      DASIND  REAL*8  REAL*8 
      QASIND[3]  REAL*16  REAL*16 
 
Arc Tangent [2]   ATAN  ATAN  REAL*4  REAL*4 
     Arc Tan a      DATAN  REAL*8  REAL*8 
      QATAN[3]  REAL*16  REAL*16 
Arc Tangent [1,2] (degree)   ATAND  ATAND  REAL*4  REAL*4 
     Arc Tan a      DATAND  REAL*8  REAL*8 
      QATAND[3]  REAL*16  REAL*16 
 
Arc Tangent [2,4]   ATAN2  ATAN2  REAL*4  REAL*4 
     Arc Tan a1/a2      DATAN2  REAL*8  REAL*8 
      QATAN2[3]  REAL*16  REAL*16 
 
Arc Tangent [2,5] (degree)   ATAN2D  ATAN2D  REAL*4  REAL*4 
     Arc Tan a1/a2      DATAN2D  REAL*8  REAL*8 
      QATAN2D[3]  REAL*16  REAL*16 
 
Cosine [6]  COS  COS  REAL*4  REAL*4 
     Cos a      DCOS  REAL*8  REAL*8 
      QCOS[3]  REAL*16  REAL*16 
      CCOS  COMPLEX*8  COMPLEX*8 
      CDCOS  COMPLEX*16  COMPLEX*16 
      ZCOS  COMPLEX*16  COMPLEX*16 
 
Cosine [6] (degree) COSD   COSD  REAL*4  REAL*4 
     Cos a      DCOSD  REAL*8  REAL*8 
      QCOSD[3]  REAL*16  REAL*16 
 
Hyperbolic Cosine   COSH  COSH  REAL*4  REAL*4 
     Cosh a      DCOSH  REAL*8  REAL*8 
      QCOSH[3]  REAL*16  REAL*16 
 
Exponential  EXP  EXP  REAL*4  REAL*4 
     ea      DEXP  REAL*8  REAL*8 
      QEXP[3]  REAL*16  REAL*16 
      CEXP  COMPLEX*8  COMPLEX*8 
      CDEXP  COMPLEX*16  COMPLEX*16 
      ZEXP  COMPLEX*16  COMPLEX*16 
 
Natural Logarithm [7]   LOG  ALOG  REAL*4  REAL*4 
     loge     DLOG  REAL*8  REAL*8 
      QLOG[3]  REAL*16  REAL*16 
      CLOG  COMPLEX*8  COMPLEX*8 
      CDLOG  COMPLEX*16  COMPLEX*16 
      ZLOG  COMPLEX*16  COMPLEX*16 
Common Logarithm [7]   LOG10  ALOG10  REAL*4  REAL*4 
     log10     DLOG10  REAL*8  REAL*8 
      QLOG10[3]  REAL*16  REAL*16 
 
Sine [6]  SIN  SIN  REAL*4  REAL*4 
     Sin a      DSIN  REAL*8  REAL*8 
      QSIN[3]  REAL*16  REAL*16 
      CSIN  COMPLEX*8  COMPLEX*8 
      CDSIN  COMPLEX*16  COMPLEX*16 
      ZSIN  COMPLEX*16  COMPLEX*16 
 
Sine [6] (degree)   SIND  SIND  REAL*4  REAL*4 
     Sin a      DSIND  REAL*8  REAL*8 
      QSIND[3]  REAL*16  REAL*16 
 
Hyperbolic Sine  SINH  SINH  REAL*4  REAL*4 
     Sinh a      DSINH  REAL*8  REAL*8 
      QSINH[3]  REAL*16  REAL*16 
 
Square Root [8]  SQRT  SQRT  REAL*4  REAL*4 
     a1/2      DSQRT  REAL*8  REAL*8 
      QSQRT[3]  REAL*16  REAL*16 
      CSQRT  COMPLEX*8  COMPLEX*8 
      CDSQRT  COMPLEX*16  COMPLEX*16 
      ZSQRT  COMPLEX*16  COMPLEX*16 
 
Tangent [6]  TAN  TAN  REAL*4  REAL*4 
     Tan a      DTAN  REAL*8  REAL*8 
      QTAN[3]  REAL*16  REAL*16 
 
Tangent [6] (degree)   TAND  TAND  REAL*4  REAL*4 
     Tan a      DTAND  REAL*8  REAL*8 
      QTAND[3]  REAL*16  REAL*16 
 
Hyperbolic Tangent  TANH  TANH  REAL*4  REAL*4 
     Tanh a      DTANH  REAL*8  REAL*8 
      QTANH[3]  REAL*16  REAL*16 

[1] The argument of ACOSD, DACOSD, QACOSD, ASIND, DASIND, QASIND, ATAND, DATAND, and QATAND must be greater than or equal to zero. The absolute value of the argument of ACOS, DACOS, QACOS, ACOSD, DACOSD, QACOSD, ASIN, DASIN, QASIN, ASIND, DASIND, or QASIND must be less than or equal to 1.

[2] The result of ACOS, DACOS, QACOS, ASIN, DASIN, QASIN, ATAN, DATAN, QATAN, ATAN2, DATAN2, or QATAN2 is in radians. The result of ACOSD, DACOSD, QACOSD, ASIND, DASIND, QASIND, ATAND, DATAND, QATAND, ATAN2D, DATAN2D, or QATAN2D is in degrees.

[3] VMS, U*X

[4] If the value of the first argument of ATAN2, DATAN2, or QATAN2 is positive, the result is positive. When the value of the first argument is zero, the result is zero if the second argument is positive and pi if the second argument is negative. If the value of the first argument is negative, the result is negative. If the value of the second argument is zero, the absolute value of the result is pi/2. Both arguments must not have the value zero. The range of the result for ATAN2, DATAN2, and QATAN2 is: -pi < result

[5] If the value of the first argument of ATAN2D, DATAN2D, or QATAN2D is positive, the result is positive. When the value of the first argument is zero, the result will be zero if the second argument is positive and 180 degrees if the second argument is negative. If the value of the first argument is negative, the result is negative. If the value of the second argument is zero, the absolute value of the result is 90 degrees. Both arguments must not have the value zero. The range of the result for ATAN2D, DTAN2D, QATAN2D is: -180 degrees < result degrees.

[6] The argument of COS, DCOS, QCOS, SIN, DSIN, QSIN, TAN, DTAN, or QTAN must be in radians. The argument is treated modulo 2*pi. The argument of COSD, SIND, or TAND must be in degrees. The argument is treated modulo 360.

[7] The argument of ALOG, DLOG, QLOG, CLOG, CDLOG, ZLOG, ALOG10, DLOG10, and QLOG10 must be greater than zero. The argument of CLOG, CDLOG, or ZLOG must not be (0.,0.).

[8] The argument of SQRT, DSQRT, or QSQRT must be greater than or equal to zero. The result of CSQRT, CDSQRT, or ZSQRT is the principal value, with the real part greater than or equal to zero. When the real part is zero, the result is the principal value, with the imaginary part greater than or equal to zero.


Previous Page Next Page Table of Contents