SIMSCRIPT II.5 Programming Language

SIMSCRIPT II.5 Programming Language
read DATA
if DATA > 10
add DATA to DATA.GT.10
jump ahead
otherwise
if DATA > 5
add DATA to DATA.GT.5
jump ahead
otherwise
add DATA to DATA.LS.5
here
The usefulness of this label-free capability becomes particularly apparent when coupled with the
text substitution feature of SIMSCRIPT II.5. Consider the following example of a program written
for interactive terminal execution:
preamble
normally mode is integer
substitute these 7 lines for INPUT
here if mode is not integer
print 1 line thus
PLEASE USE NUMERIC VALUE
skip 1 field
jump back
otherwise
read
.
.
end
main
input LAMBDA
.
.
input MU
.
.
Each substitution for input contains a label-free jump when the program text is fully expanded.
6.4 Attribute Definitions: Packing and Equivalence
It has been assumed thus far that all data values are stored individually in separate and distinct computer
locations. Occasionally, to minimize storage space requirements, it may be desirable to share
storage locations between more than one variable. This may be done in two ways: If the ranges of
values of the variables are limited in magnitude, a single location may be divided between several
variables. If certain variables are known to be of importance only at nonconcurrent times during
260