[Simh] Interdata OS/32 Fortran

[Don Stalkowski]

OS/32 Fortran "HELLO WORLD"

Although the Fortran tape includes an install program, it requires
that the "OS/32 R06-02 Package" is installed. Since that is not
available, manual installation is necessary.

1. Unpack 04-101M31R09_FortranVII.tap to a temporary disk.

2. Copy to SYS:

F7D51.TSK, F7D51.ERR, F7LIB51.OBJ, F7RTL51.ERR, PEM51.OBJ

3. Put a program into hellof.ftn

C     HELLO WORLD
      WRITE(0,1000)
1000  FORMAT(12H HELLO WORLD )
      END

4. Compile

*AL HELLOF.OBJ,IN,126
*L F7D51
TSKID = F7D51
*as 1,hellof.ftn
*as 2,hellof.obj
*as 3,pr:
*st
*21:51:15   F7D51:FORTRAN-VIID R05-01.00
*21:51:15   F7D51:.MAIN        NO  ERROR(S)    TABLE SPACE USED:     1 K
*21:51:15   F7D51:END OF TASK     0
*

5. Link

*l link
TSKID = LINK
*st
*21:51:59   LINK:PERKIN-ELMER OS/32 LINKAGE EDITOR 03-242 R01-03        
*LINK>in hellof
*LINK>lib F7LIB51, PEM51
*LINK>bu
*21:52:34   LINK:ENTER FILE DESCRIPTOR FOR IMAGE*LINK>hellof
*21:52:40   LINK:MAP?*LINK>no
*LINK>end
*21:52:59   LINK:END OF TASK     0
*

6. Run. The program needs some memory so add a "segsize increment".

*l hellof,5
TSKID = HELLOF
*as 0,con: 
*st
*22:03:36   HELLOF:HELLO WORLD
*22:03:36   HELLOF:END OF TASK     0
*