$func "*" s.Int1 s.Int2 = s.Int; ARITHM

$func "+" s.Int1 s.Int2 = s.Int; ARITHM

$func "-" s.Int1 s.Int2 = s.Int; ARITHM

$func? "/=" (e.Exp1)(e.Exp2) = ; COMPARE

$func? "<" (e.Exp1)(e.Exp2) = ; COMPARE

$func? "<=" (e.Exp1)(e.Exp2) = ; COMPARE

$func? "=" (e.Exp1)(e.Exp2) = ; COMPARE

$func? ">" (e.Exp1)(e.Exp2) = ; COMPARE

$func? ">=" (e.Exp1)(e.Exp2) = ; COMPARE

$func? s.Box = e.Exp; BOX

$func? APPLY s.Name e.Exp = e.Exp; APPLY

$func ARG s.Int = e.Arg; DOS

$func BIND s.Tab (e.Key) (e.Val) = ; TABLE

$func BOX e.Exp = s.Box; BOX

$func? BOX? e.Exp = ; CLASS

$func BYTES-TO-CHARS e.Char = e.Int; CONVERT

$func CHANNEL = s.Channel; STDIO

$func? CHANNEL? e.Exp = ; CLASS

$func? CHAR? e.Exp = ; CLASS

$func CHARS-TO-BYTES e.Int = e.Char; CONVERT

$func CLOSE-CHANNEL s.Channel = ; STDIO

$func COMPARE (e.Exp1)(e.Exp2) = s.Res; COMPARE

$func? DIGIT? e.Exp = ; CLASS

$func DIV s.Int1 s.Int2 = s.Quo; ARITHM

$func DIV-REM s.Int1 s.Int2 = s.Quo s.Rem; ARITHM

$func? DOMAIN s.Tab = e.KeyList ; TABLE

$func? EOF? s.Channel = ; STDIO

$func EXIT s.ReturnCode = ; DOS

$func? FUNC? e.Exp = ; CLASS

$func GCD s.Int1 s.Int2 = s.Gcd; ARITHM

$func GETENV e.VarName = e.Value; DOS

$func? IN-TABLE? s.Tab e.Key = ; TABLE

$func? INT? e.Exp = ; CLASS

$func? L s.Left e.Exp = t.SubTerm; ACCESS

$func? LEFT s.Left s.Len e.Exp = e.SubExp; ACCESS

$func LENGTH e.Exp = s.ExpLen; ACCESS

$func? LETTER? e.Exp = ; CLASS

$func? LOOKUP s.Tab e.Key = e.Val; TABLE

$func? MIDDLE s.Left s.Right e.Exp = e.SubExp; ACCESS

$func? OPEN-FILE s.Channel e.FileName s.Mode = ; STDIO

$func PRINT e.Expr = ; STDIO

$func PRINT! s.Channel e.Expr = ; STDIO

$func PRINTLN e.Expr = ; STDIO

$func PRINTLN! s.Channel e.Expr = ; STDIO

$func? R s.Right e.Exp = t.SubTerm; ACCESS

$func? READ = t.Term; STDIO

$func? READ! s.Channel = t.Term; STDIO

$func? READ-CHAR = s.Char; STDIO

$func? READ-CHAR! s.Channel = s.Char; STDIO

$func? READ-LINE = e.Char; STDIO

$func? READ-LINE! s.Channel = e.Char; STDIO

$func REM s.Int1 s.Int2 = s.Rem; ARITHM

$func REPLACE-TABLE s.TargetTab s.SourceTab = ; TABLE

$func? RIGHT s.Right s.Len e.Exp = e.SubExp; ACCESS

$func STORE s.Box e.Exp = ; BOX

$func STRING e.Source = s.String; STRING

$func STRING-FILL s.String s.Fill = ; STRING

$func STRING-INIT s.String s.Len s.Fill = ; STRING

$func STRING-LENGTH s.String = s.Len; STRING

$func STRING-REF s.String s.Index = s.Char; STRING

$func STRING-REPLACE s.String e.Source = ; STRING

$func STRING-SET s.String s.Index s.Char = ; STRING

$func? STRING? e.Exp = ; CLASS

$func SUBSTRING s.String s.Index s.Len = s.NewString; STRING

$func SUBSTRING-FILL s.String s.Index s.Len s.Fill =; STRING

$func SUBVECTOR s.Vector s.Ind s.Len = s.Vector; VECTOR

$func SUBVECTOR-FILL s.Vector s.Index s.Len e.Fill =; VECTOR

$func TABLE = s.Tab; TABLE

$func TABLE-COPY s.Tab = s.TabCopy ; TABLE

$func? TABLE? e.Exp = ; CLASS

$func TIME = e.String; DOS

$func TO-CHARS e.Exp = e.Char; CONVERT

$func? TO-INT e.Char = s.Int; CONVERT

$func TO-LOWER e.Char = e.Char; CONVERT

$func TO-UPPER e.Char = e.Char; CONVERT

$func TO-WORD e.Char = s.Word; CONVERT

$func UNBIND s.Tab e.Key = ; TABLE

$func VECTOR e.Source = s.Vector; VECTOR

$func VECTOR-FILL s.Vector e.Fill = ; VECTOR

$func VECTOR-INIT s.Vector s.Len e.Fill = ; VECTOR

$func VECTOR-LENGTH s.Vector = s.Len; VECTOR

$func VECTOR-REF s.Vector s.Index = e.Exp; VECTOR

$func VECTOR-REPLACE s.Vector e.Source = ; VECTOR

$func VECTOR-SET s.Vector s.Index e.Exp = ; VECTOR

$func VECTOR-TO-EXP s.Vector = e.Exp; VECTOR

$func? VECTOR? e.Exp = ; CLASS

$func? WORD? e.Exp = ; CLASS

$func WRITE e.Expr = ; STDIO

$func WRITE! s.Channel e.Expr = ; STDIO

$func WRITELN e.Expr = ; STDIO

$func WRITELN! s.Channel e.Expr = ; STDIO