# F77/F90
# Using gcc,
# 	g77 -ffree-form -fsource-case-preserve
# lines can be in "free format", no columns!

res_word_chars: &letters .
comment1: !
comment2:
quote2: " " ' '

# +word   => word -> {\\ttb{}word}
# ~word	  => word -> {\\tts{}word}
# $x ->   => x    -> \\(y\\)
# x	y => x    -> y

# Reserved words
+call
+case
+character
+continue
+common
+data
+do
+else
+end
+exit
+function
+if
+implicit
+include
+integer
+intrinsic
+logical
+parameter
+program
+real
+return
+select
+stop
+subroutine
+then
+while
# Old-style operators treated as reserved words (why?)
+.eq.
+.ne.
+.and.
+.not.
+.or.


# Mathematical translations.
$/=	\neq
$.lt.	<
$<	<
$.gt.	>
$>	>
$.le.	\le
$<=	\le
$.ge.	\ge
$>=	\ge

# Arbitrary translations
.**	\^{}