Elemental function
@item @emph{Syntax}:
-@code{X = ABS(X)}
+@code{RESULT = ABS(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = ACCESS(NAME, MODE)}
+@code{RESULT = ACCESS(NAME, MODE)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{C = ACHAR(I)}
+@code{RESULT = ACHAR(I)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ACOS(X)}
+@code{RESULT = ACOS(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ACOSH(X)}
+@code{RESULT = ACOSH(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{STR = ADJUSTL(STR)}
+@code{RESULT = ADJUSTL(STR)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{STR = ADJUSTR(STR)}
+@code{RESULT = ADJUSTR(STR)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = AIMAG(Z)}
+@code{RESULT = AIMAG(Z)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = AINT(X [, KIND])}
+@code{RESULT = AINT(X [, KIND])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
transformational function
@item @emph{Syntax}:
-@code{L = ALL(MASK [, DIM])}
+@code{RESULT = ALL(MASK [, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{L = ALLOCATED(X)}
+@code{RESULT = ALLOCATED(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ANINT(X)}
-@code{X = ANINT(X, KIND)}
+@code{RESULT = ANINT(X [, KIND])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
transformational function
@item @emph{Syntax}:
-@code{L = ANY(MASK)}
-@code{L = ANY(MASK, DIM)}
+@code{RESULT = ANY(MASK [, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ASIN(X)}
+@code{RESULT = ASIN(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ASINH(X)}
+@code{RESULT = ASINH(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{L = ASSOCIATED(PTR)}
-@code{L = ASSOCIATED(PTR [, TGT])}
+@code{RESULT = ASSOCIATED(PTR [, TGT])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ATAN(X)}
+@code{RESULT = ATAN(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ATAN2(Y,X)}
+@code{RESULT = ATAN2(Y,X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ATANH(X)}
+@code{RESULT = ATANH(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = BESJ0(X)}
+@code{RESULT = BESJ0(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = BESJ1(X)}
+@code{RESULT = BESJ1(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{Y = BESJN(N, X)}
+@code{RESULT = BESJN(N, X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = BESY0(X)}
+@code{RESULT = BESY0(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = BESY1(X)}
+@code{RESULT = BESY1(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{Y = BESYN(N, X)}
+@code{RESULT = BESYN(N, X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = BIT_SIZE(I)}
+@code{RESULT = BIT_SIZE(I)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{I = BTEST(I,POS)}
+@code{RESULT = BTEST(I, POS)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{I = CEILING(X [, KIND])}
+@code{RESULT = CEILING(X [, KIND])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{C = CHAR(I [, KIND])}
+@code{RESULT = CHAR(I [, KIND])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL chdir(PATH[,STATUS])}
+@code{CALL CHDIR(PATH [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{C = CMPLX(X [, Y [, KIND]])}
+@code{RESULT = CMPLX(X [, Y [, KIND]])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = COMMAND_ARGUMENT_COUNT()}
+@code{RESULT = COMMAND_ARGUMENT_COUNT()}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = COS(X)}
+@code{RESULT = COS(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@table @asis
@item @emph{Description}:
-@code{COUNT(MASK[,DIM])} counts the number of @code{.TRUE.} elements of
+@code{COUNT(MASK [, DIM])} counts the number of @code{.TRUE.} elements of
@var{MASK} along the dimension of @var{DIM}. If @var{DIM} is omitted it is
taken to be @code{1}. @var{DIM} is a scaler of type @code{INTEGER} in the
range of @math{1 /leq DIM /leq n)} where @math{n} is the rank of @var{MASK}.
transformational function
@item @emph{Syntax}:
-@code{I = COUNT(MASK[,DIM])}
+@code{RESULT = COUNT(MASK [, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Subroutine
@item @emph{Syntax}:
-@code{CPU_TIME(X)}
+@code{CALL CPU_TIME(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@table @asis
@item @emph{Description}:
-@code{CSHIFT(ARRAY, SHIFT[,DIM])} performs a circular shift on elements of
+@code{CSHIFT(ARRAY, SHIFT [, DIM])} performs a circular shift on elements of
@var{ARRAY} along the dimension of @var{DIM}. If @var{DIM} is omitted it is
taken to be @code{1}. @var{DIM} is a scaler of type @code{INTEGER} in the
range of @math{1 /leq DIM /leq n)} where @math{n} is the rank of @var{ARRAY}.
transformational function
@item @emph{Syntax}:
-@code{A = CSHIFT(A, SHIFT[,DIM])}
+@code{RESULT = CSHIFT(A, SHIFT [, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = DBLE(X)}
+@code{RESULT = DBLE(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{C = DCMPLX(X)}
-@code{C = DCMPLX(X,Y)}
+@code{RESULT = DCMPLX(X [, Y])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = DFLOAT(X)}
+@code{RESULT = DFLOAT(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{C = DIGITS(X)}
+@code{RESULT = DIGITS(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = DIM(X,Y)}
+@code{RESULT = DIM(X, Y)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
transformational function
@item @emph{Syntax}:
-@code{S = DOT_PRODUCT(X,Y)}
+@code{RESULT = DOT_PRODUCT(X, Y)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{D = DPROD(X,Y)}
+@code{RESULT = DPROD(X, Y)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{D = DREAL(Z)}
+@code{RESULT = DREAL(Z)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
transformational function
@item @emph{Syntax}:
-@code{A = EOSHIFT(A, SHIFT[,BOUNDARY, DIM])}
+@code{RESULT = EOSHIFT(A, SHIFT [, BOUNDARY, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{C = EPSILON(X)}
+@code{RESULT = EPSILON(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ERF(X)}
+@code{RESULT = ERF(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = ERFC(X)}
+@code{RESULT = ERFC(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = EXP(X)}
+@code{RESULT = EXP(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{I = EXPONENT(X)}
+@code{RESULT = EXPONENT(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = FLOAT(I)}
+@code{RESULT = FLOAT(I)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@end multitable
@item @emph{Return value}:
-The return value is of type default @code{REAL}
+The return value is of type default @code{REAL}.
@item @emph{Example}:
@smallexample
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL FGET(C[,STATUS])}
+@code{CALL FGET(C [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL FGETC(UNIT,C[,STATUS])}
+@code{CALL FGETC(UNIT, C [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{I = FLOOR(X [, KIND])}
+@code{RESULT = FLOOR(X [, KIND])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
non-elemental function
@item @emph{Syntax}:
-@code{I = FNUM(UNIT)}
+@code{RESULT = FNUM(UNIT)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL FPUT(C[,STATUS])}
+@code{CALL FPUT(C [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL FPUTC(UNIT,C[,STATUS])}
+@code{CALL FPUTC(UNIT, C [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL fstat(UNIT,BUFF[,STATUS])}
+@code{CALL FSTAT(UNIT, BUFF [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Subroutine
@item @emph{Syntax}:
-@code{CALL GETARG(N,ARG)}
+@code{CALL GETARG(N, ARG)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Subroutine
@item @emph{Syntax}:
-@code{CALL GET_COMMAND_ARGUMENT(N,ARG)}
+@code{CALL GET_COMMAND_ARGUMENT(N, ARG)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine.
@item @emph{Syntax}:
-@code{CALL GETCWD(CWD[,STATUS])}
+@code{CALL GETCWD(CWD [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Subroutine
@item @emph{Syntax}:
-@code{CALL GETENV(ENVVAR,VALUE)}
+@code{CALL GETENV(ENVVAR, VALUE)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Subroutine
@item @emph{Syntax}:
-@code{CALL GET_ENVIRONMENT_VARIABLE(ENVVAR,VALUE)}
+@code{CALL GET_ENVIRONMENT_VARIABLE(ENVVAR, VALUE)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
function
@item @emph{Syntax}:
-@code{I = GETGID()}
+@code{RESULT = GETGID()}
@item @emph{Return value}:
The return value of @code{GETGID} is an @code{INTEGER} of the default
function
@item @emph{Syntax}:
-@code{I = GETPID()}
+@code{RESULT = GETPID()}
@item @emph{Return value}:
The return value of @code{GETPID} is an @code{INTEGER} of the default
function
@item @emph{Syntax}:
-@code{GETUID()}
+@code{RESULT = GETUID()}
@item @emph{Return value}:
The return value of @code{GETUID} is an @code{INTEGER} of the default
Elemental function
@item @emph{Syntax}:
-@code{Y = HUGE(X)}
+@code{RESULT = HUGE(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{I = IACHAR(C)}
+@code{RESULT = IACHAR(C)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental Function
@item @emph{Syntax}:
-@code{I = IARGC()}
+@code{RESULT = IARGC()}
@item @emph{Arguments}:
None.
Elemental function
@item @emph{Syntax}:
-@code{I = ICHAR(C)}
+@code{RESULT = ICHAR(C)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{I = IERRNO()}
+@code{RESULT = IERRNO()}
@item @emph{Arguments}:
None.
Elemental function
@item @emph{Syntax}:
-@code{I = INDEX(STRING, SUBSTRING [, BACK])}
+@code{RESULT = INDEX(STRING, SUBSTRING [, BACK])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@item @code{X = INT(X [, KIND))}
+@item @code{RESULT = INT(X [, KIND))}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
non-elemental function
@item @emph{Syntax}:
-@code{I = IRAND(FLAG)}
+@code{RESULT = IRAND(FLAG)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = LBOUND(ARRAY [, DIM])}
+@code{RESULT = LBOUND(ARRAY [, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{L = LEN_TRIM(STRING)}
+@code{RESULT = LEN_TRIM(STRING)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{L = LGE(STRING_A, STRING_B)}
+@code{RESULT = LGE(STRING_A, STRING_B)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{L = LGT(STRING_A, STRING_B)}
+@code{RESULT = LGT(STRING_A, STRING_B)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{L = LLE(STRING_A, STRING_B)}
+@code{RESULT = LLE(STRING_A, STRING_B)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{L = LLT(STRING_A, STRING_B)}
+@code{RESULT = LLT(STRING_A, STRING_B)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{L = LNBLNK(STRING)}
+@code{RESULT = LNBLNK(STRING)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = LOC(X)}
+@code{RESULT = LOC(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = LOG(X)}
+@code{RESULT = LOG(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = LOG10(X)}
+@code{RESULT = LOG10(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental subroutine
@item @emph{Syntax}:
-@code{CALL LSTAT(FILE,BUFF[,STATUS])}
+@code{CALL LSTAT(FILE, BUFF [, STATUS])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = MAXEXPONENT(X)}
+@code{RESULT = MAXEXPONENT(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@end multitable
@item @emph{Return value}:
-If @var{DIM} is absent, the result is a rank-one array with a length
-equal to the rank of @var{ARRAY}. If @var{DIM} is present, the result
-is an array with a rank one less than the rank of @var{ARRAY}, and a
-size corresponding to the size of @var{ARRAY} with the @var{DIM}
-dimension removed. If @var{DIM} is present and @var{ARRAY} has a rank
-of one, the result is a scalar. In all cases, the result is of the same
-type and kind as @var{ARRAY}.
+If @var{DIM} is absent, or if @var{ARRAY} has a rank of one, the result
+is a scalar. If @var{DIM} is present, the result is an array with a
+rank one less than the rank of @var{ARRAY}, and a size corresponding to
+the size of @var{ARRAY} with the @var{DIM} dimension removed. In all
+cases, the result is of the same type and kind as @var{ARRAY}.
@item @emph{See also}:
@ref{MAX}, @ref{MAXLOC}
Elemental function
@item @emph{Syntax}:
-@code{RESULT = MIN(A1, A2 [, A3 [, ...]])}
+@code{RESULT = MIN(A1, A2 [, A3, ...])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = MINEXPONENT(X)}
+@code{RESULT = MINEXPONENT(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@end multitable
@item @emph{Return value}:
-If @var{DIM} is absent, the result is a rank-one array with a length
-equal to the rank of @var{ARRAY}. If @var{DIM} is present, the result
-is an array with a rank one less than the rank of @var{ARRAY}, and a
-size corresponding to the size of @var{ARRAY} with the @var{DIM}
-dimension removed. If @var{DIM} is present and @var{ARRAY} has a rank
-of one, the result is a scalar. In all cases, the result is of the same
-type and kind as @var{ARRAY}.
+If @var{DIM} is absent, or if @var{ARRAY} has a rank of one, the result
+is a scalar. If @var{DIM} is present, the result is an array with a
+rank one less than the rank of @var{ARRAY}, and a size corresponding to
+the size of @var{ARRAY} with the @var{DIM} dimension removed. In all
+cases, the result is of the same type and kind as @var{ARRAY}.
@item @emph{See also}:
@ref{MIN}, @ref{MINLOC}
Elemental function
@item @emph{Syntax}:
-@code{X = MOD(A,P)}
+@code{RESULT = MOD(A, P)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = MODULO(A,P)}
+@code{RESULT = MODULO(A, P)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{Y = NEAREST(X, S)}
+@code{RESULT = NEAREST(X, S)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{C = NEW_LINE(C)}
+@code{RESULT = NEW_LINE(C)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = NINT(X)}
+@code{RESULT = NINT(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = PRECISION(X)}
+@code{RESULT = PRECISION(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{R = RADIX(X)}
+@code{RESULT = RADIX(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Non-elemental function
@item @emph{Syntax}:
-@code{X = RAND(FLAG)}
+@code{RESULT = RAND(FLAG)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = RANGE(X)}
+@code{RESULT = RANGE(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@item @emph{Syntax}:
@multitable @columnfractions .30 .80
-@item @code{X = REAL(X)}
-@item @code{X = REAL(X, KIND)}
-@item @code{X = REALPART(Z)}
+@item @code{RESULT = REAL(X [, KIND])}
+@item @code{RESULT = REALPART(Z)}
@end multitable
@item @emph{Arguments}:
Elemental function
@item @emph{Syntax}:
-@code{Y = RRSPACING(X)}
+@code{RESULT = RRSPACING(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{Y = SCALE(X, I)}
+@code{RESULT = SCALE(X, I)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
function
@item @emph{Syntax}:
-@code{T = SECNDS (X)}
+@code{RESULT = SECNDS (X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Transformational function
@item @emph{Syntax}:
-@multitable @columnfractions .80
-@item @code{J = SELECTED_INT_KIND(I)}
-@end multitable
+@code{RESULT = SELECTED_INT_KIND(I)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Transformational function
@item @emph{Syntax}:
-@multitable @columnfractions .80
-@item @code{I = SELECTED_REAL_KIND(P,R)}
-@end multitable
+@code{RESULT = SELECTED_REAL_KIND(P, R)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{Y = SET_EXPONENT(X, I)}
+@code{RESULT = SET_EXPONENT(X, I)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = SIGN(A,B)}
+@code{RESULT = SIGN(A, B)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@item @emph{Syntax}:
@multitable @columnfractions .80
-@item @code{CALL SIGNAL(NUMBER, HANDLER)}
-@item @code{CALL SIGNAL(NUMBER, HANDLER, STATUS)}
+@item @code{CALL SIGNAL(NUMBER, HANDLER [, STATUS])}
@item @code{STATUS = SIGNAL(NUMBER, HANDLER)}
@end multitable
Elemental function
@item @emph{Syntax}:
-@code{X = SIN(X)}
+@code{RESULT = SIN(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = SINH(X)}
+@code{RESULT = SINH(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
function
@item @emph{Syntax}:
-@code{X = SNGL(A)}
+@code{RESULT = SNGL(A)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = SQRT(X)}
+@code{RESULT = SQRT(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{X = TAN(X)}
+@code{RESULT = TAN(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Elemental function
@item @emph{Syntax}:
-@code{Y = TINY(X)}
+@code{RESULT = TINY(X)}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
Inquiry function
@item @emph{Syntax}:
-@code{I = UBOUND(ARRAY [, DIM])}
+@code{RESULT = UBOUND(ARRAY [, DIM])}
@item @emph{Arguments}:
@multitable @columnfractions .15 .80
@cindex @code{UMASK} intrinsic
@cindex file system operations
-Intrinsic implemented, documentation pending.
-
@table @asis
@item @emph{Description}:
+Sets the file creation mask to @var{MASK} and returns the old value in
+argument @var{OLD} if it is supplied. See @code{umask(2)}.
+
@item @emph{Standard}:
GNU extension
Subroutine
@item @emph{Syntax}:
+@code{CALL UMASK(MASK [, OLD])}
+
@item @emph{Arguments}:
-@item @emph{Return value}:
-@item @emph{Example}:
-@item @emph{Specific names}:
-@item @emph{See also}:
+@multitable @columnfractions .15 .80
+@item @var{MASK} @tab Shall be a scalar of type @code{INTEGER(*)}.
+@item @var{MASK} @tab (Optional) Shall be a scalar of type
+ @code{INTEGER(*)}.
+@end multitable
+
@end table