[ [ ( CommentTok , "-- life.lua" ) ]
, [ ( CommentTok
    , "-- original by Dave Bollinger <DBollinger@compuserve.com> posted to lua-l"
    )
  ]
, [ ( CommentTok
    , "-- modified to use ANSI terminal escape sequences"
    )
  ]
, [ ( CommentTok , "-- modified to use for instead of while" ) ]
, []
, [ ( KeywordTok , "local" )
  , ( NormalTok , " write" )
  , ( OperatorTok , "=" )
  , ( FunctionTok , "io.write" )
  ]
, []
, [ ( ConstantTok , "ALIVE" )
  , ( OperatorTok , "=" )
  , ( StringTok , "\"\165\"" )
  , ( NormalTok , "\t" )
  , ( ConstantTok , "DEAD" )
  , ( OperatorTok , "=" )
  , ( StringTok , "\"\254\"" )
  ]
, [ ( ConstantTok , "ALIVE" )
  , ( OperatorTok , "=" )
  , ( StringTok , "\"O\"" )
  , ( NormalTok , "\t" )
  , ( ConstantTok , "DEAD" )
  , ( OperatorTok , "=" )
  , ( StringTok , "\"-\"" )
  ]
, []
, [ ( KeywordTok , "function" )
  , ( NormalTok , " delay" )
  , ( OperatorTok , "()" )
  , ( NormalTok , " " )
  , ( CommentTok , "-- " )
  , ( AlertTok , "NOTE" )
  , ( CommentTok , ": SYSTEM-DEPENDENT, adjust as necessary" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " i" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "10000" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "do" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "end" )
  ]
, [ ( NormalTok , "  " )
  , ( CommentTok
    , "-- local i=os.clock()+1 while(os.clock()<i) do end"
    )
  ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( KeywordTok , "function" )
  , ( NormalTok , " ARRAY2D" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " t " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "h" )
  , ( OperatorTok , "}" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " y" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "    t" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{}" )
  ]
, [ ( NormalTok , "    " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " x" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "w " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "      t" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "]=" )
  , ( DecValTok , "0" )
  ]
, [ ( NormalTok , "    " ) , ( ControlFlowTok , "end" ) ]
, [ ( NormalTok , "  " ) , ( ControlFlowTok , "end" ) ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "return" )
  , ( NormalTok , " t" )
  ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( ConstantTok , "_CELLS" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{}" )
  ]
, []
, [ ( CommentTok
    , "-- give birth to a \"shape\" within the cell array"
    )
  ]
, [ ( KeywordTok , "function" )
  , ( NormalTok , " " )
  , ( ConstantTok , "_CELLS" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "spawn" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "shape" )
  , ( OperatorTok , "," )
  , ( NormalTok , "left" )
  , ( OperatorTok , "," )
  , ( NormalTok , "top" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " y" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( NormalTok , "shape" )
  , ( OperatorTok , "." )
  , ( NormalTok , "h" )
  , ( OperatorTok , "-" )
  , ( DecValTok , "1" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "    " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " x" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( NormalTok , "shape" )
  , ( OperatorTok , "." )
  , ( NormalTok , "w" )
  , ( OperatorTok , "-" )
  , ( DecValTok , "1" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "      self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "top" )
  , ( OperatorTok , "+" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "left" )
  , ( OperatorTok , "+" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " shape" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "*" )
  , ( NormalTok , "shape" )
  , ( OperatorTok , "." )
  , ( NormalTok , "w" )
  , ( OperatorTok , "+" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "+" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "]" )
  ]
, [ ( NormalTok , "    " ) , ( ControlFlowTok , "end" ) ]
, [ ( NormalTok , "  " ) , ( ControlFlowTok , "end" ) ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( CommentTok
    , "-- run the CA and produce the next generation"
    )
  ]
, [ ( KeywordTok , "function" )
  , ( NormalTok , " " )
  , ( ConstantTok , "_CELLS" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "evolve" )
  , ( OperatorTok , "(" )
  , ( FunctionTok , "next" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " ym1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "y" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yi" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "h" )
  , ( OperatorTok , "-" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "h" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "h" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "while" )
  , ( NormalTok , " yi " )
  , ( OperatorTok , ">" )
  , ( NormalTok , " " )
  , ( DecValTok , "0" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "    " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " xm1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "x" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xi" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "w" )
  , ( OperatorTok , "-" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "w" )
  ]
, [ ( NormalTok , "    " )
  , ( ControlFlowTok , "while" )
  , ( NormalTok , " xi " )
  , ( OperatorTok , ">" )
  , ( NormalTok , " " )
  , ( DecValTok , "0" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "      " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " sum " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "ym1" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "xm1" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "ym1" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "ym1" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  ]
, [ ( NormalTok , "                  self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "xm1" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  ]
, [ ( NormalTok , "                  self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "xm1" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "+" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "]" )
  ]
, [ ( NormalTok , "      " )
  , ( FunctionTok , "next" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "]" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "((" )
  , ( NormalTok , "sum" )
  , ( OperatorTok , "==" )
  , ( DecValTok , "2" )
  , ( OperatorTok , ")" )
  , ( NormalTok , " " )
  , ( KeywordTok , "and" )
  , ( NormalTok , " self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "])" )
  , ( NormalTok , " " )
  , ( KeywordTok , "or" )
  , ( NormalTok , " " )
  , ( OperatorTok , "((" )
  , ( NormalTok , "sum" )
  , ( OperatorTok , "==" )
  , ( DecValTok , "3" )
  , ( OperatorTok , ")" )
  , ( NormalTok , " " )
  , ( KeywordTok , "and" )
  , ( NormalTok , " " )
  , ( DecValTok , "1" )
  , ( OperatorTok , ")" )
  , ( NormalTok , " " )
  , ( KeywordTok , "or" )
  , ( NormalTok , " " )
  , ( DecValTok , "0" )
  ]
, [ ( NormalTok , "      xm1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "x" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xi " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " x" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xp1" )
  , ( OperatorTok , "+" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "xi" )
  , ( OperatorTok , "-" )
  , ( DecValTok , "1" )
  ]
, [ ( NormalTok , "    " ) , ( ControlFlowTok , "end" ) ]
, [ ( NormalTok , "    ym1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "y" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yi " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " y" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yp1" )
  , ( OperatorTok , "+" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "yi" )
  , ( OperatorTok , "-" )
  , ( DecValTok , "1" )
  ]
, [ ( NormalTok , "  " ) , ( ControlFlowTok , "end" ) ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( CommentTok , "-- output the array to screen" ) ]
, [ ( KeywordTok , "function" )
  , ( NormalTok , " " )
  , ( ConstantTok , "_CELLS" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "draw" )
  , ( OperatorTok , "()" )
  ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " out" )
  , ( OperatorTok , "=" )
  , ( StringTok , "\"\"" )
  , ( NormalTok , " " )
  , ( CommentTok , "-- accumulate to reduce flicker" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " y" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "h " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "   " )
  , ( ControlFlowTok , "for" )
  , ( NormalTok , " x" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( NormalTok , "self" )
  , ( OperatorTok , "." )
  , ( NormalTok , "w " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "      out" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "out" )
  , ( OperatorTok , "..(((" )
  , ( NormalTok , "self" )
  , ( OperatorTok , "[" )
  , ( NormalTok , "y" )
  , ( OperatorTok , "][" )
  , ( NormalTok , "x" )
  , ( OperatorTok , "]>" )
  , ( DecValTok , "0" )
  , ( OperatorTok , ")" )
  , ( NormalTok , " " )
  , ( KeywordTok , "and" )
  , ( NormalTok , " " )
  , ( ConstantTok , "ALIVE" )
  , ( OperatorTok , ")" )
  , ( NormalTok , " " )
  , ( KeywordTok , "or" )
  , ( NormalTok , " " )
  , ( ConstantTok , "DEAD" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "    " ) , ( ControlFlowTok , "end" ) ]
, [ ( NormalTok , "    out" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "out" )
  , ( OperatorTok , ".." )
  , ( StringTok , "\"" )
  , ( SpecialCharTok , "\\n" )
  , ( StringTok , "\"" )
  ]
, [ ( NormalTok , "  " ) , ( ControlFlowTok , "end" ) ]
, [ ( NormalTok , "  " )
  , ( FunctionTok , "write" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "out" )
  , ( OperatorTok , ")" )
  ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( CommentTok , "-- constructor" ) ]
, [ ( KeywordTok , "function" )
  , ( NormalTok , " CELLS" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " c " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " ARRAY2D" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  c" )
  , ( OperatorTok , "." )
  , ( NormalTok , "spawn " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( ConstantTok , "_CELLS" )
  , ( OperatorTok , "." )
  , ( NormalTok , "spawn" )
  ]
, [ ( NormalTok , "  c" )
  , ( OperatorTok , "." )
  , ( NormalTok , "evolve " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( ConstantTok , "_CELLS" )
  , ( OperatorTok , "." )
  , ( NormalTok , "evolve" )
  ]
, [ ( NormalTok , "  c" )
  , ( OperatorTok , "." )
  , ( NormalTok , "draw " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( ConstantTok , "_CELLS" )
  , ( OperatorTok , "." )
  , ( NormalTok , "draw" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "return" )
  , ( NormalTok , " c" )
  ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( CommentTok , "--" ) ]
, [ ( CommentTok
    , "-- shapes suitable for use with spawn() above"
    )
  ]
, [ ( CommentTok , "--" ) ]
, [ ( ConstantTok , "HEART" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{" )
  , ( NormalTok , " " )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , ";" )
  , ( NormalTok , " w" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "3" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "3" )
  , ( NormalTok , " " )
  , ( OperatorTok , "}" )
  ]
, [ ( ConstantTok , "GLIDER" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{" )
  , ( NormalTok , " " )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , ";" )
  , ( NormalTok , " w" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "3" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "3" )
  , ( NormalTok , " " )
  , ( OperatorTok , "}" )
  ]
, [ ( ConstantTok , "EXPLODE" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{" )
  , ( NormalTok , " " )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , ";" )
  , ( NormalTok , " w" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "3" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "4" )
  , ( NormalTok , " " )
  , ( OperatorTok , "}" )
  ]
, [ ( ConstantTok , "FISH" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{" )
  , ( NormalTok , " " )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , ";" )
  , ( NormalTok , " w" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "5" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "4" )
  , ( NormalTok , " " )
  , ( OperatorTok , "}" )
  ]
, [ ( ConstantTok , "BUTTERFLY" )
  , ( NormalTok , " " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " " )
  , ( OperatorTok , "{" )
  , ( NormalTok , " " )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "0" )
  , ( OperatorTok , "," )
  , ( DecValTok , "1" )
  , ( OperatorTok , ";" )
  , ( NormalTok , " w" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "5" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "5" )
  , ( NormalTok , " " )
  , ( OperatorTok , "}" )
  ]
, []
, [ ( CommentTok , "-- the main routine" ) ]
, [ ( KeywordTok , "function" )
  , ( NormalTok , " LIFE" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  " )
  , ( CommentTok , "-- create two arrays" )
  ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " thisgen " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " CELLS" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " nextgen " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " CELLS" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "w" )
  , ( OperatorTok , "," )
  , ( NormalTok , "h" )
  , ( OperatorTok , ")" )
  ]
, []
, [ ( NormalTok , "  " ) , ( CommentTok , "-- create some life" ) ]
, [ ( NormalTok , "  " )
  , ( CommentTok
    , "-- about 1000 generations of fun, then a glider steady-state"
    )
  ]
, [ ( NormalTok , "  thisgen" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "spawn" )
  , ( OperatorTok , "(" )
  , ( ConstantTok , "GLIDER" )
  , ( OperatorTok , "," )
  , ( DecValTok , "5" )
  , ( OperatorTok , "," )
  , ( DecValTok , "4" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  thisgen" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "spawn" )
  , ( OperatorTok , "(" )
  , ( ConstantTok , "EXPLODE" )
  , ( OperatorTok , "," )
  , ( DecValTok , "25" )
  , ( OperatorTok , "," )
  , ( DecValTok , "10" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "  thisgen" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "spawn" )
  , ( OperatorTok , "(" )
  , ( ConstantTok , "FISH" )
  , ( OperatorTok , "," )
  , ( DecValTok , "4" )
  , ( OperatorTok , "," )
  , ( DecValTok , "12" )
  , ( OperatorTok , ")" )
  ]
, []
, [ ( NormalTok , "  " ) , ( CommentTok , "-- run until break" ) ]
, [ ( NormalTok , "  " )
  , ( KeywordTok , "local" )
  , ( NormalTok , " gen" )
  , ( OperatorTok , "=" )
  , ( DecValTok , "1" )
  ]
, [ ( NormalTok , "  " )
  , ( FunctionTok , "write" )
  , ( OperatorTok , "(" )
  , ( StringTok , "\"" )
  , ( SpecialCharTok , "\\027" )
  , ( StringTok , "[2J\"" )
  , ( OperatorTok , ")" )
  , ( NormalTok , "\t" )
  , ( CommentTok , "-- ANSI clear screen" )
  ]
, [ ( NormalTok , "  " )
  , ( ControlFlowTok , "while" )
  , ( NormalTok , " " )
  , ( DecValTok , "1" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "do" )
  ]
, [ ( NormalTok , "    thisgen" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "evolve" )
  , ( OperatorTok , "(" )
  , ( NormalTok , "nextgen" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "    thisgen" )
  , ( OperatorTok , "," )
  , ( NormalTok , "nextgen " )
  , ( OperatorTok , "=" )
  , ( NormalTok , " nextgen" )
  , ( OperatorTok , "," )
  , ( NormalTok , "thisgen" )
  ]
, [ ( NormalTok , "    " )
  , ( FunctionTok , "write" )
  , ( OperatorTok , "(" )
  , ( StringTok , "\"" )
  , ( SpecialCharTok , "\\027" )
  , ( StringTok , "[H\"" )
  , ( OperatorTok , ")" )
  , ( NormalTok , "\t" )
  , ( CommentTok , "-- ANSI home cursor" )
  ]
, [ ( NormalTok , "    thisgen" )
  , ( OperatorTok , ":" )
  , ( NormalTok , "draw" )
  , ( OperatorTok , "()" )
  ]
, [ ( NormalTok , "    " )
  , ( FunctionTok , "write" )
  , ( OperatorTok , "(" )
  , ( StringTok , "\"Life - generation \"" )
  , ( OperatorTok , "," )
  , ( NormalTok , "gen" )
  , ( OperatorTok , "," )
  , ( StringTok , "\"" )
  , ( SpecialCharTok , "\\n" )
  , ( StringTok , "\"" )
  , ( OperatorTok , ")" )
  ]
, [ ( NormalTok , "    gen" )
  , ( OperatorTok , "=" )
  , ( NormalTok , "gen" )
  , ( OperatorTok , "+" )
  , ( DecValTok , "1" )
  ]
, [ ( NormalTok , "    " )
  , ( ControlFlowTok , "if" )
  , ( NormalTok , " gen" )
  , ( OperatorTok , ">" )
  , ( DecValTok , "2000" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "then" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "break" )
  , ( NormalTok , " " )
  , ( ControlFlowTok , "end" )
  ]
, [ ( NormalTok , "    " )
  , ( CommentTok , "--delay()\t\t-- no delay" )
  ]
, [ ( NormalTok , "  " ) , ( ControlFlowTok , "end" ) ]
, [ ( KeywordTok , "end" ) ]
, []
, [ ( NormalTok , "LIFE" )
  , ( OperatorTok , "(" )
  , ( DecValTok , "40" )
  , ( OperatorTok , "," )
  , ( DecValTok , "20" )
  , ( OperatorTok , ")" )
  ]
]