.;-*-text,readall-*-  If you are not TECO, just ignore this line
.ps 62,80
.lm 10
.rm 70
.autoparagraph
 Put together by J. Anthony Parker, MD on 7-Jun-80. Modified and put into
RUNOFF format by R. Gary Beckmann on February 18, 1981.
 Brief RATFOR description for more information on RATFOR see
^&Software& Tools\& by B.W. Kernighan and P.J. Plauger (Addison-Wesley, 1976).
.break
.nofill
Syntax <name> are metavariable names; [] enclose optional entries:

	<program>    = <statement> | <program><; or newline><statement>
	<statement>  = {<program>}
		     | FOR([<init>] ; [<boolean>] ; [<reinit>])
				<statement>
	<init>	     | <statement>+
	<reinit>     | <statement>+
.footnote 4
.lm 10
.rm 70
.fill
+ The init and reinit of a for statement should generally be used as
loop control variables.  While other statements could be used, this
practice would obscure the meaning of the loop.
!
		     | WHILE(<boolean>) <statement>
		     | REPEAT <statement>
				[UNTIL(<boolean>)]
		     | IF(<boolean>) <statement>
				[ELSE <statement>]
	<boolean>    = A variable or constant which can be tested
			for true or false (implementation dependent)
		     | DO (<limits>)
				<statement>
	<limits>     = Fortran limits++
.footnote 1
.lm 10
.rm 70
.fill
++ Any valid FORTRAN DO limits. e.g. I = 1, 10, 2
!
		     | SWITCH (expression) {<case list>}
		     | NEXT
		     | BREAK
		     | STRING <name> '<string>'
		     | <label list>
		     | <label name> <statement>
		     | <almost any legal fortran statement>*
.footnote 5
.lm 10
.rm 70
.fill
* The notable exception is the arithmetic IF statement, RATFOR will ^&not\&
do the right thing with it. Though RATFOR's
DO statement has a different syntax, the FORTRAN syntax (withou! the
parentheses) will work.
!
		     | DEFINE <name> <string>
		     | UNDEFINE <name>
		     | INCLUDE <file specification>
	<case list>  = <case value> | <case value><case list>
	<case value> = CASE <integer value> : <program>
		     | CASE '<character>' : <program>
		     | CASE DEFAULT : <program>
	<label list> =  LABEL <label name>
		     | <label list>, <label name>
.page
.fill
Some semantics:
	FOR(initialization ; test ; reinitialization)
		The test is performed at the top of the loop.
	DO
		Fortran DO statement.
	STRING <name> '<string>'
		CHARACTER must be defined as BYTE.(i.e. DEFINE CHARACTER BYTE)
		SLEN is a preprocess time function which returns the length of
		the string. Within the string: \b=BS, \e=ESC, \f=FF, \l=LF,
		\n=CR-LF, \r=CR, \t=TAB, \\=\, \^*=<cntrl*>, \ddd=ddd<octal>.
	SWITCH
		Translates into a computed GOTO; therefore, a small integer
		range should be used.  Control falls throught the cases;
		therefore, each case is typically terminated with BREAK.
		\ string construction is supported.
	LABEL <label name>
		Label name can be used as a fortran statement label e.g. for
		format statements, or for ERR= and END= options.
		UNDEFINE will undefine label name.
Special features:
	longnames (including '_' and '&' in the versions running on PDP11's)
		are uniquely converted to fortran names.
	'%' as the first character in a line will pass a whole line
		through to the output unaltered.  In other positions
		it passes the next character.
	'@'<number> translates octal constant <number> to decimal constant.
	'#' starts a comment which is terminated with a newline.
	'/*' starts a comment which is terminated with '*/'.
	"'" or '"' can be used to delimit strings.
	'{', '}' or '[', ']' can be used to delimit statements.
	'\'<cr> continues a statement on the next line.  '\' is discarded.
	',', '*', '+', '-', '(', '&', and '|' at the end of a line
		cause the statement to be continued on the next line.
	'&' translates to .AND.
	'|' and '\' translate to .OR.
	'<' translates to .LT.
	'>' translates to .GT.
	'^' and '!' translate to .NOT.
	'<=' translates to .LE.
	'==' translates to .EQ.
	'>=' translates to .GE.
	'^=', '!=' and '<>' translate to .NE.