HP SunSoft Pascal 4.0 - Manual (Page 210)

186 Pascal 4.0 User’s Guide
8
Variable Parameters
Pascal passes all var parameters by reference, the FORTRAN default.
Simple Types
Simple types pass in a straightforward manner, as follows:
The FORTRAN subroutine,
SimVar.f
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