8
Variable Parameters
The FORTRAN subroutine,
SimVar.f
Pascal passes all var parameters by reference, the FORTRAN default.
Simple Types
Simple types pass in a straightforward manner, as follows:
subroutine SimVar ( t, f, c, i, d, si, sr )
logical*1 | t, f | ||
character | c | ||
integer | i | ||
double precision | d | ||
integer*2 | si | ||
real |
| sr | |
t = .true. |
| ||
f = .false. |
| ||
c | = | 'z' |
|
i | = | 9 |
|
d | = | 9.9 |
|
si = | 9 |
| |
sr = | 9.9 |
| |
return end
186 | Pascal 4.0 User’s Guide |