define(ACCENT,96)
define(ALPHA,-100)
define(AMPER,38)
define(AND,38)
define(ANDWAIT,51)
define(APPEND,4)
define(ARB,1)
define(ARGBUFSIZE,512)
define(ASCII,12)
define(ATSIGN,64)
define(BACKGR,LETB)
define(BACKSLASH,92)
define(BACKSPACE,8)
define(BANG,33)
define(BAR,124)
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(BINARY,60)
define(BLANK,32)
define(CARET,94)
define(CMDIN,4)
define(COLON,58)
define(COMMA,44)
define(CR,13)
define(DASH,45)
define(DELETEF,'D')
define(DEVSIZE,6)
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,2)
define(DOLLAR,36)
define(DQUOTE,34)
define(EOF,-10)
define(EOR,-973)
define(EOS,0)
define(EQUALS,61)
define(ERR,-1)
define(ERROUT,3)   
define(ESCAPE,ATSIGN)
define(ESCCHAR,27)
define(EXTEND,'A')
define(EXTSIZE,5)
define(FILENAMESIZE,34)
define(FORTRAN,'F')
define(GRAVE,ACCENT)
define(GREATER,62)
define(LBRACE,123)
define(LBRACK,91)
define(LESS,60)
define(LETA,97)
define(LETB,98)
define(LETC,99)
define(LETD,100)
define(LETE,101)
define(LETF,102)
define(LETG,103)
define(LETH,104)
define(LETI,105)
define(LETJ,106)
define(LETK,107)
define(LETL,108)
define(LETM,109)
define(LETN,110)
define(LETO,111)
define(LETP,112)
define(LETQ,113)
define(LETR,114)
define(LETS,115)
define(LETT,116)
define(LETTER,1)
define(LETU,117)
define(LETV,118)
define(LETW,119)
define(LETX,120)
define(LETY,121)
define(LETZ,122)
define(LF,10)
define(LOCAL,6)
define(LPAREN,40)
define(MAXCARD,132)   # max card size
define(MAXCHARS,10)   # maximum field for integer strings
define(MAXLINE,134)   # must be 2 more than MAXCARD
define(MINUS,45)
define(NAMESIZE,10)
define(NCHARS,33)
define(NEWLINE,13)
define(NO,0)
define(NODESIZE,1)
define(NOT,TILDE)
define(NOWAIT,LETN)
define(OK,0)
define(OR,BAR)
define(ORWAIT,50)
define(PERCENT,37)
define(PERIOD,46)
define(PIDSIZE,9)
define(PLUS,43)
define(PRINTER,6)  # must be highest lu for standard files
define(PRINTF,'P')
define(QMARK,63)
define(RBRACE,125)
define(RBRACK,93)
define(READ,'R')
define(READDELETE,'X')
define(READONLY,'R')
define(READWRITE,'W')
define(RPAREN,41)
define(SAVEF,'S')
define(SEMICOL,59)
define(SHARP,35)
define(SLASH,47)
define(SQUOTE,39)
define(STAR,42)
define(STDIN,5)
define(STDOUT,2)
define(TAB,9)
define(TERMSGSIZE,21)
define(TILDE,126)
define(UICSIZE,10)
define(UNDERLINE,95)
define(WAIT,LETW)
define(WRITE,'W')
define(YES,1)
define(abs,iabs)
define(andif,if)
define(character,byte)
define(elseif,else if)
define(max,max0)
define(min,min0)