DSK: TEACH; APROPOS >
00208,LISP
(defun obarrayp820
(defun apropos916
(defun apropos-match1273
(defun apropos-display1436
(defun apropos-sym-matches?1827
(defun apropos-sym-matches-here?2125

DSK: TEACH; COMPLAIN >
00092,LISP
(defvar *complaint-handler*73
(defun complain300

DSK: TEACH; DATABASE >
00319,LISP
(defvar *user-status-information*1012
(defun load-props1038
(defun save-props1446
(defun prop2084
(defun set-prop2302
(defun rem-prop2421
(defun explanation-has-been-seen2650
(defun seen-explanation?2792
(defun lesson-has-been-seen2989
(defun seen-lesson?3136

DSK: TEACH; ERRHAN >
01852,LISP
(defvar *symbol-started-with-colon-flag*777
(defvar *illegal-functional-notation-flag*826
(defvar *special-quit-atom-flag*865
(defvar *special-quit-atom-list*904
(defvar *special-lesson-atom-flag*954
(defvar *special-lesson-atom-list*995
(defvar *errors-handled*1125
(defstruct (error-handled :conc-name :named)1256
(defmacro define-explanation1329
(defun short-desc-error-handled1625
(defun long-desc-error-handled1721
(defun error-desc-error-handled1817
(defun name-error-handled1908
(define-explanation random-lossage2051
(define-explanation bad-go-tag2580
(define-explanation io-lossage2731
(define-explanation wrong-type-args2884
(define-explanation wrong-num-args4142
(define-explanation undefined-function5953
(define-explanation unbound-variable6865
(defmacro define-error-handler8074
(defun num-wanted8620
(define-error-handler wrong-num-args-handler8861
(define-error-handler random-lossage-handler9865
(define-error-handler wrong-type-args-handler10344
(define-error-handler io-lossage-handler10808
(define-error-handler bad-go-tag-handler11268
(define-error-handler undefined-function-handler11891
(defun check-for-odd-symbol13020
(defun weird-first-char14287
(defun maybe-messed-up-arithmetic-call15255
(defmacro define-dialect-variant16538
(defun dialect-variant16653
(define-error-handler unbound-variable-handler17149
(defun special-lesson-atom-handler17980
(defun special-quit-atom-handler19224
(defun colon-symbol20509
(defun comma-check21433
(defun illegal-functional-notation-check21583
(defun eval-handler23671
(defun diagnose-quoted-function23891
(defun explain-dont-quote-functions24411
(defun explain-put-quote-outside24948
(defun diagnose-random-functional-form25620
(defun redefined-^G-handler26251

DSK: TEACH; ERRHEL >
00419,LISP
(defun print-menu2017
(defun menu2450
(defun choice3664
(defun active-menu-loop3774
(defun active-menu3979
(defun print-error-desc4279
(defun describe-error4391
(defun explain4755
(defun explain?5034
(defun query-explain5242
(defun find-error-context7433
(defmacro error-reporter7990
(defun interesting-stack-frame?8056
(defun declare-error-reporter8311

DSK: TEACH; EXLIST >
00387,LISP
(defun examine-list-doc697
(defun examine-list-arg-default1534
(defun examine-list2202
(defun continue-display3295
(defun examine-normal-list3495
(defun good-list3857
(defun make-from-list3968
(defun print-lists4303
(defun print-dotted5421
(defun print-dotted-worker5811
(defun print-conses6003
(defun print-conses-worker6147

DSK: TEACH; GLOBAL >
00037,LISP

DSK: TEACH; INIT >
00865,LISP
(setq base356
(defun alpha-numeric?762
(defun alpha-userid962
(defvar *default-lesson-filename*1176
(defvar *default-script-filename*1232
(defvar *list-of-lessons-filename*1373
(defvar *ITS-list-of-list-of-lessons-filenames*1446
(defvar *TOPS-20-list-of-lessons-filename*1518
(setq fail-act1585
(setq unbnd-vrbl1634
(setq undf-fnctn1683
(setq wrng-type-arg1737
(setq wrng-no-args1784
(setq unseen-go-tag1832
(setq io-lossage1875
(setq eval1978
(setq quit-disable3176
(defvar *tty-spec-info*3316
(setq display-tyo3558
(setq gc-overflow3675
(setq *rset-trap3716
(setq tty-return-msg3742
(define-dialect-variant define3935
(define-dialect-variant defq3974
(define-dialect-variant df4010
(define-dialect-variant de4064
(define-dialect-variant def4102
(setq *help-wait-time*4137

DSK: TEACH; IO >
00276,LISP
(defun string-length369
(defun char-n399
(defun diagnose445
(defun bug510
(defun quiet-bug710
(defun output823
(defun query890
(defun clear-screen1011
(defun fresh-line1053
(defun sysread1189
(defun defined-function?1313

DSK: TEACH; LESSN >
02009,LISP
(defvar *disallow-interrupts*1000
(defvar *lesson-file*1028
(defvar *lesson-name*1056
(defvar *lesson-exit-handler*1092
(defvar *lesson-information*1395
(define-interrupt-handler abort-lesson-handler1451
(define-interrupt-handler read-lesson-section-handler1525
(define-interrupt-handler read-previous-lesson-section-handler1615
(define-interrupt-handler repeat-lesson-section-handler1707
(defmacro catch-lesson-exit1793
(defun exit-lesson1918
(defmacro lesson-function1985
(defmacro define-lesson-function2059
(defun add-lesson-information2185
(defun get-lesson-information2513
(defun ass2589
(defun get-optional-label2737
(defun get-name2892
(defun get-position2931
(defun read-optional-label2980
(defun get-list-of-lessons3462
(defun full-lesson-name4018
(defun find-special-function-in-file4216
(defun set-up-lesson-descriptions5041
(defun describe-lesson5597
(defun in-lesson?5660
(defmacro lesson5772
(defun *lesson5873
(defun start-lesson6855
(defun open-lesson7286
(defun trimmed-lesson-information8290
(defun repeat-lesson-section8415
(defun read-previous-lesson-section8799
(defun set-lesson-section-to9235
(defun want-lesson?9843
(defun kill-lesson10193
(defun abort-lesson10395
(defun end-of-lesson-file10512
(defvar *muzzled*10668
(defun read-lesson-section10750
(define-lesson-function if11989
(define-lesson-function end-if12117
(define-lesson-function eval12186
(defun read-verbosely12364
(define-lesson-function eval-print12863
(define-lesson-function pp12968
(define-lesson-function try13108
(define-lesson-function pause13301
(define-lesson-function tag13482
(define-lesson-function comment13594
(define-lesson-function document13703
(define-lesson-function eof13807
(define-lesson-function next14180
(defun get-apropriate-next-lesson14698
(defun get-next-next-lesson15196
(defun get-a-new-lesson15664
(define-lesson-function required15880

DSK: TEACH; MACRO >
00319,LISP
(defmacro catch-**more**200
(defmacro dont-catch-**more**400
(defmacro catch-complaints584
(defmacro with-saved-obarray795
(defmacro load-module1134
(defmacro define-interrupt-handler1462
(defmacro when-abnormal-exit2377
(defmacro cautiously-incrementing-filepos2604

DSK: TEACH; MORE >
00171,LISP
(defvar *can-flush-more*151
(defvar *in-more-break*181
(defun **more**205
(defun maybe-**more**452
(defun surely-**more**1174

DSK: TEACH; RECORD >
00394,LISP
(defvar *protocol-file*570
(defvar *script-file*598
(defvar *files-to-write-to*632
(defun set-up-prot-file940
(defun program-record1617
(defun recorded-read2070
(defun recorded-sysread2301
(defun recorded-output2534
(defun recorded-print2650
(defun script3067
(defun version-file4342
(defun script-file?4685
(defun stop-script5013

DSK: TEACH; START >
00036,LISP

DSK: TEACH; TEACH >
00808,LISP
(defvar *novice-flag*751
(setq prinendline1236
(defun gc-overflow-handler1519
(defun novicep2142
(defvar *second-time-around*2320
(defvar ***2338
(defvar **2356
(defvar +++2374
(defvar ++2392
(defvar *display-terminal*2425
(defvar *terminal-horizontal-size*2466
(defvar *terminal-vertical-size*2505
(defvar *lessons-known*2535
(defun find-terminal-characteristics2580
(defun welcome-message2917
(defun help3501
(defun teach-lisp-top-level3612
(defvar *recursive?*4060
(defun breakloop4085
(defun dump4720
(defvar *database-new-filename*5005
(defvar *database-old-filename*5043
(defvar *database-temp-file*5078
(defvar *database-temp-filename*5117
(defun alpha-numeric?5238
(defun alpha-userid5438
(defun init-user5559

DSK: TEACH; TEACH DUMP
00039,LISP

DSK: TEACH; TREEPR >
01010,LISP
(defvar *old-list*202
(defvar *form-map*227
(defvar *sfa*247
(defvar *error-print-flag*280
(defun display-list-doc312
(defun display-list-no-arg977
(defun display-list1675
(defun plot-mistake2723
(defun abort-make-display2896
(defun make-display-array3047
(defun vertical-dimension3417
(defun horizontal-dimension3486
(defun call-form-map3547
(defun store-form-map3611
(defun plot3681
(defun downp4083
(defun display4589
(defun arrayprint4777
(defmacro dimens5235
(defmacro y-coord5282
(defmacro x-coord5329
(defun sfa-handler5377
(defun sfa-output6591
(defun sfa-cursorpos6670
(defun sfa-cursor-down-and-back6734
(defun print-vertical-bar6815
(defun print-horizontal-arrow6870
(defun print-cell-top6987
(defun print-nil7160
(defun print-vertical-arrow7318
(defun print-tree7627
(defun print-single-cell8093
(defun print-cons8306
(defun print-which-cdr8543
(defun print-cdr8667
(defun fix-atom-name8939