[comp.lang.fortran] Fortran Source Renumbering program available from Purdue University

afc@i.cc.purdue.edu (Greg Flint) (05/17/89)

The Purdue University Computing Center (PUCC) has a program (CLEAN77) that
will help clean up old FORTRAN 77 routines by [optionally] doing such things
as renumbering labels, indenting  DO and IF-ENDIF blocks, and converting
Hollerith strings to quoted strings.

CLEAN77 is reasonably portable since it is written in FORTRAN 77, but 
versions are available that have been customized for specific operating
systems or compilers.  You will need to specify which of the following
versions (about 250 Kbytes each) you wish to receive:

	1) F77 under Unix(tm)

	2) FORTVS and FORTVS2 under VM/CMS on IBM mainframes

	3) MSDOS (Both the source and a 115Kbyte EXE file are released.)

	4) FTN200 under VSOS on CDC Cyber 205

	5) FTN5 under NOS dialects on CDC 6000's, 170's and 180's.

	6) M77 under NOS dialects on CDC 6000's, 170's and 180's.

	7) A generic 32-bit version that must have its operating system
	   interface defined (e.g., "How is unit 3 associated with a
	   user specified file?").

PUCC does not charge for CLEAN77 but you must supply a 9-track tape or
sufficient 3.5" or 5.25" DOS-format disks to hold the requested version(s).
(Disks are preferred and will be processed more promptly.)

CLEAN77 is released with a user's manual that describes the various user-
controllable processing options.  It is available as hard-copy (with tape
releases) or as nroff and Postscript source (with disk releases).

 NOTE:	You may modify your copy of the program and/or documentation to meet
	your own internal needs, but you may not redistribute CLEAN77 in any
	form.  Purdue retains distribution rights.

For more information, please contact me at one of the addresses given below.
-------------------------------------------------------------------------------
Greg Flint 	  Math G-169	    (317) 494-1787  UUCP:  j.cc.purdue.edu!gdf
  Purdue Univ.	  Purdue University		    ARPA:  gdf@j.cc.purdue.edu
  Computing Ctr.  West Lafayette, IN 47907	  BITNET:  flint@purccvm.bitnet