1
Download FORTRAN 77 Language Reference
Transcript
Functions Coerced to a Particular Type Some VMS FORTRAN functions coerce to a particular INTEGER type. TABLE 6-13 Translated Functions that VMS Coerces to a Particular Type Specific Names Function Argument Type Result Type IINT JINT LINT Truncation toward zero Truncation toward zero Truncation toward zero REAL*4 REAL*4 REAL*4 INTEGER*2 INTEGER*4 INTEGER*8 IIDINT JIDINT Truncation toward zero Truncation toward zero REAL*8 REAL*8 INTEGER*2 INTEGER*4 IIQINT JIQINT Truncation toward zero Truncation toward zero REAL*16 REAL*16 INTEGER*2 INTEGER*4 ININT JNINT Nearest integer, INT(a+.5*sign(a)) Nearest integer, INT(a+.5*sign(a)) REAL*4 REAL*4 INTEGER*2 INTEGER*4 IIDNNT JIDNNT Nearest integer, INT(a+.5*sign(a)) Nearest integer, INT(a+.5*sign(a)) REAL*8 REAL*8 INTEGER*2 INTEGER*4 IIQNNT JIQNNT Nearest integer, INT(a+.5*sign(a)) Nearest integer, INT(a+.5*sign(a)) REAL*16 REAL*16 INTEGER*2 INTEGER*4 IIFIX JIFIX Fix Fix REAL*4 REAL*4 INTEGER*2 INTEGER*4 IMAX1(a,a2,...) JMAX1(a,a2,...) Maximum of two or more arguments Maximum of two or more arguments REAL*4 REAL*4 INTEGER*2 INTEGER*4 IMIN1(a,a2,...) JMIN1(a,a2,...) Minimum of two or more arguments Minimum of two or more arguments READ*4 READ*4 INTEGER*2 INTEGER*4 Chapter 6 Intrinsic Functions 349
