![](/images/backgrounds/286549/hp-sunsoft-pascal-4-0-users-manual-549395226x1.png)
8
The commands to compile and execute RetReal.f and RetRealmain.p
hostname% f77
retreal:
hostname% pc RetReal.o RetRealmain.p
2.0 3.0
Type shortreal
You can return a shortreal function value between Pascal and FORTRAN. Pass it exactly as in the previous example, with the Pascal shortreal type matching the FORTRAN real type (without
Routines as Parameters
If the passed procedure is a
The FORTRAN subroutine, | subroutine PassProc ( r, s, prcdr ) |
PassProc.f | real r, s |
| external prcdr |
| call prcdr ( r, s ) |
| return |
| end |
|
|
202 | Pascal 4.0 User’s Guide |