SIMSCRIPT II.5 Programming Language

SIMSCRIPT II.5 Programming Language
Program 2-1.
_______________________________________________________________________________
preamble
normally, mode is integer
define V1 and V2 as real, 1-dimensional arrays
define V3, V4 and V5 as 2-dimensional arrays
normally, mode is real
end
main
read N
reserve V1,V2 as N, V3,V4,V5 as N by N
read V1 and V2
let V3(1,1) = V1(V2(1))
:
and other statements that make up a main routine,
including calling references to the subprograms
call PROCESS.DATA
:
call PRINTOUT
:
end '' of Main Routine
routine PROCESS.DATA
normally dimension is 1, mode is real
define Z as an integer array
normally dimension is 0
define L, M and N as integer variables
reserve Z as 10
'START'
for X = 1 to 10
do...
other statements that make up a routine
:
return
end '' of Routine PROCESS.DATA
routine PRINTOUT
define Z as a 2-dimensional variable
reserve Z as 10 by 5
'START'
let X = 1
:
return
end '' of Routine PRINTOUT
_______________________________________________________________________________
58