/ FLECS, LANGUAGES, Structured FORTRAN Translator   C FLECS is a FORTRAN-to-FORTRAN translator which adds some additional J "structured programming" control constructs to FORTRAN.  It was written inI the early 1970s by Terry Beyer of the University of Oregon and is largely F obsolete since the emergence of FORTRAN-77.  Still, many applications F written in FLECS still exist, thus having the translator available for# OpenVMS systems is still a benefit.   F This version contains modifications by several people, including (mostG recently) Selden Ball of Cornell University, to whom I am grateful for  G having furnished the sources.  I made some minor corrections to Fortran 5 syntax that don't affect the behavior of the program.   3 In the top-level directory are the following files:   9 	FLECS.MEM         - User's Manual for the FLECS language D 	FLECS.HLP         - HELP file that can be inserted into HELPLIB.HLB6 	FLECS-ALPHA.EXE   - Alpha executable version of FLECS7 	FLECS-VAX.EXE     - VAX (VMS V5.0 or later) executable * 	FLECS-ALPHA.OBJ   - Alpha linkable object( 	FLECS-VAX.OBJ     - VAX linkable object  2 To use FLECS, define a foreign command as follows:  3   $ FLECS :== $disk:[dir]FLECS-ALPHA (or FLECS-VAX) .   $ FLECS file.FLX (.FLX file type is assumed)  G INCLUDE files are expanded and processed unless they have the "/NOLIST" G qualifier in the file specification. In such cases, FLECS simply passes G along the INCLUDE statement for FORTRAN to handle. If a file is passed  I to FLECS with a "/NOI" qualifier, all include files processing is passed   on to FORTRAN.  9 See FLECS.HLP for more information on the command syntax.   G Sources for FLECS (and RUNOFF sources for the manual) are in the [.SRC] J directory.  To build FLECS, copy the .FOR and .INC files into a directory,2 set default there, and use the following commands:     $ FORTRAN FLECS,SFLECS   $ LINK FLECS,SFLECS   F The compiler may issue some informational messages about "questionableH branch into block", and variables declared but not used.  The former areF due to FLECS' propensity for creating the following control structure:   	IF (.TRUE.) GOTO 99999  	DO WHILE (expr)  99999  CONTINUE  H I've looked at all the cases where this appears and I believe them to beD harmless (though I'd rap the knuckles of any programmer who did thisD deliberately.  It would be hazardous if it were an indexed DO loop.)  E The FLECS translator sources are also provided in their original .FLX I format (the .FOR files are the result of running FLECS.FLX and SFLECS.FLX  through FLECS).   : The FLECS source code and manual are in the public domain.  B If you find errors, feel free to send them to me, Steve Lionel, atK lionel@quark.enet.dec.com, and I'll see what I can do.  Please don't ask me ; for enhancements or for assistance with the FLECS language. 