Adding
Subroutines
Language
ERROR
CHECK
Overflow
in
FAD
or
FSB
Underflow in
FAD
or
FSB
Overflow
in
FMP
Underflow in F
MP
Overflow
in FDV or
FDVR
Underflow in
FDV
or
FDVR
Zero divisor in FDV or
FDVR
Zero divisor in
FXD
or
FXDR
*Argument in FIX
~
10,000
*Argument in
FIX:s
-10,000
Loss
of
all
significance in FSIN or
FCOS
Zero argument in FLN
Negative argument in FLN
Overflow
in
FEXP
or FEXN
Underflow in
FEXP
or FEXN
* Negative argument in
FAXB
* Negative argument in
FSQR
Input data in incorrect form or outside allowable
ERROR
CODE
E1
E2
E3
E4
E5
E6
E7
E8
E9
E9
F1
F2
F3
F4
F5
F6
F6
range
F7
Floating point output data outside allowable range,
or in
form
not acceptable to FORMAT specification
F8
Input or output card record
is
longer than
72
characters, or there
is
an
element in
an
input
or output
list for which there
is
no
specification
in the corresponding
FORMAT statement
F9
* Subroutine
Sets
3
and
4 only
CO
NTENTS OF
FAC
9999999999
0000000099
9999999999
500000
0099
9999999999
0000000099
9999999999
9999
9999
9999
9999999999
9999999999
l.n
Ixl
9999999999
0000000099
IAIB
-vrxr
Input/Output
Data.
Input
data
to
the
object
program
is
read
alphamerically
at
the
paper
tape
reader,
the
card
reader,
or
the
console typewriter.
If
error
F7
occurs
during
the
execution of
the
instructions compiled for
an
input
statement,
the
data
which
is incorrect will
be
ignored
and
processing will con-
tinue.
If
error
FB
occurs,
the
incorrect
data
will
be
ignored in
the
output
record,
and
an
additional record will
be
created containing
the
incorrect
data
in
the
form
specified
by
E14.B for floating point data. Fixed
point
data
outside
the
range
of
the
format specifications will
be
output
in
the
form I (w -1)
where
w is
the
speci-
fied width. No error indication will occur.
If
error
F9
occurs,
the
incorrect
data
will
be
ignored
and
processing will con-
tinue.
As
indicated
earlkr,
up
to 19 additional subroutines
can
be
added
to
the
31
subroutines
provided
by
the
program. Additions of relocatable subroutines to
the
FORTRAN
system involve changes in
the
language,
the
processor,
and
the
sub-
routines.
The
four
type
3 subroutines provided
with
the
system
may
be
replaced subject
to
the
restrictions mentioned below.
The
two
type
2 subroutines are
an
integral
part
of
the
system
and
may
not be replaced.
Subroutines
added
to
the
system
are
type
3.
Such subroutines
must
be
given
a one-to-four
character
symbolic name.
For
example, a subroutine to calculate
hyperbolic sine
might
be
called
SNH,
and
in a source
program
might
be
used in
such a statement as
Y
=
SNH(X)
or
as Y =
SNHF(X).
Analysis
of
the
FORTRAN
Program
61
To Next Page
Loading...
Need help?
General
