FORTRAN Reference Manual

Run-Time Diagnostic Messages
FORTRAN Reference Manual528615-001
G-3
Intrinsic Errors
Intrinsic Errors
The following intrinsic functions can cause run-time errors:
ACOS, DACOS, ASIN, and DASIN: argument value is less than -1.0 or greater
than 1.0.
ALOG, DLOG, ALOG10, DLOG10: argument less than or equal to zero. \
ATAN2 and DATAN2: both arguments are zero.
CLOG: argument value is CMPLX (0, 0).
SQRT and DSQRT: argument value is less than zero.
DSQRT when called by CSQRT: if the argument to CSQRT is z = CMPLX (x, y),
the error can occur when x > CABS (z).
Error Messages
If an error occurs while your program is running, the FORTRAN run-time library writes
a diagnostic message to the log file. The format of the diagnostic message depends on
the nature of the error, and whether or not you specify ENV OLD or ENV COMMON
when you compile your program.
Diagnostic Messages With ENV OLD
If you compile your program with ENV OLD, the FORTRAN run-time library writes
messages in one of three different formats, depending on the statement or function
that causes the error. The three formats correspond to whether the error occurs while
executing:
A READ or WRITE statement
An I/O statement other than a READ or WRITE statement
An intrinsic function
READ and WRITE Message Format
The formatter writes an error message to the log file in the following format if either the
formatter or the Guardian file system detects an error while executing a READ or
WRITE statement:
FORMATTER ERROR @ p-addr, space. segment
UNIT uuu, ERROR errno