functor KeywordFUN() =
struct
val alphas = 
[
    "if", "goto", "t", "f"
]
and symbols = 
[
    "!=",
    "<=",
    "<",
    ">=",
    ">",
    ":=",
    "+",
    "*",
    "/",
    "-",
    "(",
    ")",
    "==",
    "~"
]
end ;