and, or (Boolean ops).

"not not" serves as a kind of type-checking identity function. "not"
will error out on non-Boolean values, or the absence of a second arg.
This commit is contained in:
Simon Forman 2023-02-09 07:52:50 -08:00
parent 66f47f8e36
commit 101a0241d3
6 changed files with 376 additions and 351 deletions

View File

@ -14,6 +14,8 @@ struct dict_entry;
"<>", def_neq
"<=", def_le
">=", def_ge
"&", def_and
"|", def_or
"%", tdiv_r
mod, tdiv_r
*, mul

View File

@ -19,6 +19,8 @@ struct dict_entry;
"<>", def_neq
"<=", def_le
">=", def_ge
"&", def_and
"|", def_or
"%", tdiv_r
mod, tdiv_r
*, mul
@ -168,3 +170,5 @@ _map0, def__map0
_map1, def__map1
_map2, def__map2
xor, def_xor
and, def_and
or, def_or

View File

@ -134,6 +134,8 @@ JoyList def__map0_body;
JoyList def__map1_body;
JoyList def__map2_body;
JoyList def_xor_body;
JoyList def_and_body;
JoyList def_or_body;
/*
@ -266,6 +268,8 @@ init_defs(void)
def__map1_body = text_to_expression("stackd shift");
def__map2_body = text_to_expression("[infrst] cons dipd roll< swons");
def_xor_body = text_to_expression("[not not] [not] branch");
def_and_body = text_to_expression("[pop false] [not not] branch");
def_or_body = text_to_expression("[not not] [pop true] branch");
}
@ -395,3 +399,5 @@ void def__map0(__attribute__((unused)) JoyListPtr stack, JoyListPtr expression)
void def__map1(__attribute__((unused)) JoyListPtr stack, JoyListPtr expression) { push_quote_onto_expression(def__map1_body, expression); }
void def__map2(__attribute__((unused)) JoyListPtr stack, JoyListPtr expression) { push_quote_onto_expression(def__map2_body, expression); }
void def_xor(__attribute__((unused)) JoyListPtr stack, JoyListPtr expression) { push_quote_onto_expression(def_xor_body, expression); }
void def_and(__attribute__((unused)) JoyListPtr stack, JoyListPtr expression) { push_quote_onto_expression(def_and_body, expression); }
void def_or(__attribute__((unused)) JoyListPtr stack, JoyListPtr expression) { push_quote_onto_expression(def_or_body, expression); }

View File

@ -125,3 +125,5 @@ void def__map0(JoyListPtr stack, JoyListPtr expression);
void def__map1(JoyListPtr stack, JoyListPtr expression);
void def__map2(JoyListPtr stack, JoyListPtr expression);
void def_xor(JoyListPtr stack, JoyListPtr expression);
void def_and(JoyListPtr stack, JoyListPtr expression);
void def_or(JoyListPtr stack, JoyListPtr expression);

View File

@ -119,4 +119,6 @@ _mape popd reverse
_map0 [_map1] dipd _map2
_map1 stackd shift
_map2 [infrst] cons dipd roll< swons
xor [not not] [not] branch
xor [not not] [not] branch
and [pop false] [not not] branch
or [not not] [pop true] branch

View File

@ -36,7 +36,7 @@
#line 13 "KEYWORDS.txt"
struct dict_entry;
#include <string.h>
/* maximum key range = 304, duplicates = 0 */
/* maximum key range = 294, duplicates = 0 */
#ifdef __GNUC__
__inline
@ -50,32 +50,32 @@ keyword_hash (register const char *str, register size_t len)
{
static const unsigned short asso_values[] =
{
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 5, 305, 305, 305, 80, 10, 305,
305, 305, 60, 75, 305, 25, 305, 30, 55, 65,
15, 40, 305, 305, 305, 305, 305, 305, 305, 305,
10, 105, 0, 45, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 20, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 70, 305, 60, 70, 0,
5, 30, 40, 100, 40, 15, 305, 5, 40, 60,
0, 15, 0, 85, 70, 30, 25, 0, 115, 80,
20, 5, 20, 40, 0, 0, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305, 305, 305, 305, 305,
305, 305, 305, 305, 305, 305
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 140, 295, 295, 295, 105, 90, 295,
295, 295, 100, 85, 295, 70, 295, 30, 15, 45,
35, 20, 295, 295, 295, 295, 295, 295, 295, 295,
125, 25, 0, 80, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 0, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 15, 295, 100, 10, 0,
5, 30, 40, 110, 5, 15, 295, 5, 40, 60,
0, 15, 0, 85, 70, 30, 25, 0, 95, 35,
20, 85, 0, 0, 75, 0, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295, 295, 295, 295, 295,
295, 295, 295, 295, 295, 295
};
register unsigned int hval = len;
@ -99,11 +99,11 @@ in_word_set (register const char *str, register size_t len)
{
enum
{
TOTAL_KEYWORDS = 156,
TOTAL_KEYWORDS = 160,
MIN_WORD_LENGTH = 1,
MAX_WORD_LENGTH = 14,
MIN_HASH_VALUE = 1,
MAX_HASH_VALUE = 304
MAX_HASH_VALUE = 294
};
static const struct dict_entry wordlist[] =
@ -111,377 +111,386 @@ in_word_set (register const char *str, register size_t len)
{""},
#line 16 "KEYWORDS.txt"
{">", def_gt},
#line 59 "KEYWORDS.txt"
{"||", def_VERTICAL_LINE_VERTICAL_LINE},
{""}, {""}, {""}, {""}, {""},
#line 39 "KEYWORDS.txt"
{""}, {""}, {""}, {""}, {""}, {""},
#line 41 "KEYWORDS.txt"
{"dup", dup},
{""}, {""},
#line 87 "KEYWORDS.txt"
#line 89 "KEYWORDS.txt"
{"dupdip", def_dupdip},
#line 19 "KEYWORDS.txt"
{"<>", def_neq},
{""},
#line 85 "KEYWORDS.txt"
{""}, {""},
#line 87 "KEYWORDS.txt"
{"dupd", def_dupd},
#line 86 "KEYWORDS.txt"
#line 88 "KEYWORDS.txt"
{"dupdd", def_dupdd},
{""},
#line 88 "KEYWORDS.txt"
#line 90 "KEYWORDS.txt"
{"dupdipd", def_dupdipd},
#line 44 "KEYWORDS.txt"
#line 46 "KEYWORDS.txt"
{"pop", pop},
{""},
#line 112 "KEYWORDS.txt"
{"popop", def_popop},
#line 17 "KEYWORDS.txt"
{"<", def_lt},
#line 113 "KEYWORDS.txt"
{"popopop", def_popopop},
#line 38 "KEYWORDS.txt"
{"dip", dip},
#line 110 "KEYWORDS.txt"
{"popd", def_popd},
#line 111 "KEYWORDS.txt"
{"popdd", def_popdd},
#line 114 "KEYWORDS.txt"
{"popopd", def_popopd},
{"popop", def_popop},
#line 73 "KEYWORDS.txt"
{"b", def_b},
#line 115 "KEYWORDS.txt"
{"popopop", def_popopop},
#line 40 "KEYWORDS.txt"
{"dip", dip},
#line 112 "KEYWORDS.txt"
{"popd", def_popd},
#line 113 "KEYWORDS.txt"
{"popdd", def_popdd},
#line 116 "KEYWORDS.txt"
{"popopd", def_popopd},
#line 117 "KEYWORDS.txt"
{"popopdd", def_popopdd},
{""},
#line 80 "KEYWORDS.txt"
#line 82 "KEYWORDS.txt"
{"dipd", def_dipd},
{""},
#line 41 "KEYWORDS.txt"
#line 43 "KEYWORDS.txt"
{"i", i_joyfunc},
#line 57 "KEYWORDS.txt"
{"&&", def_AMPERSAND_AMPERSAND},
{""},
#line 147 "KEYWORDS.txt"
{""}, {""},
#line 149 "KEYWORDS.txt"
{"tuck", def_tuck},
{""},
#line 149 "KEYWORDS.txt"
#line 151 "KEYWORDS.txt"
{"uncons", def_uncons},
#line 73 "KEYWORDS.txt"
#line 75 "KEYWORDS.txt"
{"ccccons", def_ccccons},
{""},
#line 77 "KEYWORDS.txt"
#line 79 "KEYWORDS.txt"
{"codi", def_codi},
{""},
#line 155 "KEYWORDS.txt"
#line 157 "KEYWORDS.txt"
{"x", def_x},
#line 152 "KEYWORDS.txt"
#line 154 "KEYWORDS.txt"
{"unstack", def_unstack},
#line 78 "KEYWORDS.txt"
#line 80 "KEYWORDS.txt"
{"codireco", def_codireco},
#line 150 "KEYWORDS.txt"
#line 152 "KEYWORDS.txt"
{"unit", def_unit},
{""},
#line 37 "KEYWORDS.txt"
#line 39 "KEYWORDS.txt"
{"concat", concat},
#line 99 "KEYWORDS.txt"
#line 101 "KEYWORDS.txt"
{"ii", def_ii},
{""},
#line 36 "KEYWORDS.txt"
#line 38 "KEYWORDS.txt"
{"cons", cons},
#line 74 "KEYWORDS.txt"
{"ccons", def_ccons},
#line 28 "KEYWORDS.txt"
{"-", sub},
#line 106 "KEYWORDS.txt"
{"nullary", def_nullary},
#line 61 "KEYWORDS.txt"
{"<{}", def_LESS_THAN_SIGN_LEFT_CURLY_BRACKET_RIGHT_CURLY_BRACKET},
#line 79 "KEYWORDS.txt"
{"dinfrirst", def_dinfrirst},
{""}, {""},
#line 60 "KEYWORDS.txt"
{"!-", def_EXCLAMATION_MARK_HYPHEN_MINUS},
{""},
#line 76 "KEYWORDS.txt"
{"clop", def_clop},
#line 105 "KEYWORDS.txt"
{"nulco", def_nulco},
#line 30 "KEYWORDS.txt"
{"/", tdiv_q},
#line 81 "KEYWORDS.txt"
{"disenstacken", def_disenstacken},
#line 35 "KEYWORDS.txt"
{"cmp", cmp_joyfunc},
#line 62 "KEYWORDS.txt"
{"<<{}", def_LESS_THAN_SIGN_LESS_THAN_SIGN_LEFT_CURLY_BRACKET_RIGHT_CURLY_BRACKET},
{""}, {""},
#line 153 "KEYWORDS.txt"
{"unswons", def_unswons},
#line 104 "KEYWORDS.txt"
{"not", def_not},
#line 89 "KEYWORDS.txt"
{"enstacken", def_enstacken},
#line 148 "KEYWORDS.txt"
{"unary", def_unary},
#line 128 "KEYWORDS.txt"
{"second", def_second},
{""},
#line 127 "KEYWORDS.txt"
{"run", def_run},
#line 43 "KEYWORDS.txt"
{"loop", loop},
#line 97 "KEYWORDS.txt"
{"hypot", def_hypot},
{""},
#line 55 "KEYWORDS.txt"
{"--", def_HYPHEN_MINUS_HYPHEN_MINUS},
#line 27 "KEYWORDS.txt"
{"add", add},
#line 66 "KEYWORDS.txt"
{"app2", def_app2},
{""},
#line 132 "KEYWORDS.txt"
{"spiral_next", def_spiral_next},
{""},
#line 42 "KEYWORDS.txt"
{"inscribe", inscribe},
#line 68 "KEYWORDS.txt"
{"appN", def_appN},
{""},
#line 101 "KEYWORDS.txt"
{"infrst", def_infrst},
{""},
#line 23 "KEYWORDS.txt"
{"mod", tdiv_r},
#line 156 "KEYWORDS.txt"
{"step", def_step},
#line 146 "KEYWORDS.txt"
{"third", def_third},
#line 56 "KEYWORDS.txt"
{"?", def_QUESTION_MARK},
#line 51 "KEYWORDS.txt"
{"lt", def_lt},
#line 138 "KEYWORDS.txt"
{"stuncons", def_stuncons},
#line 84 "KEYWORDS.txt"
{"drop", def_drop},
{""},
#line 72 "KEYWORDS.txt"
{"binary", def_binary},
#line 107 "KEYWORDS.txt"
{"of", def_of},
#line 151 "KEYWORDS.txt"
{"unquoted", def_unquoted},
#line 131 "KEYWORDS.txt"
{"size", def_size},
#line 130 "KEYWORDS.txt"
{"shunt", def_shunt},
#line 92 "KEYWORDS.txt"
{"fourth", def_fourth},
#line 53 "KEYWORDS.txt"
{"le", def_le},
#line 133 "KEYWORDS.txt"
{"split_at", def_split_at},
#line 67 "KEYWORDS.txt"
{"app3", def_app3},
#line 134 "KEYWORDS.txt"
{"split_list", def_split_list},
#line 75 "KEYWORDS.txt"
{"cleave", def_cleave},
#line 143 "KEYWORDS.txt"
{"tailrec", def_tailrec},
{""},
#line 137 "KEYWORDS.txt"
{"step_zero", def_step_zero},
{""},
#line 117 "KEYWORDS.txt"
{"quoted", def_quoted},
#line 69 "KEYWORDS.txt"
{"at", def_at},
#line 93 "KEYWORDS.txt"
{"gcd", def_gcd},
#line 98 "KEYWORDS.txt"
{"ifte", def_ifte},
#line 129 "KEYWORDS.txt"
{"shift", def_shift},
{""},
#line 116 "KEYWORDS.txt"
{"product", def_product},
{""},
#line 120 "KEYWORDS.txt"
{"reco", def_reco},
#line 100 "KEYWORDS.txt"
{"infra", def_infra},
#line 24 "KEYWORDS.txt"
{"*", mul},
#line 109 "KEYWORDS.txt"
{"pm", def_pm},
#line 164 "KEYWORDS.txt"
{"map", def_map},
#line 144 "KEYWORDS.txt"
{"take", def_take},
#line 46 "KEYWORDS.txt"
{"stack", stack},
#line 136 "KEYWORDS.txt"
{"stackd", def_stackd},
#line 83 "KEYWORDS.txt"
{"down_to_zero", def_down_to_zero},
{""},
#line 65 "KEYWORDS.txt"
{"app1", def_app1},
#line 122 "KEYWORDS.txt"
{"roll>", def_roll_GREATER_THAN_SIGN},
#line 124 "KEYWORDS.txt"
{"rollup", def_rollup},
{""},
#line 125 "KEYWORDS.txt"
{"rolldown", def_rolldown},
#line 91 "KEYWORDS.txt"
{"fork", def_fork},
#line 160 "KEYWORDS.txt"
{"times", def_times},
#line 94 "KEYWORDS.txt"
{"genrec", def_genrec},
#line 145 "KEYWORDS.txt"
{"ternary", def_ternary},
{""}, {""},
#line 123 "KEYWORDS.txt"
{"roll<", def_roll_LESS_THAN_SIGN},
#line 71 "KEYWORDS.txt"
{"b", def_b},
#line 163 "KEYWORDS.txt"
{"_timest", def__timest},
#line 25 "KEYWORDS.txt"
{"mul", mul},
#line 32 "KEYWORDS.txt"
{"bool", truthy},
#line 34 "KEYWORDS.txt"
{"clear", clear},
#line 82 "KEYWORDS.txt"
{"divmod", def_divmod},
#line 90 "KEYWORDS.txt"
{"flatten", def_flatten},
{""}, {""}, {""},
#line 26 "KEYWORDS.txt"
{"+", add},
#line 50 "KEYWORDS.txt"
{"gt", def_gt},
#line 139 "KEYWORDS.txt"
{"sum", def_sum},
{""},
#line 40 "KEYWORDS.txt"
{"first", first},
#line 159 "KEYWORDS.txt"
{"_stept", def__stept},
#line 142 "KEYWORDS.txt"
{"swoncat", def_swoncat},
#line 119 "KEYWORDS.txt"
{"range_to_zero", def_range_to_zero},
#line 45 "KEYWORDS.txt"
{"rest", rest},
#line 141 "KEYWORDS.txt"
{"swons", def_swons},
#line 22 "KEYWORDS.txt"
{"%", tdiv_r},
#line 54 "KEYWORDS.txt"
{"ge", def_ge},
{""}, {""},
#line 118 "KEYWORDS.txt"
{"range", def_range},
{""}, {""}, {""}, {""},
#line 154 "KEYWORDS.txt"
{"while", def_while},
{""},
#line 161 "KEYWORDS.txt"
{"_times0", def__times0},
#line 29 "KEYWORDS.txt"
{"sub", sub},
#line 48 "KEYWORDS.txt"
{"swap", swap},
{""}, {""}, {""},
#line 170 "KEYWORDS.txt"
{"xor", def_xor},
{""},
#line 140 "KEYWORDS.txt"
{"swapd", def_swapd},
#line 47 "KEYWORDS.txt"
{"swaack", swaack},
#line 162 "KEYWORDS.txt"
{"_times1", def__times1},
#line 108 "KEYWORDS.txt"
{"pam", def_pam},
{""}, {""},
#line 157 "KEYWORDS.txt"
{"_step0", def__step0},
{""}, {""}, {""}, {""},
#line 64 "KEYWORDS.txt"
{"anamorphism", def_anamorphism},
{""},
#line 63 "KEYWORDS.txt"
{"abs", def_abs},
{""}, {""},
#line 158 "KEYWORDS.txt"
{"_step1", def__step1},
{""}, {""}, {""},
#line 126 "KEYWORDS.txt"
{"rrest", def_rrest},
{""},
#line 49 "KEYWORDS.txt"
{"eq", def_eq},
#line 52 "KEYWORDS.txt"
{"neq", def_neq},
{""}, {""}, {""}, {""}, {""},
#line 102 "KEYWORDS.txt"
{"make_generator", def_make_generator},
#line 169 "KEYWORDS.txt"
{"_map2", def__map2},
{"ccons", def_ccons},
#line 15 "KEYWORDS.txt"
{"=", def_eq},
#line 21 "KEYWORDS.txt"
{">=", def_ge},
{""}, {""}, {""}, {""},
#line 18 "KEYWORDS.txt"
{"!=", def_neq},
{""}, {""}, {""}, {""},
#line 31 "KEYWORDS.txt"
{"sub", sub},
#line 81 "KEYWORDS.txt"
{"dinfrirst", def_dinfrirst},
#line 148 "KEYWORDS.txt"
{"third", def_third},
{""}, {""}, {""},
#line 78 "KEYWORDS.txt"
{"clop", def_clop},
#line 107 "KEYWORDS.txt"
{"nulco", def_nulco},
#line 32 "KEYWORDS.txt"
{"/", tdiv_q},
#line 83 "KEYWORDS.txt"
{"disenstacken", def_disenstacken},
#line 37 "KEYWORDS.txt"
{"cmp", cmp_joyfunc},
{""},
#line 132 "KEYWORDS.txt"
{"shunt", def_shunt},
#line 94 "KEYWORDS.txt"
{"fourth", def_fourth},
#line 155 "KEYWORDS.txt"
{"unswons", def_unswons},
#line 106 "KEYWORDS.txt"
{"not", def_not},
#line 91 "KEYWORDS.txt"
{"enstacken", def_enstacken},
{""},
#line 130 "KEYWORDS.txt"
{"second", def_second},
{""},
#line 129 "KEYWORDS.txt"
{"run", def_run},
#line 45 "KEYWORDS.txt"
{"loop", loop},
{""}, {""},
#line 163 "KEYWORDS.txt"
{"_times0", def__times0},
{""},
#line 133 "KEYWORDS.txt"
{"size", def_size},
#line 131 "KEYWORDS.txt"
{"shift", def_shift},
#line 134 "KEYWORDS.txt"
{"spiral_next", def_spiral_next},
#line 85 "KEYWORDS.txt"
{"down_to_zero", def_down_to_zero},
#line 44 "KEYWORDS.txt"
{"inscribe", inscribe},
#line 34 "KEYWORDS.txt"
{"bool", truthy},
{""},
#line 103 "KEYWORDS.txt"
{"infrst", def_infrst},
#line 165 "KEYWORDS.txt"
{"_timest", def__timest},
#line 25 "KEYWORDS.txt"
{"mod", tdiv_r},
#line 158 "KEYWORDS.txt"
{"step", def_step},
#line 156 "KEYWORDS.txt"
{"while", def_while},
#line 159 "KEYWORDS.txt"
{"_step0", def__step0},
#line 53 "KEYWORDS.txt"
{"lt", def_lt},
#line 140 "KEYWORDS.txt"
{"stuncons", def_stuncons},
#line 86 "KEYWORDS.txt"
{"drop", def_drop},
{""}, {""},
#line 109 "KEYWORDS.txt"
{"of", def_of},
#line 153 "KEYWORDS.txt"
{"unquoted", def_unquoted},
{""}, {""},
#line 161 "KEYWORDS.txt"
{"_stept", def__stept},
#line 55 "KEYWORDS.txt"
{"le", def_le},
#line 135 "KEYWORDS.txt"
{"split_at", def_split_at},
#line 70 "KEYWORDS.txt"
{"appN", def_appN},
#line 136 "KEYWORDS.txt"
{"split_list", def_split_list},
#line 77 "KEYWORDS.txt"
{"cleave", def_cleave},
#line 164 "KEYWORDS.txt"
{"_times1", def__times1},
{""},
#line 139 "KEYWORDS.txt"
{"step_zero", def_step_zero},
{""},
#line 119 "KEYWORDS.txt"
{"quoted", def_quoted},
#line 144 "KEYWORDS.txt"
{"swoncat", def_swoncat},
#line 173 "KEYWORDS.txt"
{"and", def_and},
#line 100 "KEYWORDS.txt"
{"ifte", def_ifte},
#line 143 "KEYWORDS.txt"
{"swons", def_swons},
#line 74 "KEYWORDS.txt"
{"binary", def_binary},
#line 118 "KEYWORDS.txt"
{"product", def_product},
#line 29 "KEYWORDS.txt"
{"add", add},
#line 122 "KEYWORDS.txt"
{"reco", def_reco},
#line 99 "KEYWORDS.txt"
{"hypot", def_hypot},
#line 160 "KEYWORDS.txt"
{"_step1", def__step1},
#line 111 "KEYWORDS.txt"
{"pm", def_pm},
#line 95 "KEYWORDS.txt"
{"gcd", def_gcd},
#line 69 "KEYWORDS.txt"
{"app3", def_app3},
{""},
#line 84 "KEYWORDS.txt"
{"divmod", def_divmod},
#line 19 "KEYWORDS.txt"
{"<>", def_neq},
#line 63 "KEYWORDS.txt"
{"<{}", def_LESS_THAN_SIGN_LEFT_CURLY_BRACKET_RIGHT_CURLY_BRACKET},
{""},
#line 124 "KEYWORDS.txt"
{"roll>", def_roll_GREATER_THAN_SIGN},
#line 126 "KEYWORDS.txt"
{"rollup", def_rollup},
#line 108 "KEYWORDS.txt"
{"nullary", def_nullary},
#line 127 "KEYWORDS.txt"
{"rolldown", def_rolldown},
#line 93 "KEYWORDS.txt"
{"fork", def_fork},
#line 162 "KEYWORDS.txt"
{"times", def_times},
{""}, {""}, {""},
#line 68 "KEYWORDS.txt"
{"app2", def_app2},
{""},
#line 30 "KEYWORDS.txt"
{"-", sub},
{""},
#line 27 "KEYWORDS.txt"
{"mul", mul},
{""},
#line 36 "KEYWORDS.txt"
{"clear", clear},
#line 96 "KEYWORDS.txt"
{"genrec", def_genrec},
#line 145 "KEYWORDS.txt"
{"tailrec", def_tailrec},
{""},
#line 67 "KEYWORDS.txt"
{"app1", def_app1},
{""},
#line 23 "KEYWORDS.txt"
{"|", def_or},
#line 71 "KEYWORDS.txt"
{"at", def_at},
#line 141 "KEYWORDS.txt"
{"sum", def_sum},
{""},
#line 42 "KEYWORDS.txt"
{"first", first},
{""},
#line 174 "KEYWORDS.txt"
{"or", def_or},
{""},
#line 47 "KEYWORDS.txt"
{"rest", rest},
#line 102 "KEYWORDS.txt"
{"infra", def_infra},
#line 58 "KEYWORDS.txt"
{"?", def_QUESTION_MARK},
#line 52 "KEYWORDS.txt"
{"gt", def_gt},
#line 166 "KEYWORDS.txt"
{"map", def_map},
#line 146 "KEYWORDS.txt"
{"take", def_take},
#line 48 "KEYWORDS.txt"
{"stack", stack},
#line 138 "KEYWORDS.txt"
{"stackd", def_stackd},
{""}, {""},
#line 50 "KEYWORDS.txt"
{"swap", swap},
{""},
#line 28 "KEYWORDS.txt"
{"+", add},
#line 56 "KEYWORDS.txt"
{"ge", def_ge},
#line 65 "KEYWORDS.txt"
{"abs", def_abs},
{""},
#line 142 "KEYWORDS.txt"
{"swapd", def_swapd},
#line 49 "KEYWORDS.txt"
{"swaack", swaack},
#line 20 "KEYWORDS.txt"
{"<=", def_le},
#line 172 "KEYWORDS.txt"
{"xor", def_xor},
{""}, {""},
#line 166 "KEYWORDS.txt"
{"_mape", def__mape},
{""},
#line 58 "KEYWORDS.txt"
{"++", def_PLUS_SIGN_PLUS_SIGN},
#line 22 "KEYWORDS.txt"
{"&", def_and},
{""}, {""}, {""}, {""}, {""},
#line 103 "KEYWORDS.txt"
{"neg", def_neg},
{""}, {""}, {""}, {""}, {""}, {""},
#line 165 "KEYWORDS.txt"
{"_map?", def__map_QUESTION_MARK},
{""},
#line 70 "KEYWORDS.txt"
{"average", def_average},
{""}, {""}, {""},
#line 33 "KEYWORDS.txt"
#line 92 "KEYWORDS.txt"
{"flatten", def_flatten},
{""}, {""},
#line 150 "KEYWORDS.txt"
{"unary", def_unary},
#line 35 "KEYWORDS.txt"
{"branch", branch},
{""}, {""}, {""},
#line 167 "KEYWORDS.txt"
#line 18 "KEYWORDS.txt"
{"!=", def_neq},
{""}, {""},
#line 169 "KEYWORDS.txt"
{"_map0", def__map0},
{""},
{""}, {""},
#line 121 "KEYWORDS.txt"
{"reverse", def_reverse},
#line 31 "KEYWORDS.txt"
{"range_to_zero", def_range_to_zero},
{""},
#line 128 "KEYWORDS.txt"
{"rrest", def_rrest},
#line 26 "KEYWORDS.txt"
{"*", mul},
#line 51 "KEYWORDS.txt"
{"eq", def_eq},
#line 54 "KEYWORDS.txt"
{"neq", def_neq},
{""},
#line 120 "KEYWORDS.txt"
{"range", def_range},
{""}, {""}, {""}, {""},
#line 168 "KEYWORDS.txt"
{"_mape", def__mape},
#line 24 "KEYWORDS.txt"
{"%", tdiv_r},
#line 57 "KEYWORDS.txt"
{"--", def_HYPHEN_MINUS_HYPHEN_MINUS},
#line 33 "KEYWORDS.txt"
{"div", tdiv_q},
{""},
#line 95 "KEYWORDS.txt"
{"grabN", def_grabN},
{""}, {""},
#line 135 "KEYWORDS.txt"
{"sqr", def_sqr},
#line 171 "KEYWORDS.txt"
{"_map2", def__map2},
{""},
#line 168 "KEYWORDS.txt"
#line 147 "KEYWORDS.txt"
{"ternary", def_ternary},
{""}, {""}, {""}, {""}, {""},
#line 110 "KEYWORDS.txt"
{"pam", def_pam},
{""},
#line 170 "KEYWORDS.txt"
{"_map1", def__map1},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
{""},
#line 61 "KEYWORDS.txt"
{"||", def_VERTICAL_LINE_VERTICAL_LINE},
{""}, {""}, {""}, {""},
#line 123 "KEYWORDS.txt"
{"reverse", def_reverse},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
{""}, {""}, {""}, {""}, {""}, {""}, {""},
#line 96 "KEYWORDS.txt"
#line 104 "KEYWORDS.txt"
{"make_generator", def_make_generator},
{""},
#line 17 "KEYWORDS.txt"
{"<", def_lt},
{""},
#line 105 "KEYWORDS.txt"
{"neg", def_neg},
#line 64 "KEYWORDS.txt"
{"<<{}", def_LESS_THAN_SIGN_LESS_THAN_SIGN_LEFT_CURLY_BRACKET_RIGHT_CURLY_BRACKET},
#line 125 "KEYWORDS.txt"
{"roll<", def_roll_LESS_THAN_SIGN},
{""},
#line 60 "KEYWORDS.txt"
{"++", def_PLUS_SIGN_PLUS_SIGN},
#line 137 "KEYWORDS.txt"
{"sqr", def_sqr},
{""},
#line 167 "KEYWORDS.txt"
{"_map?", def__map_QUESTION_MARK},
{""},
#line 72 "KEYWORDS.txt"
{"average", def_average},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
#line 66 "KEYWORDS.txt"
{"anamorphism", def_anamorphism},
#line 59 "KEYWORDS.txt"
{"&&", def_AMPERSAND_AMPERSAND},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
#line 62 "KEYWORDS.txt"
{"!-", def_EXCLAMATION_MARK_HYPHEN_MINUS},
{""}, {""},
#line 97 "KEYWORDS.txt"
{"grabN", def_grabN},
{""}, {""}, {""}, {""}, {""}, {""}, {""}, {""},
#line 98 "KEYWORDS.txt"
{"grba", def_grba}
};