c_simple
creat_f c_simple;
{ "-noleaf", c_simple, f_always_true, 0 },
{ "-not", c_simple, f_not, 0 },
{ "-o", c_simple, f_or, 0 },
{ "-or", c_simple, f_or, 0 },
{ "-prune", c_simple, f_prune, 0 },
{ "-quit", c_simple, f_quit, 0 },
{ "-true", c_simple, f_always_true, 0 },
{ "!", c_simple, f_not, 0 },
{ "(", c_simple, f_openparen, 0 },
{ ")", c_simple, f_closeparen, 0 },
{ "-false", c_simple, f_false, 0 },