(CONDITIONALS% AND% ITERATIVE% STATEMENTS CHAPTER (67 79 78 68 73 84 73 79 78 65 76 83 32 65 78 68 32 73 84 69 82 65 84 73 86 69 32 83 84 65 84 69 77 69 78 84 83) NIL (4) CHAPPRIMITIVEFNS.IM;2 106) (COND (Function) ((FONT . LISP) 40 67 79 78 68 32 (FONT . ARG) 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 75 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 115) (COND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 164) (COND% CLAUSE TERM COND% clause NIL (4) CONTROLFNS.IM;2 233) (COND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 492) (COND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 995) (EQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 1102) (COND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 1309) (NUMBERP (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 2040) (ATOM (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 2068) (COND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 2183) (COND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 2466) (AND (Function) ((FONT . LISP) 40 65 78 68 32 (FONT . ARG) 88 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 2570) (AND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 2708) (OR (Function) ((FONT . LISP) 40 79 82 32 (FONT . ARG) 88 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 3005) (OR (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3178) (AND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3334) (OR (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3346) (AND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3589) (OR (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3601) (AND (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3893) (OR (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 3905) (SELECTQ (Function) ((FONT . LISP) 40 83 69 76 69 67 84 81 32 (FONT . ARG) 88 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 75 (TEXT (125) 125) 32 68 69 70 65 85 76 84 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 4900) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 5182) (EQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 5436) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 5608) (EQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 5820) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6173) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6248) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6452) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6616) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6669) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6835) (EQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6848) (SELCHARQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6908) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6961) (CHARCODE (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 6991) (SELECTC (Function) ((FONT . LISP) 40 83 69 76 69 67 84 67 32 (FONT . ARG) 88 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 67 76 65 85 83 69 (TEXT (92 115 117 98 123) 123) 75 (TEXT (125) 125) 32 68 69 70 65 85 76 84 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 7131) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 7145) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 7184) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 7268) (SELECTC (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 7303) (SELECTQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 7333) (PROG1 (Function) ((FONT . LISP) 40 80 82 79 71 49 32 (FONT . ARG) 88 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 7778) (PROG2 (Function) ((FONT . LISP) 40 80 82 79 71 50 32 (FONT . ARG) 88 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 8060) (PROG1 (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 8082) (PROGN (Function) ((FONT . LISP) 40 80 82 79 71 78 32 (FONT . ARG) 88 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 88 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 8394) (PROGN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 8405) (PROGN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 8503) (PROG (Function) ((FONT . LISP) 40 80 82 79 71 32 (FONT . ARG) 86 65 82 76 83 84 32 69 (TEXT (92 115 117 98 123) 123) 49 (TEXT (125) 125) 32 69 (TEXT (92 115 117 98 123) 123) 50 (TEXT (125) 125) 32 (TEXT (123 36 92 99 100 111 116 115 36 125) 125) 32 69 (TEXT (92 115 117 98 123) 123) 78 (TEXT (125) 125) (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 8834) (LOCAL% VARIABLES TERM local% variables NIL (4) CONTROLFNS.IM;2 9039) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 9561) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 9638) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 9708) (ARG% NOT% LITATOM (Error Message) NIL NIL (4) CONTROLFNS.IM;2 9768) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 9848) (ATTEMPT% TO% BIND% NIL% OR% T (Error Message) NIL NIL (4) CONTROLFNS.IM;2 9917) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 9976) (PROG% LABEL TERM PROG% label NIL (4) CONTROLFNS.IM;2 10103) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10172) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10188) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10263) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10312) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10332) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10365) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10413) (GO (Function) ((FONT . LISP) 40 71 79 32 (FONT . ARG) 88 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 10511) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10519) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10562) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10603) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10661) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10705) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10745) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10782) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 10973) (UNDEFINED% OR% ILLEGAL% GO (Error Message) NIL NIL (4) CONTROLFNS.IM;2 11074) (RETURN (Function) ((FONT . LISP) 40 82 69 84 85 82 78 32 (FONT . ARG) 88 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4) CONTROLFNS.IM;2 11119) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11133) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11168) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11250) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11296) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11311) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11375) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11388) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11403) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11454) (ILLEGAL% RETURN (Error Message) NIL NIL (4) CONTROLFNS.IM;2 11524) (UNDEFINED% OR% ILLEGAL% GO (Error Message) NIL NIL (4) CONTROLFNS.IM;2 11561) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11570) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11585) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11639) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11721) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11736) (SORT (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11781) (NLSETQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11831) (ERSETQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11849) (GO (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11897) (RETURN (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11912) (NLSETQ (Function) NIL NIL (4) CONTROLFNS.IM;2 11971) (NLSETQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 11982) (ERSETQ (Function) NIL NIL (4) CONTROLFNS.IM;2 12003) (ERSETQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 12014) (PROG (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 12045) (NLSETQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 12086) (ERSETQ (Function) NIL (*IMPLICIT*) (4) CONTROLFNS.IM;2 12101) (THE% IF% STATEMENT SUBSEC (84 104 101 32 73 70 32 83 116 97 116 101 109 101 110 116) NIL (1 4) CLISPWORDS.IM;2 63) (IFSTATEMENT TAG NIL NIL (1 4) CLISPWORDS.IM;2 82) (IF-THEN-ELSE% STATEMENTS TERM IF-THEN-ELSE% statements NIL (1 4) CLISPWORDS.IM;2 115) (COND (Function) NIL (*IMPLICIT*) (1 4) CLISPWORDS.IM;2 258) (COND (Function) NIL (*IMPLICIT*) (1 4) CLISPWORDS.IM;2 397) (CLISPIFWORDSPLST (Variable) NIL (*IMPLICIT*) (1 4) CLISPWORDS.IM;2 1007) (CLISPIFWORDSPLST (Variable) NIL NIL (1 4) CLISPWORDS.IM;2 1036) (COND (Function) NIL (*IMPLICIT*) (1 4) CLISPWORDS.IM;2 1241) (COND (Function) NIL (*IMPLICIT*) (1 4) CLISPWORDS.IM;2 1511) (THE% ITERATIVE% STATEMENT SUBSEC (84 104 101 32 73 116 101 114 97 116 105 118 101 32 83 116 97 116 101 109 101 110 116) NIL (2 4) CLISPWORDS.IM;2 2712) (ITERATIVESTATEMENT TAG NIL NIL (2 4) CLISPWORDS.IM;2 2739) (ITERATIVE% STATEMENTS TERM iterative% statements (*BEGIN*) (2 4) CLISPWORDS.IM;2 2777) (PROG (Function) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 3047) (MAPC (Function) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 3058) (MAPCAR (Function) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 3071) (I.S.OPRS TERM i.s.oprs (*BEGIN*) (2 4) CLISPWORDS.IM;2 3421) (PROG (Function) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 4261) (MAPCAR (Function) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 4274) (CLISPFORWORDSPLST (Variable) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 4528) (CLISPFORWORDSPLST (Variable) NIL NIL (2 4) CLISPWORDS.IM;2 4558) (SPELLING% LISTS TERM spelling% lists NIL (2 4) CLISPWORDS.IM;2 4580) (CAR (Function) NIL (*IMPLICIT*) (2 4) CLISPWORDS.IM;2 4981) (DEFINED,% THEREFORE% DISABLED% IN% CLISP (Error Message) NIL NIL (2 4) CLISPWORDS.IM;2 5262) (I.S.TYPES SUBSEC (73 46 115 46 116 121 112 101 115) NIL (1 2 4) CLISPWORDS.IM;2 5381) (I.S.TYPE TERM i.s.type (*PRIMARY*) (1 2 4) CLISPWORDS.IM;2 5409) (I.S.TYPE TAG NIL NIL (1 2 4) CLISPWORDS.IM;2 5425) (DO (I.S. Operator) ((FONT . LISP) 68 79 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 5792) (MAPC (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6030) (MAP (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6042) (COLLECT (I.S. Operator) ((FONT . LISP) 67 79 76 76 69 67 84 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 6141) (MAPCAR (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6318) (MAPLIST (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6332) (SUBSET (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6347) (PROG (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6413) (TCONC (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6520) (MAPCAR (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6602) (CLDISABLE (Function) NIL NIL (1 2 4) CLISPWORDS.IM;2 6691) (JOIN (I.S. Operator) ((FONT . LISP) 74 79 73 78 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 6768) (NCONC (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6865) (MAPCONC (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6896) (MAPCON (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6911) (/NCONC (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6943) (/MAPCONC (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6958) (/MAPCON (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 6976) (SUM (I.S. Operator) ((FONT . LISP) 83 85 77 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 7118) (IPLUS (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 7318) (FPLUS (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 7330) (PLUS (Function) NIL (*IMPLICIT*) (1 2 4) CLISPWORDS.IM;2 7344) (COUNT (I.S. Operator) ((FONT . LISP) 67 79 85 78 84 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 7501) (ALWAYS (I.S. Operator) ((FONT . LISP) 65 76 87 65 89 83 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 7669) (NEVER (I.S. Operator) ((FONT . LISP) 78 69 86 69 82 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 7907) (THEREIS (I.S. Operator) ((FONT . LISP) 84 72 69 82 69 73 83 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 8355) (LARGEST (I.S. Operator) ((FONT . LISP) 76 65 82 71 69 83 84 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 8684) (SMALLEST (I.S. Operator) ((FONT . LISP) 83 77 65 76 76 69 83 84 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (1 2 4) CLISPWORDS.IM;2 8759) ($$EXTREME (Variable) NIL NIL (1 2 4) CLISPWORDS.IM;2 8884) ($$VAL (Variable) NIL NIL (1 2 4) CLISPWORDS.IM;2 8970) (ITERATION% VARIABLE% I.S.OPRS SUBSEC (73 116 101 114 97 116 105 111 110 32 86 97 114 105 97 98 108 101 32 73 46 115 46 111 112 114 115) NIL (2 2 4) CLISPWORDS.IM;2 9133) (FOR (I.S. Operator) ((FONT . LISP) 70 79 82 32 (FONT . ARG) 86 65 82 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 9204) (FOR (I.S. Operator) ((FONT . LISP) 70 79 82 32 (FONT . ARG) 86 65 82 83 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 9622) (FOR% OLD (I.S. Operator) ((FONT . LISP) 70 79 82 32 79 76 68 32 (FONT . ARG) 86 65 82 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 9862) (BIND (I.S. Operator) ((FONT . LISP) 66 73 78 68 32 (FONT . ARG) 86 65 82 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 10179) (BIND (I.S. Operator) ((FONT . LISP) 66 73 78 68 32 (FONT . ARG) 86 65 82 83 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 10250) (IN (I.S. Operator) ((FONT . LISP) 73 78 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 10594) (ON (I.S. Operator) ((FONT . LISP) 79 78 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 11046) (MAPC (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 11185) (MAPCAR (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 11198) (MAPCONC (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 11216) (MAP (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 11257) (MAPLIST (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 11271) (MAPCON (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 11288) (IN% OLD (I.S. Operator) ((FONT . LISP) 73 78 32 79 76 68 32 (FONT . ARG) 86 65 82 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 11731) (IN (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 11758) (OLD (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 11785) (IN% OLD (I.S. Operator) ((FONT . LISP) (FONT . LISP) 73 78 32 79 76 68 32 40 (FONT . ARG) 86 65 82 (UNDO . FONT) 95 (FONT . ARG) 70 79 82 77 (UNDO . FONT) 41 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 12148) (OLD (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 12176) (ON% OLD (I.S. Operator) ((FONT . LISP) 79 78 32 79 76 68 32 (FONT . ARG) 86 65 82 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 12341) (ON (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 12368) (OLD (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 12395) (IN% OLD (I.S. Operator) ((FONT . LISP) (FONT . LISP) 79 78 32 79 76 68 32 40 (FONT . ARG) 86 65 82 (UNDO . FONT) 95 (FONT . ARG) 70 79 82 77 (UNDO . FONT) 41 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 12646) (ON (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 12673) (OLD (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 12700) (INSIDE (I.S. Operator) ((FONT . LISP) 73 78 83 73 68 69 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 12866) (FROM (I.S. Operator) ((FONT . LISP) 70 82 79 77 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 13242) (BY (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 13396) (TO (I.S. Operator) ((FONT . LISP) 84 79 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 13685) (FROM (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 13771) (BY (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 13935) (BY (I.S. Operator) ((FONT . LISP) (FONT . LISP) 66 89 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) 32 (FONT) 40 119 105 116 104 32 (FONT . LISP) 73 78 (UNDO . FONT) 47 (FONT . LISP) 79 78 (UNDO . FONT) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 15304) (IN (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 15334) (ON (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 15373) (CAR (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 15577) (CDR (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 16168) (CDR (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 16245) (BY (I.S. Operator) ((FONT . LISP) (FONT . LISP) 66 89 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) 32 (FONT) 40 119 105 116 104 111 117 116 32 (FONT . LISP) 73 78 (UNDO . FONT) 47 (FONT . LISP) 79 78 (UNDO . FONT) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 16420) (FROM (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 16567) (TO (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 16608) (FROM (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 17706) (TO (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 17747) (AS (I.S. Operator) ((FONT . LISP) 65 83 32 (FONT . ARG) 86 65 82 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 18145) (MAP2C (Function) NIL (*IMPLICIT*) (2 2 4) CLISPWORDS.IM;2 18296) (AS (I.S. Operator) NIL NIL (2 2 4) CLISPWORDS.IM;2 18578) (OUTOF (I.S. Operator) ((FONT . LISP) 79 85 84 79 70 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (2 2 4) CLISPWORDS.IM;2 19097) (CONDITION% I.S.OPRS SUBSEC (67 111 110 100 105 116 105 111 110 32 73 46 115 46 111 112 114 115) NIL (3 2 4) CLISPWORDS.IM;2 19402) (WHEN (I.S. Operator) ((FONT . LISP) 87 72 69 78 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 19476) (UNLESS (I.S. Operator) ((FONT . LISP) 85 78 76 69 83 83 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 19722) (WHILE (I.S. Operator) ((FONT . LISP) 87 72 73 76 69 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 19914) (UNTIL (I.S. Operator) ((FONT . LISP) 85 78 84 73 76 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 20145) (UNTIL (I.S. Operator) ((FONT . LISP) (FONT . LISP) 85 78 84 73 76 32 (FONT . ARG) 78 (UNDO . FONT) (UNDO . FONT) 32 40 (FONT . ARG) 78 (UNDO . FONT) 32 97 32 110 117 109 98 101 114 41 (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 20363) (REPEATWHILE (I.S. Operator) ((FONT . LISP) 82 69 80 69 65 84 87 72 73 76 69 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 20500) (REPEATUNTIL (I.S. Operator) ((FONT . LISP) 82 69 80 69 65 84 85 78 84 73 76 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 20721) (REPEATUNTIL (I.S. Operator) ((FONT . LISP) (FONT . LISP) 82 69 80 69 65 84 85 78 84 73 76 32 (FONT . ARG) 78 (UNDO . FONT) (UNDO . FONT) 32 40 (FONT . ARG) 78 (UNDO . FONT) 32 97 32 110 117 109 98 101 114 41 (UNDO . FONT)) (*DEF*) (3 2 4) CLISPWORDS.IM;2 20924) (OTHER% I.S.OPRS SUBSEC (79 116 104 101 114 32 73 46 115 46 111 112 114 115) NIL (4 2 4) CLISPWORDS.IM;2 21084) (FIRST (I.S. Operator) ((FONT . LISP) 70 73 82 83 84 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 2 4) CLISPWORDS.IM;2 21159) (FINALLY (I.S. Operator) ((FONT . LISP) 70 73 78 65 76 76 89 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 2 4) CLISPWORDS.IM;2 21421) (EACHTIME (I.S. Operator) ((FONT . LISP) 69 65 67 72 84 73 77 69 32 (FONT . ARG) 70 79 82 77 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 2 4) CLISPWORDS.IM;2 21687) (DECLARE: (I.S. Operator) ((FONT . LISP) 68 69 67 76 65 82 69 58 32 (FONT . ARG) 68 69 67 76 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 2 4) CLISPWORDS.IM;2 22459) (PROG (Function) NIL (*IMPLICIT*) (4 2 4) CLISPWORDS.IM;2 22540) (PROG (Function) NIL (*IMPLICIT*) (4 2 4) CLISPWORDS.IM;2 22657) (DECLARE (I.S. Operator) ((FONT . LISP) 68 69 67 76 65 82 69 32 (FONT . ARG) 68 69 67 76 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 2 4) CLISPWORDS.IM;2 23152) (DECLARE (Function) NIL (*IMPLICIT*) (4 2 4) CLISPWORDS.IM;2 23207) (CAR (Function) NIL (*IMPLICIT*) (4 2 4) CLISPWORDS.IM;2 23317) (ORIGINAL (I.S. Operator) ((FONT . LISP) 79 82 73 71 73 78 65 76 32 (FONT . ARG) 73 46 83 46 79 80 82 32 79 80 69 82 65 78 68 (UNDO . FONT) (UNDO . FONT)) (*DEF*) (4 2 4) CLISPWORDS.IM;2 23563) (MISCELLANEOUS SUBSEC (77 105 115 99 101 108 108 97 110 101 111 117 115) NIL (5 2 4) CLISPWORDS.IM;2 23993) (RETURN (in iterative statement) NIL NIL (5 2 4) CLISPWORDS.IM;2 24529) (GO (in iterative statement) NIL NIL (5 2 4) CLISPWORDS.IM;2 24581) (FIRST (I.S. Operator) NIL NIL (5 2 4) CLISPWORDS.IM;2 25116) (FINALLY (I.S. Operator) NIL NIL (5 2 4) CLISPWORDS.IM;2 25161) (EACHTIME (I.S. Operator) NIL NIL (5 2 4) CLISPWORDS.IM;2 25209) (BY (I.S. Operator) NIL NIL (5 2 4) CLISPWORDS.IM;2 26278) (IN (I.S. Operator) NIL NIL (5 2 4) CLISPWORDS.IM;2 26334) (PROG (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 26606) (GO (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 26796) (RETURN (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 26809) (PROG (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 26904) (PROG (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 28068) (GO (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 28134) (GO (Function) NIL (*IMPLICIT*) (5 2 4) CLISPWORDS.IM;2 28572) ($$VAL (Variable) NIL NIL (5 2 4) CLISPWORDS.IM;2 28672) (ERRORS% IN% ITERATIVE% STATEMENTS SUBSEC (69 114 114 111 114 115 32 105 110 32 73 116 101 114 97 116 105 118 101 32 83 116 97 116 101 109 101 110 116 115) NIL (6 2 4) CLISPWORDS.IM;2 28832) (ERRORS% IN% ITERATIVE% STATEMENTS TERM errors% in% iterative% statements NIL (6 2 4) CLISPWORDS.IM;2 28872) (NO% DO,% COLLECT,% OR% JOIN (Error Message) NIL NIL (6 2 4) CLISPWORDS.IM;2 30418) (RETURN (Function) NIL (*IMPLICIT*) (6 2 4) CLISPWORDS.IM;2 30559) (GO (Function) NIL (*IMPLICIT*) (6 2 4) CLISPWORDS.IM;2 30570) (CLISPI.S.GAG (Variable) NIL (*IMPLICIT*) (6 2 4) CLISPWORDS.IM;2 30645) (CLISPI.S.GAG (Variable) NIL NIL (6 2 4) CLISPWORDS.IM;2 30669) (POSSIBLE% NON-TERMINATING% ITERATIVE% STATEMENT (Error Message) NIL NIL (6 2 4) CLISPWORDS.IM;2 30839) (RETFROM (Function) NIL (*IMPLICIT*) (6 2 4) CLISPWORDS.IM;2 30982) (DEFINING% NEW% ITERATIVE% STATEMENT% OPERATORS SUBSEC (68 101 102 105 110 105 110 103 32 78 101 119 32 73 116 101 114 97 116 105 118 101 32 83 116 97 116 101 109 101 110 116 32 79 112 101 114 97 116 111 114 115) NIL (7 2 4) CLISPWORDS.IM;2 31199) (DEFINING% NEW% ITERATIVE% STATEMENT% OPERATORS TERM defining% new% iterative% statement% operators (*BEGIN*) (7 2 4) CLISPWORDS.IM;2 31259) (I.S.OPR (Function) ((FONT . LISP) 40 73 46 83 46 79 80 82 32 (FONT . ARG) 78 65 77 69 32 70 79 82 77 32 79 84 72 69 82 83 32 69 86 65 76 70 76 71 (FONT . LISP) 41 (UNDO . FONT) (UNDO . FONT) (UNDO . FONT)) (*DEF*) (7 2 4) CLISPWORDS.IM;2 31433) (I.S.TYPE TERM i.s.type NIL (7 2 4) CLISPWORDS.IM;2 31557) (LSTVARS (Variable) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 32427) (LSTVARS (Variable) NIL NIL (7 2 4) CLISPWORDS.IM;2 32446) (CAR (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 32710) (LSTVARS (Variable) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 32727) (LSTVARS (Variable) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 32752) (DFNFLG (Variable) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 32922) (IPLUS (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 33353) (FPLUS (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 33365) (PLUS (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 33379) (CONS (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 34028) (NCONC1 (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 34051) (TCONC (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 34282) (ORIGINAL (I.S. Operator) NIL NIL (7 2 4) CLISPWORDS.IM;2 34992) (I.S.OPR (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 35284) (I.S.OPR (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 35433) (I.S.OPR (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 35528) (WHERE (I.S. Operator) NIL NIL (7 2 4) CLISPWORDS.IM;2 35941) (SUCHTHAT (I.S. Operator) NIL NIL (7 2 4) CLISPWORDS.IM;2 36021) (ISTHERE (I.S. Operator) NIL NIL (7 2 4) CLISPWORDS.IM;2 36071) (FIND (I.S. Operator) NIL NIL (7 2 4) CLISPWORDS.IM;2 36132) (THRU (I.S. Operator) NIL NIL (7 2 4) CLISPWORDS.IM;2 36193) (MODIFIER (Litatom) NIL NIL (7 2 4) CLISPWORDS.IM;2 36277) (DWIMIFY (Function) NIL (*IMPLICIT*) (7 2 4) CLISPWORDS.IM;2 36545) (I.S.OPRS (File Package Command) NIL NIL (7 2 4) CLISPWORDS.IM;2 36904) (DEFINING% NEW% ITERATIVE% STATEMENT% OPERATORS TERM defining% new% iterative% statement% operators (*END*) (7 2 4) CLISPWORDS.IM;2 37208) (I.S.OPRS TERM i.s.oprs (*END*) (2 4) CLISPWORDS.IM;2 41568) (ITERATIVE% STATEMENTS TERM iterative% statements (*END*) (2 4) CLISPWORDS.IM;2 41603)