BURSTF - Burst program units from Fortran source files. Author - William P. Wood, Jr. The Institute For Cancer Research 7701 Burholme Ave. Philadelphia, Pa. 19111 (215) 728 2760 BURSTF bursts the subroutines, functions, programs, and block datas from a FORTRAN source file into their own individual files. Subroutines and functions are written to NAME.FTN (.FOR) where NAME is the name of the subroutine or function. The same is true for PROGRAM and BLOCK DATA sections, assuming the section has a name (e.g. PROGRAM TEST or BLOCK DATA TEST). Otherwise BURSTF will write main programs to MAINx.FTN (.FOR) and block datas to BLOCKx.FTN (.FOR), where x is a sequence number which is incremented for each new BLOCK or MAIN file. On the PDP11/70, BURSTF is on LB:[22,2]. To use it, type: PDS> XEQ BURSTF where is the name of the file you want bursted. On the VAX, BURSTF is on ICR$PROGRAM:. To use it, type: $ XEQ BURSTF as above. BURSTF writes the name of each file created to the terminal. The file names may be written to a file instead by appending >FILENAME at the end of the command line to create a new file, or >>FILENAME to append to an existing file. This file may be used to create a command file to compile the FORTRAN program units, or to recombine the files, etc. NOTE: BURSTF assumes that the keywords PROGRAM, SUBROUTINE, FUNCTION, BLOCK DATA, and END appear as above with no extra embedded blanks, however upper or lower case is acceptable.