HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure speciļ¬cations
Chapter 11 629
Case 2 The result of SUM(ARRAY, MASK = msk) has a value equal to a
processor-dependent approximation to the sum of the elements of ARRAY
corresponding to the .TRUE. elements of msk or has the value zero if there
are no .TRUE. elements.
Case 3 If ARRAY has rank one, SUM(ARRAY, DIM [,msk]) has a value equal to that
of SUM(ARRAY [,MASK = msk]). Otherwise, the value of element (
s
1
,
s
2
, ...,
s
DIM-1
,
s
DIM+1
, ...,
s
n
)ofSUM(ARRAY, DIM [,msk]) is equal to the following:
SUM(ARRAY(
s
1
,
s
2
, ...,
s
DIM-1
, :,
s
DIM+1
, ...,
s
n
) &
[, MASK=msk(
s
1
,
s
2
, ...,
s
DIM-1
, :,
s
DIM+1
, ...,
s
n
)])
SYSTEM(STR)
Description
Issue a shell command from a Fortran 90 program.
Class
Nonstandard subroutine.
Argument
STR must be of type character. SYSTEM gives STR to the default shell (/bin/sh) as input, as if
the string were entered at a terminal. When the shell has completed, the process continues.
SYSTEM_CLOCK(COUNT, COUNT_RATE, COUNT_MAX)
Optional arguments
COUNT, COUNT_RATE, COUNT_MAX
Description
Returns integer data from a real-time clock.
Class
Subroutine.