Intel fortran-80 Laptop User Manual


 
FORTRAN-80
FORTRAN-80
Statement
Summary
FUNCTION
Statement
Category: Nonexecutable
Text Reference: Section 5.2.1
Format
Function
[type]
FUNCTION
func ([d[,d]
...
J)
Name
the
FUNCTION
subprogram
'func,'
define its type
and
dummy
parameter(s)
'd.'
GO
TO
Statements
Category: Executable
Text Reference: Section
4.1.1,4.1.2,4.1.3
Formats
Function
GOTOs
Transfer
control
to
statement
GO
TO
(s[,s]
...
)[,]exp labeled
's'
or
ASSIGNED
to
GO
TO
i [[,](s[,s]
...
)]
variable
name
'i'.
Notes:
First
format
branches unconditionally.
Second
format
branches based
on
value
of
integer expression
'exp.'
Third
format
branches
unconditionally,
but
statement
label
corresponding
to
'i'
must be included in list.
IF
Statements
Cagetory: Executable
Text Reference: Sections
4.1.4,4.1.5,4.1.6,4.1.7
Formats
Function
IF
(e)
sl,
s2,
s3
Transfer
control
to
a
specified
IF
(e) st
statement
or
perform
specified ac-
IF
(e)
THEN
tion(s) based
on
the value
of
expres-
sion
'e'.
Notes:
In first
format
'e'
is
an
arithmetic
expression
and
s
1,
s2,
s3
are
standard
labels; con-
trol passes to:
sl
ife<O
s2
if
e = 0
s3ife>O
In second
format,
statement
'st'
is
executed
if
logical expression
'e'
is
TRUE.
Third
format
introduces
IF
block;
statements
following
IF-THEN
are
executed
if
logical
expression
'e'
is
TRUE.
A-7