(CAR/CDR-NESTP)
(GLUE-TERMS)
(NUGGET-FN-CALL-ACTUALS1)
(NUGGET-FN-CALL-ACTUALS)
(CAR-CDR-CONS-REWRITER)
(CAR/CDR-NESTSP)
(LEFTMOST-INNERMOST)
(LEFTMOST-INNERMOST-LST)
(VARIABLESP)
(TRUE-CONS-NESTP)
(STRIP-TRUE-CONS-NEST)
(CONJOINED-CONSPS)
(CONSED-CARS)
(VARIABLEP-LST)
(NUGGET)
(GENERATE-LOOP$-SCION-NUGGETS)
(GET-LOOP$-SCION-DEFAULT-QUOTED-LAMBDA-OBJECT)
(RENAME-FN-AND-REPLACE-FOR-LOOP$-LAMBDA-OBJS)
(MAKE-INDUCTOR-DEFUN-AND-RULE)
(DEFINDUCTOR-FN1)
(DEFINDUCTOR-FN)
