HP 3000 Manuals HP 3000 Manuals
INTRINSIC Statement (Nonexecutable) The INTRINSIC statement identifies a name as representing an intrinsic function and permits the name to be used as an actual argument.----------------------------------------------------------------------------------------------- | | | | | Item | Description/Default | Restrictions | | | | | ----------------------------------------------------------------------------------------------- | | | | | function | Name of an intrinsic function. | Each name can appear once only in | | | | a given INTRINSIC statement and in | | | | at most one INTRINSIC statement | | | | within a given program unit. | | | | | ----------------------------------------------------------------------------------------------- The INTRINSIC statement provides a means of using intrinsics as actual arguments. The INTRINSIC statement is necessary to inform the compiler that these names are intrinsic names and not variable names. Whenever an intrinsic name is passed as a function parameter, it must be placed in an INTRINSIC statement in the calling program. The names of intrinsic functions for type conversion-- CHAR, CMPLX, DBLE, FLOAT, ICHAR, IDINT, IFIX, INT, REAL, SNGL-- for logical relationships-- LGE, LGT, LLE, LLT-- and for choosing the largest or smallest value-- AIMAX0, AIMIN0, AJMAX0, AJMIN0, AMAX0, AMAX1, AMIN0, AMIN1, IMAX0, IMAX1, IMIM0, JMAX0, JMAX1, JMIN0, JMIN1, MAX, MAX0, MAX1, MIN, MIN0, MIN1-- must not be used as actual arguments. A name must not appear in both an EXTERNAL and an INTRINSIC statement in the same program unit. Example Notes --------------------------------------------------------------------------------------- INTRINSIC SIN,TAN The INTRINSIC statement informs the CALL MATH(SIN,TAN) compiler that SIN and TAN are intrinsics.
![[]](../../pic3k/M012118/FFN543c50.gif)