token                     yydescr           yycat             outtok  yylval
                                          SEP               2       0
                          EOF               EOF               -1      0
let                       RESERVED ID       ID                275     0
!                         DEFINED OPR       OPR               292     53
==                        RESERVED OPR      OPR               288     0
func                      RESERVED ID       ID                269     0
[                         [                 SEP               91      0
n                         DEFINED ID        ID                291     54
:                         RESERVED OPR      OPR               290     0
val                       RESERVED ID       ID                284     0
Short                     DEFINED ID        ID                291     39
]                         ]                 SEP               93      0
{                         {                 SEP               123     0
if                        RESERVED ID       ID                272     0
n                         DEFINED ID        ID                291     54
>                         DEFINED OPR       OPR               292     12
0                         0                 NUM               295     0
==>                       RESERVED OPR      OPR               287     0
Long                      DEFINED ID        ID                291     55
$                         $                 SEP               36      0
In                        DEFINED ID        ID                291     34
[                         [                 SEP               91      0
n                         DEFINED ID        ID                291     54
]                         ]                 SEP               93      0
*                         DEFINED OPR       OPR               292     15
(                         (                 SEP               40      0
(                         (                 SEP               40      0
n                         DEFINED ID        ID                291     54
-                         DEFINED OPR       OPR               292     14
1                         1                 NUM               295     1
)                         )                 SEP               41      0
!                         DEFINED OPR       OPR               292     53
)                         )                 SEP               41      0
#                         #                 SEP               35      0
n                         DEFINED ID        ID                291     54
=                         DEFINED OPR       OPR               292     56
0                         0                 NUM               295     0
==>                       RESERVED OPR      OPR               287     0
Long                      DEFINED ID        ID                291     55
$                         $                 SEP               36      0
1                         1                 NUM               295     1
fi                        RESERVED ID       ID                267     0
}                         }                 SEP               125     0
;                         ;                 SEP               59      0
x                         DEFINED ID        ID                291     57
==                        RESERVED OPR      OPR               288     0
Short                     DEFINED ID        ID                291     39
$                         $                 SEP               36      0
New                       DEFINED ID        ID                291     23
[                         [                 SEP               91      0
]                         ]                 SEP               93      0
;                         ;                 SEP               59      0
in                        RESERVED ID       ID                273     0
do                        RESERVED ID       ID                261     0
(                         (                 SEP               40      0
put                       DEFINED ID        ID                291     42
[                         [                 SEP               91      0
"Factorial of?"           Dbl Quote         Dbl Quote         294     Factorial of?
]                         ]                 SEP               93      0
;                         ;                 SEP               59      0
x                         DEFINED ID        ID                291     57
:=                        DEFINED OPR       OPR               292     4
get                       DEFINED ID        ID                291     58
[                         [                 SEP               91      0
FS                        DEFINED ID        ID                291     59
]                         ]                 SEP               93      0
)                         )                 SEP               41      0
>=                        DEFINED OPR       OPR               292     60
0                         0                 NUM               295     0
==>                       RESERVED OPR      OPR               287     0
put                       DEFINED ID        ID                291     42
[                         [                 SEP               91      0
x                         DEFINED ID        ID                291     57
!                         DEFINED OPR       OPR               292     53
]                         ]                 SEP               93      0
;                         ;                 SEP               59      0
put                       DEFINED ID        ID                291     42
[                         [                 SEP               91      0
"
"                       Dbl Quote         Dbl Quote         294     

]                         ]                 SEP               93      0
od                        RESERVED ID       ID                277     0
ni                        RESERVED ID       ID                276     0
                          EOF               EOF               -1      0
