! This command file will compile the subroutines for producing
! autoscaled labeled x-y graphs from Fortran programs.
! This is the VAX/VMS version, and does not support the
! Hershey character set which the RSX version does.
!
! We will first build FTE, the Fortran preprocessor
!
$ fortran ftev5.ftn
$ fortran string.ftn
$ library stringlib/create string
$ link ftev5,stringlib/li
$ delete stringlib.olb;*,*.obj;*
$ FTE:==$SYS$DISK:FTEV5
$ FTC:==@FTC
!
! Compile the GRAF subroutines
!
$ ftc graf
$ ftc grafadv
$ ftc parscl
$ fortran string.ftn
$ fortran trig.ftn
$ fortran convertno.ftn
$ fortran getmcrvax
$ library graflib/create:blocks:50
$ library graflib graf,grafadv,string,parscl,convertno,trig,getmcrvax
$ delete *.obj;*
! These modules are already available under VMS: 
$ library/del:acos graflib
$ library/del:asin graflib
$ library/del:tan  graflib
!
! Compile the device-specific plotting libraries
!
$ ftc symbosful
$ fortran tkplot.ftn
$ fortran tksubs.ftn
$ library tklib/create:blocks:40
$ library tklib tkplot,tksubs,symbosful
!
$ fortran hpplot.ftn
$ fortran hpsubs.ftn
$ library hplib/create:blocks:40
$ library hplib hpplot,hpsubs,symbosful
!
$ fortran pfsubs.ftn
$ library pflib/create:blocks:40
$ library pflib pfsubs
!
$ ftc lpplot
$ library lplib/create:blocks:40
$ library lplib lpplot,symbosful
!
$ delete *.obj;*
!
! Compile the small software character set object files
!
$ fortran swchar.ftn
$ ftc     symbosful
$ copy    swchar.obj,symbosful.obj swchar.obs
$ delete  *.obj;*
!
! Taskbuild the PLOTxx tasks for each device
!
$ @plotbuild TK
$ @plotbuild LP
!
! Build the DRAW task for generating publication graphs.
!
$ ftc  draw
$ link draw,graflib/li,pflib/li
!
! Most of the files in this uic are not needed, and you may copy
! them to another medium if desired.  You will need to keep:
!  PLOT%%.EXE
!  %%LIB.OLB
!  GRAFLIB.OLB
!  SWCHAR.OBS
!  DRAW.EXE
!
! A test of the system is to run the sample DRAW
! input file.
! There are also some sample Fortran programs in SAMPLEn.FTN.
!
! That should be everything, I hope.
! In case of problems, contact David Villeneuve, 613-993-9975.
!