#FILE=DEFIN.RAT	GENERAL CHARACTER SET DEFINITIONS FOR RATFOR *** SHORT FORM
DEFINE (ALPHA=-100)
DEFINE (AMPER=38)		#AMPERSAND
DEFINE (ANDIF=IF)
DEFINE (ATSIGN=64)
DEFINE (BACKSLASH=92)
DEFINE (BAD=-1)
DEFINE (BACKSPACE=8)
DEFINE (BANG=33) 		# EXCLAMATION MARK
DEFINE (BAR=124)
DEFINE (BELL=7)
DEFINE (BIGA=65)
DEFINE (BIGB=66)
DEFINE (BIGC=67)
DEFINE (BIGD=68)
DEFINE (BIGE=69)
DEFINE (BIGF=70)
DEFINE (BIGG=71)
DEFINE (BIGH=72)
DEFINE (BIGI=73)
DEFINE (BIGJ=74)
DEFINE (BIGK=75)
DEFINE (BIGL=76)
DEFINE (BIGM=77)
DEFINE (BIGN=78)
DEFINE (BIGO=79)
DEFINE (BIGP=80)
DEFINE (BIGQ=81)
DEFINE (BIGR=82)
DEFINE (BIGS=83)
DEFINE (BIGT=84)
DEFINE (BIGU=85)
DEFINE (BIGV=86)
DEFINE (BIGW=87)
DEFINE (BIGX=88)
DEFINE (BIGY=89)
DEFINE (BIGZ=90)
DEFINE (BLANK=32)
DEFINE (CARRIAGERETURN=13)
DEFINE (CHARFUNC=LOGICAL)	#SYKES 3OCT76 !!!
DEFINE (COLON=58)
DEFINE (COMMA=44)
MACRO  (DECREMENT,$=$-1)
DEFINE (DIG0=48)
DEFINE (DIG1=49)
DEFINE (DIG2=50)
DEFINE (DIG3=51)
DEFINE (DIG4=52)
DEFINE (DIG5=53)
DEFINE (DIG6=54)
DEFINE (DIG7=55)
DEFINE (DIG8=56)
DEFINE (DIG9=57)
DEFINE (DIGIT=-20)
DEFINE (DOLLAR=36)
DEFINE (DQUOTE=34)
DEFINE (DUMMYSIZE=1)	#LENGTH OF ARGUMENT ARRAYS IN SUBROUTINES
DEFINE (ELSEIF=ELSE IF)
DEFINE (EQUALS=61)
DEFINE (EOF=-3)
DEFINE (EOS=0)		#END-OF-STRING   !!!!
DEFINE (FORMFEED=12)
DEFINE (FUNCSIZE=*1)		#SYKES3OCT76!!!
DEFINE (GREATER=62)
DEFINE (HUGE=32767)
MACRO  (INCREMENT,$=$+1)
DEFINE (LBRACE=123)
DEFINE (LBRACK=91)
DEFINE (LESS=60)
DEFINE (LETTER=-30)
DEFINE (LPAREN=40)
DEFINE (MINUS=45)
DEFINE (NCHARS=33) 	# NUMBER OF SPECIAL CHARACTERS
DEFINE (NEWLINE=10)
DEFINE (NO=0)
DEFINE (PERCENT=37)
DEFINE (PERIOD=46)
DEFINE (PLUS=43)
DEFINE (QMARK=63)
DEFINE (RBRACE=125)
DEFINE (RBRACK=93)
DEFINE (RPAREN=41)
DEFINE (SEMICOL=59)
DEFINE (SHARP=35)
DEFINE (SLASH=47)
DEFINE (SQUOTE=39)
DEFINE (STAR=42)
DEFINE (TAB=9)
DEFINE (YES=1)
DEFINE (CHARACTER=LOGICAL*1)		#!!!
DEFINE (UNDERLINE=95)
#