ASSEMBLY LISTING OF SEGMENT >special_ldd>install>MR12.0-1206>lisp_subr_tv_.alm ASSEMBLED ON: 11/05/86 1102.6 mst Wed OPTIONS USED: list ASSEMBLED BY: ALM Version 6.7 October 1986 ASSEMBLER CREATED: 10/08/86 1557.5 mst Wed  1 " **************************************************************  2 " * *  3 " * Copyright, (C) Massachusetts Institute of Technology, 1973 *  4 " * *  5 " **************************************************************  000000 6 name lisp_subr_tv_ 7  8 " This segment of lisp is used to allow pointers from the  9 " lisp environment, which is impure, to reference lisp subroutines. 10 " It is a transfer vector, in which each entry is comprised of four 11 " words -- a header word containing information about the subroutine,  12 " one or two words of code, and a word which gives information to the  13 " bootstrapping routine which generates the initial lisp environment.  14 " It is important that modifications to this segment not change 15 " the positions of the unchanged subroutine entry points, so that  16 " a change or addition to the subroutines supported by lisp 17 " does not have to invalidate the contents of previously generated saved  18 " environments. 19 "  20 " Three types of subroutine calls are handled here...the fast call  21 " is just a transfer to the real entry point...see for example the subroutine  22 " "cdr". The normal call is done by a tsx6 to the type_1_subr routine  23 " which saves the return address and lp on the unmarked stack,  24 " and then a transfer to the routine. PL/I subroutines 25 " are called by going through an interface routine...either pl1_fixup or  26 " pl1_lsubr_fixup is used depending on the type of the subr.  27 "  28 " It is important to realize that this segment will not work correctly if  29 " not bound with the other alm modules in the lisp system. It depends on the  30 " two facts that:  31 " a) the binder coalesces the linkage sections of all of the  32 " component segments when binding, so that ab|system_lp,  33 " which is saved at entry to lisp, works for all alm modules  34 " which require a pointer to their linkage section. 35 " b) transfers to fast call subroutines will be altered by the linker  36 " to direct transfers, rather than going through links, so that 37 " lp need not be set at the time of the transfer.  38 "  39 "  40 " History:  41 " First modified by D. Reed, who generated it from the segment lisp_standard_environment_.ec,  42 " on 2/19/73.  43 " Modified 3/13/72 by DAM for New I/O Functions 44 " Modified 17 Apr 1974 by DAM to add error-break fcns (formerly in lisp_standard_environment_.ec)  45 " ***** the name of the second location counter was changed from names  46 " ***** to Names due to a name clash.  47 " Modified 74.12.16 by DAM. The transfer vector is now compiled from a readable,  48 " symbolic source file called lisp_subr_tv_.macro into lisp_subr_tv_.incl.alm.  49 " This file contains the necessary declarations and support routines.  50 " Modified 1982.10.04 by Richard Lamson to convert into ALM, now that it has  51 " macros, rather than converting from the  52 " kludgiferous lisp_subr_tv_.macro  53  000000 54 equ subr,0 000001 55 equ lsubr,1  000002 56 equ fsubr,2  57  000002 58 segdef tv_begin  000002 59 segdef lisp_subr_tv_  000000 60 segdef tv_entry_count  61  62 use tv 000000 aa 000000 000510 63 tv_entry_count: zero 0,(tv_end-tv_begin)/4-1  000001 aa 000000 0110 03 64 even " must be even, else garbage collection and saving don't work right. 65  66 macro type_0_subr  1 67 use tv  2 68 vfd 9/&4,9/&3,18/-1  3 69 tra &5  4 70 zero  5 71 zero &U-lisp_subr_tv_,&1  6 72 use Names 7 73 &U: acc "&2"  8 74 use tv 9 75 &end  76  77 macro type_1_subr  1 78 use tv 2 79 vfd 9/&4,9/&3,18/-1  3 80 tsx6 type_1_subr  4 81 tra &5  5 82 zero &U-lisp_subr_tv_,&1  6 83 use Names  7 84 &U: acc "&2"  8 85 use tv 9 86 &end  87  88 macro pl1  1 89 use tv 2 90 vfd 9/&4,9/&3,18/-1  3 91 tsx6 pl1_fixup  4 92 tra &5  5 93 zero &U-lisp_subr_tv_,&1  6 94 use Names  7 95 &U: acc "&2"  8 96 use tv 9 97 &end  98  99 macro pl1_lsubr  1 100 use tv 2 101 vfd 9/&4,9/&3,18/-1  3 102 tsx6 pl1_lsubr_fixup  4 103 tra &5  5 104 zero &U-lisp_subr_tv_,&1  6 105 use Names  7 106 &U: acc "&2"  8 107 use tv 9 108 &end  109  110 macro err_break  1 111 use tv 2 112 vfd 9/0,9/1,18/-1 3 113 tsx6 err_break-*,ic  4 114 zero &3,&4  5 115 zero &U-lisp_subr_tv_,&1  6 116 use Names  7 117 &U: acc "&2"  8 118 use tv 9 119 &end  120  121 macro none_such  1 122 use tv 2 123 zero 0,-1 3 124 drl 0 4 125 zero  5 126 zero &U-lisp_subr_tv_,&1  6 127 use Names  7 128 &U: acc "&2"  8 129 use tv 9 130 &end  131  000002 132 tv_begin: null  000002 133 lisp_subr_tv_: null 134  135 star_flt: type_0_subr lsubr,*$,0,511,lisp_utils_$times_flo  use tv  000002 aa 777000 777777 vfd 9/511,9/0,18/-1  000003 4a 4 00010 7101 20 tra lisp_utils_$times_flo 000004 aa 000000 000000 zero  000005 aa 003071 000001 zero .._00000-lisp_subr_tv_,lsubr use Names 003073 aa 002 052 044 000 .._00000: acc "*$" use tv 136 star_: type_0_subr lsubr,*,0,511,lisp_utils_$times_fix  use tv  000006 aa 777000 777777 vfd 9/511,9/0,18/-1  000007 4a 4 00012 7101 20 tra lisp_utils_$times_fix 000010 aa 000000 000000 zero  000011 aa 003072 000001 zero .._00001-lisp_subr_tv_,lsubr use Names 003074 aa 001 052 000 000 .._00001: acc "*"  use tv 137 star_array: pl1_lsubr lsubr,*array,3,511,lisp_array_fcns_$star_array  use tv 000012 aa 777003 777777 vfd 9/511,9/3,18/-1  000013 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000014 4a 4 00014 7101 20 tra lisp_array_fcns_$star_array  000015 aa 003073 000001 zero .._00002-lisp_subr_tv_,lsubr use Names  003075 aa 006 052 141 162 .._00002: acc "*array" 003076 aa 162 141 171 000 use tv 138 star_dif: type_1_subr lsubr,*dif,2,2,lisp_bignums_$difference  use tv 000016 aa 002002 777777 vfd 9/2,9/2,18/-1 000017 0a 002625 7060 00 tsx6 type_1_subr  000020 4a 4 00016 7101 20 tra lisp_bignums_$difference  000021 aa 003075 000001 zero .._00003-lisp_subr_tv_,lsubr use Names  003077 aa 004 052 144 151 .._00003: acc "*dif"  003100 aa 146 000 000 000 use tv 139 star_function: type_1_subr fsubr,*function,,,lisp_$stfunction use tv 000022 aa 000000 777777 vfd 9/,9/,18/-1  000023 0a 002625 7060 00 tsx6 type_1_subr  000024 4a 4 00020 7101 20 tra lisp_$stfunction  000025 aa 003077 000002 zero .._00004-lisp_subr_tv_,fsubr use Names  003101 aa 011 052 146 165 .._00004: acc "*function"  003102 aa 156 143 164 151 003103 aa 157 156 000 000 use tv 140 star_quo: type_1_subr lsubr,*quo,2,2,lisp_bignums_$quotient  use tv 000026 aa 002002 777777 vfd 9/2,9/2,18/-1 000027 0a 002625 7060 00 tsx6 type_1_subr  000030 4a 4 00022 7101 20 tra lisp_bignums_$quotient  000031 aa 003102 000001 zero .._00005-lisp_subr_tv_,lsubr use Names  003104 aa 004 052 161 165 .._00005: acc "*quo"  003105 aa 157 000 000 000 use tv 141 star_rearray: pl1_lsubr lsubr,*rearray,1,511,lisp_array_fcns_$star_rearray  use tv 000032 aa 777001 777777 vfd 9/511,9/1,18/-1  000033 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000034 4a 4 00024 7101 20 tra lisp_array_fcns_$star_rearray 000035 aa 003104 000001 zero .._00006-lisp_subr_tv_,lsubr use Names  003106 aa 010 052 162 145 .._00006: acc "*rearray"  003107 aa 141 162 162 141 003110 aa 171 000 000 000 use tv 142 star_rset: pl1 subr,*rset,1,,lisp_status_fns_$rset use tv 000036 aa 000001 777777 vfd 9/,9/1,18/-1  000037 0a 002632 7060 00 tsx6 pl1_fixup  000040 4a 4 00026 7101 20 tra lisp_status_fns_$rset 000041 aa 003107 000000 zero .._00007-lisp_subr_tv_,subr  use Names  003111 aa 005 052 162 163 .._00007: acc "*rset"  003112 aa 145 164 000 000 use tv 143 star_sstatus: pl1_lsubr lsubr,*sstatus,1,511,lisp_status_fns_$sstatus_  use tv 000042 aa 777001 777777 vfd 9/511,9/1,18/-1  000043 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000044 4a 4 00030 7101 20 tra lisp_status_fns_$sstatus_ 000045 aa 003111 000001 zero .._00010-lisp_subr_tv_,lsubr use Names  003113 aa 010 052 163 163 .._00010: acc "*sstatus"  003114 aa 164 141 164 165 003115 aa 163 000 000 000 use tv 144 star_status: pl1_lsubr lsubr,*status,1,511,lisp_status_fns_$status_ use tv 000046 aa 777001 777777 vfd 9/511,9/1,18/-1  000047 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000050 4a 4 00032 7101 20 tra lisp_status_fns_$status_  000051 aa 003114 000001 zero .._00011-lisp_subr_tv_,lsubr use Names  003116 aa 007 052 163 164 .._00011: acc "*status"  003117 aa 141 164 165 163 use tv 145 pls_flt: type_0_subr lsubr,+$,0,511,lisp_utils_$plus_flo use tv  000052 aa 777000 777777 vfd 9/511,9/0,18/-1  000053 4a 4 00034 7101 20 tra lisp_utils_$plus_flo  000054 aa 000000 000000 zero  000055 aa 003116 000001 zero .._00012-lisp_subr_tv_,lsubr use Names 003120 aa 002 053 044 000 .._00012: acc "+$" use tv 146 pls_: type_0_subr lsubr,+,0,511,lisp_utils_$plus_fix use tv  000056 aa 777000 777777 vfd 9/511,9/0,18/-1  000057 4a 4 00036 7101 20 tra lisp_utils_$plus_fix  000060 aa 000000 000000 zero  000061 aa 003117 000001 zero .._00013-lisp_subr_tv_,lsubr use Names 003121 aa 001 053 000 000 .._00013: acc "+"  use tv 147 mns_flt: type_0_subr lsubr,-$,0,511,lisp_utils_$diff_flo use tv  000062 aa 777000 777777 vfd 9/511,9/0,18/-1  000063 4a 4 00040 7101 20 tra lisp_utils_$diff_flo  000064 aa 000000 000000 zero  000065 aa 003120 000001 zero .._00014-lisp_subr_tv_,lsubr use Names 003122 aa 002 055 044 000 .._00014: acc "-$" use tv 148 mns_: type_0_subr lsubr,-,0,511,lisp_utils_$diff_fix use tv  000066 aa 777000 777777 vfd 9/511,9/0,18/-1  000067 4a 4 00042 7101 20 tra lisp_utils_$diff_fix  000070 aa 000000 000000 zero  000071 aa 003121 000001 zero .._00015-lisp_subr_tv_,lsubr use Names 003123 aa 001 055 000 000 .._00015: acc "-"  use tv 149 div_flt: type_0_subr lsubr,/$,0,511,lisp_utils_$quot_flo use tv  000072 aa 777000 777777 vfd 9/511,9/0,18/-1  000073 4a 4 00044 7101 20 tra lisp_utils_$quot_flo  000074 aa 000000 000000 zero  000075 aa 003122 000001 zero .._00016-lisp_subr_tv_,lsubr use Names 003124 aa 002 057 044 000 .._00016: acc "/$" use tv 150 div_: type_0_subr lsubr,/,0,511,lisp_utils_$quot_fix use tv  000076 aa 777000 777777 vfd 9/511,9/0,18/-1  000077 4a 4 00046 7101 20 tra lisp_utils_$quot_fix  000100 aa 000000 000000 zero  000101 aa 003123 000001 zero .._00017-lisp_subr_tv_,lsubr use Names 003125 aa 001 057 000 000 .._00017: acc "/"  use tv 151 one_pls_flt: type_0_subr subr,1+$,1,,lisp_utils_$add1_flo  use tv  000102 aa 000001 777777 vfd 9/,9/1,18/-1  000103 4a 4 00050 7101 20 tra lisp_utils_$add1_flo  000104 aa 000000 000000 zero  000105 aa 003124 000000 zero .._00020-lisp_subr_tv_,subr  use Names 003126 aa 003 061 053 044 .._00020: acc "1+$"  use tv 152 one_pls: type_0_subr subr,1+,1,,lisp_utils_$add1_fix  use tv  000106 aa 000001 777777 vfd 9/,9/1,18/-1  000107 4a 4 00052 7101 20 tra lisp_utils_$add1_fix  000110 aa 000000 000000 zero  000111 aa 003125 000000 zero .._00021-lisp_subr_tv_,subr  use Names 003127 aa 002 061 053 000 .._00021: acc "1+" use tv 153 one_mns_flt: type_0_subr subr,1-$,1,,lisp_utils_$sub1_flo  use tv  000112 aa 000001 777777 vfd 9/,9/1,18/-1  000113 4a 4 00054 7101 20 tra lisp_utils_$sub1_flo  000114 aa 000000 000000 zero  000115 aa 003126 000000 zero .._00022-lisp_subr_tv_,subr  use Names 003130 aa 003 061 055 044 .._00022: acc "1-$"  use tv 154 one_mns: type_0_subr subr,1-,1,,lisp_utils_$sub1_fix  use tv  000116 aa 000001 777777 vfd 9/,9/1,18/-1  000117 4a 4 00056 7101 20 tra lisp_utils_$sub1_fix  000120 aa 000000 000000 zero  000121 aa 003127 000000 zero .._00023-lisp_subr_tv_,subr  use Names 003131 aa 002 061 055 000 .._00023: acc "1-" use tv 155 ls_: type_0_subr subr,<,2,,lisp_utils_$ls_  use tv  000122 aa 000002 777777 vfd 9/,9/2,18/-1  000123 4a 4 00060 7101 20 tra lisp_utils_$ls_  000124 aa 000000 000000 zero  000125 aa 003130 000000 zero .._00024-lisp_subr_tv_,subr  use Names 003132 aa 001 074 000 000 .._00024: acc "<"  use tv 156 eqn_: type_0_subr subr,=,2,,lisp_utils_$eql_  use tv  000126 aa 000002 777777 vfd 9/,9/2,18/-1  000127 4a 4 00062 7101 20 tra lisp_utils_$eql_  000130 aa 000000 000000 zero  000131 aa 003131 000000 zero .._00025-lisp_subr_tv_,subr  use Names 003133 aa 001 075 000 000 .._00025: acc "="  use tv 157 gt_: type_0_subr subr,>,2,,lisp_utils_$gt_  use tv  000132 aa 000002 777777 vfd 9/,9/2,18/-1  000133 4a 4 00064 7101 20 tra lisp_utils_$gt_  000134 aa 000000 000000 zero  000135 aa 003132 000000 zero .._00026-lisp_subr_tv_,subr  use Names 003134 aa 001 076 000 000 .._00026: acc ">"  use tv 158 CtoI: pl1 subr,CtoI,1,,lisp_char_fns_$CtoI  use tv 000136 aa 000001 777777 vfd 9/,9/1,18/-1  000137 0a 002632 7060 00 tsx6 pl1_fixup  000140 4a 4 00066 7101 20 tra lisp_char_fns_$CtoI  000141 aa 003133 000000 zero .._00027-lisp_subr_tv_,subr  use Names  003135 aa 004 103 164 157 .._00027: acc "CtoI"  003136 aa 111 000 000 000 use tv 159 ItoC: pl1 subr,ItoC,1,,lisp_char_fns_$ItoC  use tv 000142 aa 000001 777777 vfd 9/,9/1,18/-1  000143 0a 002632 7060 00 tsx6 pl1_fixup  000144 4a 4 00070 7101 20 tra lisp_char_fns_$ItoC  000145 aa 003135 000000 zero .._00030-lisp_subr_tv_,subr  use Names  003137 aa 004 111 164 157 .._00030: acc "ItoC"  003140 aa 103 000 000 000 use tv 160 rem_: type_1_subr subr,\,2,,lisp_bignums_$remainder use tv 000146 aa 000002 777777 vfd 9/,9/2,18/-1  000147 0a 002625 7060 00 tsx6 type_1_subr  000150 4a 4 00072 7101 20 tra lisp_bignums_$remainder  000151 aa 003137 000000 zero .._00031-lisp_subr_tv_,subr  use Names  003141 aa 001 134 000 000 .._00031: acc "\"  use tv 161 abs: type_1_subr subr,abs,1,,lisp_bignums_$abs  use tv 000152 aa 000001 777777 vfd 9/,9/1,18/-1  000153 0a 002625 7060 00 tsx6 type_1_subr  000154 4a 4 00074 7101 20 tra lisp_bignums_$abs 000155 aa 003140 000000 zero .._00032-lisp_subr_tv_,subr  use Names  003142 aa 003 141 142 163 .._00032: acc "abs"  use tv 162 add1: type_1_subr subr,add1,1,,lisp_bignums_$add1  use tv 000156 aa 000001 777777 vfd 9/,9/1,18/-1  000157 0a 002625 7060 00 tsx6 type_1_subr  000160 4a 4 00076 7101 20 tra lisp_bignums_$add1  000161 aa 003141 000000 zero .._00033-lisp_subr_tv_,subr  use Names  003143 aa 004 141 144 144 .._00033: acc "add1"  003144 aa 061 000 000 000 use tv 163 alarmclock: pl1 subr,alarmclock,2,,lisp_fault_handler_$alarmclock  use tv 000162 aa 000002 777777 vfd 9/,9/2,18/-1  000163 0a 002632 7060 00 tsx6 pl1_fixup  000164 4a 4 00100 7101 20 tra lisp_fault_handler_$alarmclock  000165 aa 003143 000000 zero .._00034-lisp_subr_tv_,subr  use Names  003145 aa 012 141 154 141 .._00034: acc "alarmclock" 003146 aa 162 155 143 154 003147 aa 157 143 153 000 use tv 164 allfiles: pl1 subr,allfiles,1,,lisp_io_fns_$allfiles  use tv 000166 aa 000001 777777 vfd 9/,9/1,18/-1  000167 0a 002632 7060 00 tsx6 pl1_fixup  000170 4a 4 00102 7101 20 tra lisp_io_fns_$allfiles 000171 aa 003146 000000 zero .._00035-lisp_subr_tv_,subr  use Names  003150 aa 010 141 154 154 .._00035: acc "allfiles"  003151 aa 146 151 154 145 003152 aa 163 000 000 000 use tv 165 and: type_1_subr fsubr,and,,,lisp_quick_fcns_$and  use tv 000172 aa 000000 777777 vfd 9/,9/,18/-1  000173 0a 002625 7060 00 tsx6 type_1_subr  000174 4a 4 00104 7101 20 tra lisp_quick_fcns_$and  000175 aa 003151 000002 zero .._00036-lisp_subr_tv_,fsubr use Names  003153 aa 003 141 156 144 .._00036: acc "and"  use tv 166 append: type_1_subr lsubr,append,0,511,lisp_alloc_$append  use tv 000176 aa 777000 777777 vfd 9/511,9/0,18/-1  000177 0a 002625 7060 00 tsx6 type_1_subr  000200 4a 4 00106 7101 20 tra lisp_alloc_$append  000201 aa 003152 000001 zero .._00037-lisp_subr_tv_,lsubr use Names  003154 aa 006 141 160 160 .._00037: acc "append" 003155 aa 145 156 144 000 use tv 167 apply: type_1_subr lsubr,apply,2,3,lisp_$apply_  use tv 000202 aa 003002 777777 vfd 9/3,9/2,18/-1 000203 0a 002625 7060 00 tsx6 type_1_subr  000204 4a 4 00110 7101 20 tra lisp_$apply_  000205 aa 003154 000001 zero .._00040-lisp_subr_tv_,lsubr use Names  003156 aa 005 141 160 160 .._00040: acc "apply"  003157 aa 154 171 000 000 use tv 168 arg: type_1_subr subr,arg,1,,lisp_$arg  use tv 000206 aa 000001 777777 vfd 9/,9/1,18/-1  000207 0a 002625 7060 00 tsx6 type_1_subr  000210 4a 4 00112 7101 20 tra lisp_$arg 000211 aa 003156 000000 zero .._00041-lisp_subr_tv_,subr  use Names  003160 aa 003 141 162 147 .._00041: acc "arg"  use tv 169 args: pl1_lsubr lsubr,args,1,2,lisp_defsubr_$args  use tv 000212 aa 002001 777777 vfd 9/2,9/1,18/-1 000213 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000214 4a 4 00114 7101 20 tra lisp_defsubr_$args  000215 aa 003157 000001 zero .._00042-lisp_subr_tv_,lsubr use Names  003161 aa 004 141 162 147 .._00042: acc "args"  003162 aa 163 000 000 000 use tv 170 array: pl1 fsubr,array,,,lisp_array_fcns_$array  use tv 000216 aa 000000 777777 vfd 9/,9/,18/-1  000217 0a 002632 7060 00 tsx6 pl1_fixup  000220 4a 4 00116 7101 20 tra lisp_array_fcns_$array  000221 aa 003161 000002 zero .._00043-lisp_subr_tv_,fsubr use Names  003163 aa 005 141 162 162 .._00043: acc "array"  003164 aa 141 171 000 000 use tv 171 arraydims: pl1 subr,arraydims,1,,lisp_array_fcns_$arraydims  use tv 000222 aa 000001 777777 vfd 9/,9/1,18/-1  000223 0a 002632 7060 00 tsx6 pl1_fixup  000224 4a 4 00120 7101 20 tra lisp_array_fcns_$arraydims  000225 aa 003163 000000 zero .._00044-lisp_subr_tv_,subr  use Names  003165 aa 011 141 162 162 .._00044: acc "arraydims"  003166 aa 141 171 144 151 003167 aa 155 163 000 000 use tv 172 ascii: type_1_subr subr,ascii,1,,lisp_reader_alm_$ascii_alm use tv 000226 aa 000001 777777 vfd 9/,9/1,18/-1  000227 0a 002625 7060 00 tsx6 type_1_subr  000230 4a 4 00122 7101 20 tra lisp_reader_alm_$ascii_alm  000231 aa 003166 000000 zero .._00045-lisp_subr_tv_,subr  use Names  003170 aa 005 141 163 143 .._00045: acc "ascii"  003171 aa 151 151 000 000 use tv 173 assoc: type_0_subr subr,assoc,2,,lisp_quick_fcns_$assoc use tv  000232 aa 000002 777777 vfd 9/,9/2,18/-1  000233 4a 4 00124 7101 20 tra lisp_quick_fcns_$assoc  000234 aa 000000 000000 zero  000235 aa 003170 000000 zero .._00046-lisp_subr_tv_,subr  use Names 003172 aa 005 141 163 163 .._00046: acc "assoc"  003173 aa 157 143 000 000 use tv 174 assq: type_0_subr subr,assq,2,,lisp_quick_fcns_$assq  use tv  000236 aa 000002 777777 vfd 9/,9/2,18/-1  000237 4a 4 00126 7101 20 tra lisp_quick_fcns_$assq 000240 aa 000000 000000 zero  000241 aa 003172 000000 zero .._00047-lisp_subr_tv_,subr  use Names 003174 aa 004 141 163 163 .._00047: acc "assq"  003175 aa 161 000 000 000 use tv 175 atan: pl1_lsubr lsubr,atan,1,2,lisp_trig_$atan use tv 000242 aa 002001 777777 vfd 9/2,9/1,18/-1 000243 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000244 4a 4 00130 7101 20 tra lisp_trig_$atan  000245 aa 003174 000001 zero .._00050-lisp_subr_tv_,lsubr use Names  003176 aa 004 141 164 141 .._00050: acc "atan"  003177 aa 156 000 000 000 use tv 176 atom: type_0_subr subr,atom,1,,lisp_quick_fcns_$atom  use tv  000246 aa 000001 777777 vfd 9/,9/1,18/-1  000247 4a 4 00132 7101 20 tra lisp_quick_fcns_$atom 000250 aa 000000 000000 zero  000251 aa 003176 000000 zero .._00051-lisp_subr_tv_,subr  use Names 003200 aa 004 141 164 157 .._00051: acc "atom"  003201 aa 155 000 000 000 use tv 177 baktrace1: pl1_lsubr lsubr,baktrace1,0,2,lisp_baktrace_$baktrace1  use tv 000252 aa 002000 777777 vfd 9/2,9/0,18/-1 000253 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000254 4a 4 00134 7101 20 tra lisp_baktrace_$baktrace1  000255 aa 003200 000001 zero .._00052-lisp_subr_tv_,lsubr use Names  003202 aa 011 142 141 153 .._00052: acc "baktrace1"  003203 aa 164 162 141 143 003204 aa 145 061 000 000 use tv 178 baktrace2: pl1_lsubr lsubr,baktrace2,0,2,lisp_baktrace_$baktrace2  use tv 000256 aa 002000 777777 vfd 9/2,9/0,18/-1 000257 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000260 4a 4 00136 7101 20 tra lisp_baktrace_$baktrace2  000261 aa 003203 000001 zero .._00053-lisp_subr_tv_,lsubr use Names  003205 aa 011 142 141 153 .._00053: acc "baktrace2"  003206 aa 164 162 141 143 003207 aa 145 062 000 000 use tv 179 baktrace: pl1_lsubr lsubr,baktrace,0,2,lisp_baktrace_$baktrace use tv 000262 aa 002000 777777 vfd 9/2,9/0,18/-1 000263 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000264 4a 4 00140 7101 20 tra lisp_baktrace_$baktrace  000265 aa 003206 000001 zero .._00054-lisp_subr_tv_,lsubr use Names  003210 aa 010 142 141 153 .._00054: acc "baktrace"  003211 aa 164 162 141 143 003212 aa 145 000 000 000 use tv 180 bigp: type_0_subr subr,bigp,1,,lisp_quick_fcns_$bigp  use tv  000266 aa 000001 777777 vfd 9/,9/1,18/-1  000267 4a 4 00142 7101 20 tra lisp_quick_fcns_$bigp 000270 aa 000000 000000 zero  000271 aa 003211 000000 zero .._00055-lisp_subr_tv_,subr  use Names 003213 aa 004 142 151 147 .._00055: acc "bigp"  003214 aa 160 000 000 000 use tv 181 bltarray: pl1 subr,bltarray,2,,lisp_array_fcns_$bltarray  use tv 000272 aa 000002 777777 vfd 9/,9/2,18/-1  000273 0a 002632 7060 00 tsx6 pl1_fixup  000274 4a 4 00144 7101 20 tra lisp_array_fcns_$bltarray 000275 aa 003213 000000 zero .._00056-lisp_subr_tv_,subr  use Names  003215 aa 010 142 154 164 .._00056: acc "bltarray"  003216 aa 141 162 162 141 003217 aa 171 000 000 000 use tv 182 boole: type_0_subr lsubr,boole,3,511,lisp_utils_$boole  use tv  000276 aa 777003 777777 vfd 9/511,9/3,18/-1  000277 4a 4 00146 7101 20 tra lisp_utils_$boole 000300 aa 000000 000000 zero  000301 aa 003216 000001 zero .._00057-lisp_subr_tv_,lsubr use Names 003220 aa 005 142 157 157 .._00057: acc "boole"  003221 aa 154 145 000 000 use tv 183 boundp: type_1_subr subr,boundp,1,,lisp_alloc_$boundp  use tv 000302 aa 000001 777777 vfd 9/,9/1,18/-1  000303 0a 002625 7060 00 tsx6 type_1_subr  000304 4a 4 00150 7101 20 tra lisp_alloc_$boundp  000305 aa 003220 000000 zero .._00060-lisp_subr_tv_,subr  use Names  003222 aa 006 142 157 165 .._00060: acc "boundp" 003223 aa 156 144 160 000 use tv 184 break: pl1 fsubr,break,,,lisp_prog_fns_$break  use tv 000306 aa 000000 777777 vfd 9/,9/,18/-1  000307 0a 002632 7060 00 tsx6 pl1_fixup  000310 4a 4 00152 7101 20 tra lisp_prog_fns_$break  000311 aa 003222 000002 zero .._00061-lisp_subr_tv_,fsubr use Names  003224 aa 005 142 162 145 .._00061: acc "break"  003225 aa 141 153 000 000 use tv 185 caaaar: type_1_subr subr,caaaar,1,,lisp_car_cdrs_$caaaar  use tv 000312 aa 000001 777777 vfd 9/,9/1,18/-1  000313 0a 002625 7060 00 tsx6 type_1_subr  000314 4a 4 00154 7101 20 tra lisp_car_cdrs_$caaaar 000315 aa 003224 000000 zero .._00062-lisp_subr_tv_,subr  use Names  003226 aa 006 143 141 141 .._00062: acc "caaaar" 003227 aa 141 141 162 000 use tv 186 caaadr: type_1_subr subr,caaadr,1,,lisp_car_cdrs_$caaadr  use tv 000316 aa 000001 777777 vfd 9/,9/1,18/-1  000317 0a 002625 7060 00 tsx6 type_1_subr  000320 4a 4 00156 7101 20 tra lisp_car_cdrs_$caaadr 000321 aa 003226 000000 zero .._00063-lisp_subr_tv_,subr  use Names  003230 aa 006 143 141 141 .._00063: acc "caaadr" 003231 aa 141 144 162 000 use tv 187 caaar: type_1_subr subr,caaar,1,,lisp_car_cdrs_$caaar  use tv 000322 aa 000001 777777 vfd 9/,9/1,18/-1  000323 0a 002625 7060 00 tsx6 type_1_subr  000324 4a 4 00160 7101 20 tra lisp_car_cdrs_$caaar  000325 aa 003230 000000 zero .._00064-lisp_subr_tv_,subr  use Names  003232 aa 005 143 141 141 .._00064: acc "caaar"  003233 aa 141 162 000 000 use tv 188 caadar: type_1_subr subr,caadar,1,,lisp_car_cdrs_$caadar  use tv 000326 aa 000001 777777 vfd 9/,9/1,18/-1  000327 0a 002625 7060 00 tsx6 type_1_subr  000330 4a 4 00162 7101 20 tra lisp_car_cdrs_$caadar 000331 aa 003232 000000 zero .._00065-lisp_subr_tv_,subr  use Names  003234 aa 006 143 141 141 .._00065: acc "caadar" 003235 aa 144 141 162 000 use tv 189 caaddr: type_1_subr subr,caaddr,1,,lisp_car_cdrs_$caaddr  use tv 000332 aa 000001 777777 vfd 9/,9/1,18/-1  000333 0a 002625 7060 00 tsx6 type_1_subr  000334 4a 4 00164 7101 20 tra lisp_car_cdrs_$caaddr 000335 aa 003234 000000 zero .._00066-lisp_subr_tv_,subr  use Names  003236 aa 006 143 141 141 .._00066: acc "caaddr" 003237 aa 144 144 162 000 use tv 190 caadr: type_1_subr subr,caadr,1,,lisp_car_cdrs_$caadr  use tv 000336 aa 000001 777777 vfd 9/,9/1,18/-1  000337 0a 002625 7060 00 tsx6 type_1_subr  000340 4a 4 00166 7101 20 tra lisp_car_cdrs_$caadr  000341 aa 003236 000000 zero .._00067-lisp_subr_tv_,subr  use Names  003240 aa 005 143 141 141 .._00067: acc "caadr"  003241 aa 144 162 000 000 use tv 191 caar: type_1_subr subr,caar,1,,lisp_car_cdrs_$caar  use tv 000342 aa 000001 777777 vfd 9/,9/1,18/-1  000343 0a 002625 7060 00 tsx6 type_1_subr  000344 4a 4 00170 7101 20 tra lisp_car_cdrs_$caar  000345 aa 003240 000000 zero .._00070-lisp_subr_tv_,subr  use Names  003242 aa 004 143 141 141 .._00070: acc "caar"  003243 aa 162 000 000 000 use tv 192 cadaar: type_1_subr subr,cadaar,1,,lisp_car_cdrs_$cadaar  use tv 000346 aa 000001 777777 vfd 9/,9/1,18/-1  000347 0a 002625 7060 00 tsx6 type_1_subr  000350 4a 4 00172 7101 20 tra lisp_car_cdrs_$cadaar 000351 aa 003242 000000 zero .._00071-lisp_subr_tv_,subr  use Names  003244 aa 006 143 141 144 .._00071: acc "cadaar" 003245 aa 141 141 162 000 use tv 193 cadadr: type_1_subr subr,cadadr,1,,lisp_car_cdrs_$cadadr  use tv 000352 aa 000001 777777 vfd 9/,9/1,18/-1  000353 0a 002625 7060 00 tsx6 type_1_subr  000354 4a 4 00174 7101 20 tra lisp_car_cdrs_$cadadr 000355 aa 003244 000000 zero .._00072-lisp_subr_tv_,subr  use Names  003246 aa 006 143 141 144 .._00072: acc "cadadr" 003247 aa 141 144 162 000 use tv 194 cadar: type_1_subr subr,cadar,1,,lisp_car_cdrs_$cadar  use tv 000356 aa 000001 777777 vfd 9/,9/1,18/-1  000357 0a 002625 7060 00 tsx6 type_1_subr  000360 4a 4 00176 7101 20 tra lisp_car_cdrs_$cadar  000361 aa 003246 000000 zero .._00073-lisp_subr_tv_,subr  use Names  003250 aa 005 143 141 144 .._00073: acc "cadar"  003251 aa 141 162 000 000 use tv 195 caddar: type_1_subr subr,caddar,1,,lisp_car_cdrs_$caddar  use tv 000362 aa 000001 777777 vfd 9/,9/1,18/-1  000363 0a 002625 7060 00 tsx6 type_1_subr  000364 4a 4 00200 7101 20 tra lisp_car_cdrs_$caddar 000365 aa 003250 000000 zero .._00074-lisp_subr_tv_,subr  use Names  003252 aa 006 143 141 144 .._00074: acc "caddar" 003253 aa 144 141 162 000 use tv 196 cadddr: type_1_subr subr,cadddr,1,,lisp_car_cdrs_$cadddr  use tv 000366 aa 000001 777777 vfd 9/,9/1,18/-1  000367 0a 002625 7060 00 tsx6 type_1_subr  000370 4a 4 00202 7101 20 tra lisp_car_cdrs_$cadddr 000371 aa 003252 000000 zero .._00075-lisp_subr_tv_,subr  use Names  003254 aa 006 143 141 144 .._00075: acc "cadddr" 003255 aa 144 144 162 000 use tv 197 caddr: type_1_subr subr,caddr,1,,lisp_car_cdrs_$caddr  use tv 000372 aa 000001 777777 vfd 9/,9/1,18/-1  000373 0a 002625 7060 00 tsx6 type_1_subr  000374 4a 4 00204 7101 20 tra lisp_car_cdrs_$caddr  000375 aa 003254 000000 zero .._00076-lisp_subr_tv_,subr  use Names  003256 aa 005 143 141 144 .._00076: acc "caddr"  003257 aa 144 162 000 000 use tv 198 cadr: type_1_subr subr,cadr,1,,lisp_car_cdrs_$cadr  use tv 000376 aa 000001 777777 vfd 9/,9/1,18/-1  000377 0a 002625 7060 00 tsx6 type_1_subr  000400 4a 4 00206 7101 20 tra lisp_car_cdrs_$cadr  000401 aa 003256 000000 zero .._00077-lisp_subr_tv_,subr  use Names  003260 aa 004 143 141 144 .._00077: acc "cadr"  003261 aa 162 000 000 000 use tv 199 car: type_0_subr subr,car,1,,lisp_car_cdrs_$car use tv  000402 aa 000001 777777 vfd 9/,9/1,18/-1  000403 4a 4 00210 7101 20 tra lisp_car_cdrs_$car  000404 aa 000000 000000 zero  000405 aa 003260 000000 zero .._00100-lisp_subr_tv_,subr  use Names 003262 aa 003 143 141 162 .._00100: acc "car"  use tv 200 catch: pl1 fsubr,catch,,,lisp_prog_fns_$catch  use tv 000406 aa 000000 777777 vfd 9/,9/,18/-1  000407 0a 002632 7060 00 tsx6 pl1_fixup  000410 4a 4 00212 7101 20 tra lisp_prog_fns_$catch  000411 aa 003261 000002 zero .._00101-lisp_subr_tv_,fsubr use Names  003263 aa 005 143 141 164 .._00101: acc "catch"  003264 aa 143 150 000 000 use tv 201 catenate: pl1_lsubr lsubr,catenate,0,511,lisp_char_fns_$catenate  use tv 000412 aa 777000 777777 vfd 9/511,9/0,18/-1  000413 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000414 4a 4 00214 7101 20 tra lisp_char_fns_$catenate  000415 aa 003263 000001 zero .._00102-lisp_subr_tv_,lsubr use Names  003265 aa 010 143 141 164 .._00102: acc "catenate"  003266 aa 145 156 141 164 003267 aa 145 000 000 000 use tv 202 cdaaar: type_1_subr subr,cdaaar,1,,lisp_car_cdrs_$cdaaar  use tv 000416 aa 000001 777777 vfd 9/,9/1,18/-1  000417 0a 002625 7060 00 tsx6 type_1_subr  000420 4a 4 00216 7101 20 tra lisp_car_cdrs_$cdaaar 000421 aa 003266 000000 zero .._00103-lisp_subr_tv_,subr  use Names  003270 aa 006 143 144 141 .._00103: acc "cdaaar" 003271 aa 141 141 162 000 use tv 203 cdaadr: type_1_subr subr,cdaadr,1,,lisp_car_cdrs_$cdaadr  use tv 000422 aa 000001 777777 vfd 9/,9/1,18/-1  000423 0a 002625 7060 00 tsx6 type_1_subr  000424 4a 4 00220 7101 20 tra lisp_car_cdrs_$cdaadr 000425 aa 003270 000000 zero .._00104-lisp_subr_tv_,subr  use Names  003272 aa 006 143 144 141 .._00104: acc "cdaadr" 003273 aa 141 144 162 000 use tv 204 cdaar: type_1_subr subr,cdaar,1,,lisp_car_cdrs_$cdaar  use tv 000426 aa 000001 777777 vfd 9/,9/1,18/-1  000427 0a 002625 7060 00 tsx6 type_1_subr  000430 4a 4 00222 7101 20 tra lisp_car_cdrs_$cdaar  000431 aa 003272 000000 zero .._00105-lisp_subr_tv_,subr  use Names  003274 aa 005 143 144 141 .._00105: acc "cdaar"  003275 aa 141 162 000 000 use tv 205 cdadar: type_1_subr subr,cdadar,1,,lisp_car_cdrs_$cdadar  use tv 000432 aa 000001 777777 vfd 9/,9/1,18/-1  000433 0a 002625 7060 00 tsx6 type_1_subr  000434 4a 4 00224 7101 20 tra lisp_car_cdrs_$cdadar 000435 aa 003274 000000 zero .._00106-lisp_subr_tv_,subr  use Names  003276 aa 006 143 144 141 .._00106: acc "cdadar" 003277 aa 144 141 162 000 use tv 206 cdaddr: type_1_subr subr,cdaddr,1,,lisp_car_cdrs_$cdaddr  use tv 000436 aa 000001 777777 vfd 9/,9/1,18/-1  000437 0a 002625 7060 00 tsx6 type_1_subr  000440 4a 4 00226 7101 20 tra lisp_car_cdrs_$cdaddr 000441 aa 003276 000000 zero .._00107-lisp_subr_tv_,subr  use Names  003300 aa 006 143 144 141 .._00107: acc "cdaddr" 003301 aa 144 144 162 000 use tv 207 cdadr: type_1_subr subr,cdadr,1,,lisp_car_cdrs_$cdadr  use tv 000442 aa 000001 777777 vfd 9/,9/1,18/-1  000443 0a 002625 7060 00 tsx6 type_1_subr  000444 4a 4 00230 7101 20 tra lisp_car_cdrs_$cdadr  000445 aa 003300 000000 zero .._00110-lisp_subr_tv_,subr  use Names  003302 aa 005 143 144 141 .._00110: acc "cdadr"  003303 aa 144 162 000 000 use tv 208 cdar: type_1_subr subr,cdar,1,,lisp_car_cdrs_$cdar  use tv 000446 aa 000001 777777 vfd 9/,9/1,18/-1  000447 0a 002625 7060 00 tsx6 type_1_subr  000450 4a 4 00232 7101 20 tra lisp_car_cdrs_$cdar  000451 aa 003302 000000 zero .._00111-lisp_subr_tv_,subr  use Names  003304 aa 004 143 144 141 .._00111: acc "cdar"  003305 aa 162 000 000 000 use tv 209 cddaar: type_1_subr subr,cddaar,1,,lisp_car_cdrs_$cddaar  use tv 000452 aa 000001 777777 vfd 9/,9/1,18/-1  000453 0a 002625 7060 00 tsx6 type_1_subr  000454 4a 4 00234 7101 20 tra lisp_car_cdrs_$cddaar 000455 aa 003304 000000 zero .._00112-lisp_subr_tv_,subr  use Names  003306 aa 006 143 144 144 .._00112: acc "cddaar" 003307 aa 141 141 162 000 use tv 210 cddadr: type_1_subr subr,cddadr,1,,lisp_car_cdrs_$cddadr  use tv 000456 aa 000001 777777 vfd 9/,9/1,18/-1  000457 0a 002625 7060 00 tsx6 type_1_subr  000460 4a 4 00236 7101 20 tra lisp_car_cdrs_$cddadr 000461 aa 003306 000000 zero .._00113-lisp_subr_tv_,subr  use Names  003310 aa 006 143 144 144 .._00113: acc "cddadr" 003311 aa 141 144 162 000 use tv 211 cddar: type_1_subr subr,cddar,1,,lisp_car_cdrs_$cddar  use tv 000462 aa 000001 777777 vfd 9/,9/1,18/-1  000463 0a 002625 7060 00 tsx6 type_1_subr  000464 4a 4 00240 7101 20 tra lisp_car_cdrs_$cddar  000465 aa 003310 000000 zero .._00114-lisp_subr_tv_,subr  use Names  003312 aa 005 143 144 144 .._00114: acc "cddar"  003313 aa 141 162 000 000 use tv 212 cdddar: type_1_subr subr,cdddar,1,,lisp_car_cdrs_$cdddar  use tv 000466 aa 000001 777777 vfd 9/,9/1,18/-1  000467 0a 002625 7060 00 tsx6 type_1_subr  000470 4a 4 00242 7101 20 tra lisp_car_cdrs_$cdddar 000471 aa 003312 000000 zero .._00115-lisp_subr_tv_,subr  use Names  003314 aa 006 143 144 144 .._00115: acc "cdddar" 003315 aa 144 141 162 000 use tv 213 cddddr: type_1_subr subr,cddddr,1,,lisp_car_cdrs_$cddddr  use tv 000472 aa 000001 777777 vfd 9/,9/1,18/-1  000473 0a 002625 7060 00 tsx6 type_1_subr  000474 4a 4 00244 7101 20 tra lisp_car_cdrs_$cddddr 000475 aa 003314 000000 zero .._00116-lisp_subr_tv_,subr  use Names  003316 aa 006 143 144 144 .._00116: acc "cddddr" 003317 aa 144 144 162 000 use tv 214 cdddr: type_1_subr subr,cdddr,1,,lisp_car_cdrs_$cdddr  use tv 000476 aa 000001 777777 vfd 9/,9/1,18/-1  000477 0a 002625 7060 00 tsx6 type_1_subr  000500 4a 4 00246 7101 20 tra lisp_car_cdrs_$cdddr  000501 aa 003316 000000 zero .._00117-lisp_subr_tv_,subr  use Names  003320 aa 005 143 144 144 .._00117: acc "cdddr"  003321 aa 144 162 000 000 use tv 215 cddr: type_1_subr subr,cddr,1,,lisp_car_cdrs_$cddr  use tv 000502 aa 000001 777777 vfd 9/,9/1,18/-1  000503 0a 002625 7060 00 tsx6 type_1_subr  000504 4a 4 00250 7101 20 tra lisp_car_cdrs_$cddr  000505 aa 003320 000000 zero .._00120-lisp_subr_tv_,subr  use Names  003322 aa 004 143 144 144 .._00120: acc "cddr"  003323 aa 162 000 000 000 use tv 216 cdr: type_0_subr subr,cdr,1,,lisp_car_cdrs_$cdr use tv  000506 aa 000001 777777 vfd 9/,9/1,18/-1  000507 4a 4 00252 7101 20 tra lisp_car_cdrs_$cdr  000510 aa 000000 000000 zero  000511 aa 003322 000000 zero .._00121-lisp_subr_tv_,subr  use Names 003324 aa 003 143 144 162 .._00121: acc "cdr"  use tv 217 chrct: type_0_subr lsubr,chrct,1,2,lisp_reader_alm_$chrct  use tv  000512 aa 002001 777777 vfd 9/2,9/1,18/-1 000513 4a 4 00254 7101 20 tra lisp_reader_alm_$chrct  000514 aa 000000 000000 zero  000515 aa 003323 000001 zero .._00122-lisp_subr_tv_,lsubr use Names 003325 aa 005 143 150 162 .._00122: acc "chrct"  003326 aa 143 164 000 000 use tv 218 cline: pl1 subr,cline,1,,lisp_command_caller_$cline  use tv 000516 aa 000001 777777 vfd 9/,9/1,18/-1  000517 0a 002632 7060 00 tsx6 pl1_fixup  000520 4a 4 00256 7101 20 tra lisp_command_caller_$cline  000521 aa 003325 000000 zero .._00123-lisp_subr_tv_,subr  use Names  003327 aa 005 143 154 151 .._00123: acc "cline"  003330 aa 156 145 000 000 use tv 219 close: pl1 subr,close,1,,lisp_io_control_$close  use tv 000522 aa 000001 777777 vfd 9/,9/1,18/-1  000523 0a 002632 7060 00 tsx6 pl1_fixup  000524 4a 4 00260 7101 20 tra lisp_io_control_$close  000525 aa 003327 000000 zero .._00124-lisp_subr_tv_,subr  use Names  003331 aa 005 143 154 157 .._00124: acc "close"  003332 aa 163 145 000 000 use tv 220 comment: type_1_subr fsubr,comment,,,lisp_quick_fcns_$comment  use tv 000526 aa 000000 777777 vfd 9/,9/,18/-1  000527 0a 002625 7060 00 tsx6 type_1_subr  000530 4a 4 00262 7101 20 tra lisp_quick_fcns_$comment  000531 aa 003331 000002 zero .._00125-lisp_subr_tv_,fsubr use Names  003333 aa 007 143 157 155 .._00125: acc "comment"  003334 aa 155 145 156 164 use tv 221 cond: type_1_subr fsubr,cond,,,lisp_quick_fcns_$cond use tv 000532 aa 000000 777777 vfd 9/,9/,18/-1  000533 0a 002625 7060 00 tsx6 type_1_subr  000534 4a 4 00264 7101 20 tra lisp_quick_fcns_$cond 000535 aa 003333 000002 zero .._00126-lisp_subr_tv_,fsubr use Names  003335 aa 004 143 157 156 .._00126: acc "cond"  003336 aa 144 000 000 000 use tv 222 cons: type_1_subr subr,cons,2,,lisp_alloc_$cons_  use tv 000536 aa 000002 777777 vfd 9/,9/2,18/-1  000537 0a 002625 7060 00 tsx6 type_1_subr  000540 4a 4 00266 7101 20 tra lisp_alloc_$cons_ 000541 aa 003335 000000 zero .._00127-lisp_subr_tv_,subr  use Names  003337 aa 004 143 157 156 .._00127: acc "cons"  003340 aa 163 000 000 000 use tv 223 cos: pl1 subr,cos,1,,lisp_trig_$cos  use tv 000542 aa 000001 777777 vfd 9/,9/1,18/-1  000543 0a 002632 7060 00 tsx6 pl1_fixup  000544 4a 4 00270 7101 20 tra lisp_trig_$cos  000545 aa 003337 000000 zero .._00130-lisp_subr_tv_,subr  use Names  003341 aa 003 143 157 163 .._00130: acc "cos"  use tv 224 declare: type_1_subr fsubr,declare,,,lisp_quick_fcns_$declare  use tv 000546 aa 000000 777777 vfd 9/,9/,18/-1  000547 0a 002625 7060 00 tsx6 type_1_subr  000550 4a 4 00272 7101 20 tra lisp_quick_fcns_$declare  000551 aa 003340 000002 zero .._00131-lisp_subr_tv_,fsubr use Names  003342 aa 007 144 145 143 .._00131: acc "declare"  003343 aa 154 141 162 145 use tv 225 definedp: type_1_subr subr,definedp,1,,lisp_alloc_$boundp  use tv 000552 aa 000001 777777 vfd 9/,9/1,18/-1  000553 0a 002625 7060 00 tsx6 type_1_subr  000554 4a 4 00150 7101 20 tra lisp_alloc_$boundp  000555 aa 003342 000000 zero .._00132-lisp_subr_tv_,subr  use Names  003344 aa 010 144 145 146 .._00132: acc "definedp"  003345 aa 151 156 145 144 003346 aa 160 000 000 000 use tv 226 defprop: pl1 fsubr,defprop,,,lisp_define_$defprop  use tv 000556 aa 000000 777777 vfd 9/,9/,18/-1  000557 0a 002632 7060 00 tsx6 pl1_fixup  000560 4a 4 00274 7101 20 tra lisp_define_$defprop  000561 aa 003345 000002 zero .._00133-lisp_subr_tv_,fsubr use Names  003347 aa 007 144 145 146 .._00133: acc "defprop"  003350 aa 160 162 157 160 use tv 227 defsubr: pl1_lsubr lsubr,defsubr,3,7,lisp_defsubr_$defsubr use tv 000562 aa 007003 777777 vfd 9/7,9/3,18/-1 000563 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000564 4a 4 00276 7101 20 tra lisp_defsubr_$defsubr 000565 aa 003347 000001 zero .._00134-lisp_subr_tv_,lsubr use Names  003351 aa 007 144 145 146 .._00134: acc "defsubr"  003352 aa 163 165 142 162 use tv 228 defun: pl1 fsubr,defun,,,lisp_define_$defun  use tv 000566 aa 000000 777777 vfd 9/,9/,18/-1  000567 0a 002632 7060 00 tsx6 pl1_fixup  000570 4a 4 00300 7101 20 tra lisp_define_$defun  000571 aa 003351 000002 zero .._00135-lisp_subr_tv_,fsubr use Names  003353 aa 005 144 145 146 .._00135: acc "defun"  003354 aa 165 156 000 000 use tv 229 delete: type_1_subr lsubr,delete,2,3,lisp_quick_fcns_$delete use tv 000572 aa 003002 777777 vfd 9/3,9/2,18/-1 000573 0a 002625 7060 00 tsx6 type_1_subr  000574 4a 4 00302 7101 20 tra lisp_quick_fcns_$delete  000575 aa 003353 000001 zero .._00136-lisp_subr_tv_,lsubr use Names  003355 aa 006 144 145 154 .._00136: acc "delete" 003356 aa 145 164 145 000 use tv 230 deletef: pl1 subr,deletef,1,,lisp_io_control_$deletef use tv 000576 aa 000001 777777 vfd 9/,9/1,18/-1  000577 0a 002632 7060 00 tsx6 pl1_fixup  000600 4a 4 00304 7101 20 tra lisp_io_control_$deletef  000601 aa 003355 000000 zero .._00137-lisp_subr_tv_,subr  use Names  003357 aa 007 144 145 154 .._00137: acc "deletef"  003360 aa 145 164 145 146 use tv 231 delq: type_1_subr lsubr,delq,2,3,lisp_quick_fcns_$delq  use tv 000602 aa 003002 777777 vfd 9/3,9/2,18/-1 000603 0a 002625 7060 00 tsx6 type_1_subr  000604 4a 4 00306 7101 20 tra lisp_quick_fcns_$delq 000605 aa 003357 000001 zero .._00140-lisp_subr_tv_,lsubr use Names  003361 aa 004 144 145 154 .._00140: acc "delq"  003362 aa 161 000 000 000 use tv 232 difference: type_1_subr lsubr,difference,1,511,lisp_bignums_$difference  use tv 000606 aa 777001 777777 vfd 9/511,9/1,18/-1  000607 0a 002625 7060 00 tsx6 type_1_subr  000610 4a 4 00016 7101 20 tra lisp_bignums_$difference  000611 aa 003361 000001 zero .._00141-lisp_subr_tv_,lsubr use Names  003363 aa 012 144 151 146 .._00141: acc "difference" 003364 aa 146 145 162 145 003365 aa 156 143 145 000 use tv 233 do: pl1 fsubr,do,,,lisp_prog_fns_$do  use tv 000612 aa 000000 777777 vfd 9/,9/,18/-1  000613 0a 002632 7060 00 tsx6 pl1_fixup  000614 4a 4 00310 7101 20 tra lisp_prog_fns_$do 000615 aa 003364 000002 zero .._00142-lisp_subr_tv_,fsubr use Names  003366 aa 002 144 157 000 .._00142: acc "do" use tv 234 eoffn: pl1_lsubr lsubr,eoffn,1,2,lisp_io_fns_$eoffn  use tv 000616 aa 002001 777777 vfd 9/2,9/1,18/-1 000617 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000620 4a 4 00312 7101 20 tra lisp_io_fns_$eoffn  000621 aa 003365 000001 zero .._00143-lisp_subr_tv_,lsubr use Names  003367 aa 005 145 157 146 .._00143: acc "eoffn"  003370 aa 146 156 000 000 use tv 235 eq: type_0_subr subr,eq,2,,lisp_quick_fcns_$eq  use tv  000622 aa 000002 777777 vfd 9/,9/2,18/-1  000623 4a 4 00314 7101 20 tra lisp_quick_fcns_$eq  000624 aa 000000 000000 zero  000625 aa 003367 000000 zero .._00144-lisp_subr_tv_,subr  use Names 003371 aa 002 145 161 000 .._00144: acc "eq" use tv 236 equal: type_0_subr subr,equal,2,,lisp_quick_fcns_$equal use tv  000626 aa 000002 777777 vfd 9/,9/2,18/-1  000627 4a 4 00316 7101 20 tra lisp_quick_fcns_$equal  000630 aa 000000 000000 zero  000631 aa 003370 000000 zero .._00145-lisp_subr_tv_,subr  use Names 003372 aa 005 145 161 165 .._00145: acc "equal"  003373 aa 141 154 000 000 use tv 237 err: pl1 fsubr,err,,,lisp_error_$err  use tv 000632 aa 000000 777777 vfd 9/,9/,18/-1  000633 0a 002632 7060 00 tsx6 pl1_fixup  000634 4a 4 00320 7101 20 tra lisp_error_$err  000635 aa 003372 000002 zero .._00146-lisp_subr_tv_,fsubr use Names  003374 aa 003 145 162 162 .._00146: acc "err"  use tv 238 errframe: pl1 subr,errframe,1,,lisp_error_$errframe  use tv 000636 aa 000001 777777 vfd 9/,9/1,18/-1  000637 0a 002632 7060 00 tsx6 pl1_fixup  000640 4a 4 00322 7101 20 tra lisp_error_$errframe  000641 aa 003373 000000 zero .._00147-lisp_subr_tv_,subr  use Names  003375 aa 010 145 162 162 .._00147: acc "errframe"  003376 aa 146 162 141 155 003377 aa 145 000 000 000 use tv 239 errprint: pl1 subr,errprint,1,,lisp_error_$errprint  use tv 000642 aa 000001 777777 vfd 9/,9/1,18/-1  000643 0a 002632 7060 00 tsx6 pl1_fixup  000644 4a 4 00324 7101 20 tra lisp_error_$errprint  000645 aa 003376 000000 zero .._00150-lisp_subr_tv_,subr  use Names  003400 aa 010 145 162 162 .._00150: acc "errprint"  003401 aa 160 162 151 156 003402 aa 164 000 000 000 use tv 240 errset: pl1 fsubr,errset,,,lisp_prog_fns_$errset  use tv 000646 aa 000000 777777 vfd 9/,9/,18/-1  000647 0a 002632 7060 00 tsx6 pl1_fixup  000650 4a 4 00326 7101 20 tra lisp_prog_fns_$errset 000651 aa 003401 000002 zero .._00151-lisp_subr_tv_,fsubr use Names  003403 aa 006 145 162 162 .._00151: acc "errset" 003404 aa 163 145 164 000 use tv 241 eval: type_1_subr lsubr,eval,1,2,lisp_$eval_ use tv 000652 aa 002001 777777 vfd 9/2,9/1,18/-1 000653 0a 002625 7060 00 tsx6 type_1_subr  000654 4a 4 00330 7101 20 tra lisp_$eval_  000655 aa 003403 000001 zero .._00152-lisp_subr_tv_,lsubr use Names  003405 aa 004 145 166 141 .._00152: acc "eval"  003406 aa 154 000 000 000 use tv 242 evalframe: pl1 subr,evalframe,1,,lisp_error_$pdlframe  use tv 000656 aa 000001 777777 vfd 9/,9/1,18/-1  000657 0a 002632 7060 00 tsx6 pl1_fixup  000660 4a 4 00332 7101 20 tra lisp_error_$pdlframe  000661 aa 003405 000000 zero .._00153-lisp_subr_tv_,subr  use Names  003407 aa 011 145 166 141 .._00153: acc "evalframe"  003410 aa 154 146 162 141 003411 aa 155 145 000 000 use tv 243 exp: pl1 subr,exp,1,,lisp_trig_$exp  use tv 000662 aa 000001 777777 vfd 9/,9/1,18/-1  000663 0a 002632 7060 00 tsx6 pl1_fixup  000664 4a 4 00334 7101 20 tra lisp_trig_$exp  000665 aa 003410 000000 zero .._00154-lisp_subr_tv_,subr  use Names  003412 aa 003 145 170 160 .._00154: acc "exp"  use tv 244 explode: pl1 subr,explode,1,,lisp_print_$explode  use tv 000666 aa 000001 777777 vfd 9/,9/1,18/-1  000667 0a 002632 7060 00 tsx6 pl1_fixup  000670 4a 4 00336 7101 20 tra lisp_print_$explode  000671 aa 003411 000000 zero .._00155-lisp_subr_tv_,subr  use Names  003413 aa 007 145 170 160 .._00155: acc "explode"  003414 aa 154 157 144 145 use tv 245 explodec: pl1 subr,explodec,1,,lisp_print_$explodec  use tv 000672 aa 000001 777777 vfd 9/,9/1,18/-1  000673 0a 002632 7060 00 tsx6 pl1_fixup  000674 4a 4 00340 7101 20 tra lisp_print_$explodec  000675 aa 003413 000000 zero .._00156-lisp_subr_tv_,subr  use Names  003415 aa 010 145 170 160 .._00156: acc "explodec"  003416 aa 154 157 144 145 003417 aa 143 000 000 000 use tv 246 exploden: pl1 subr,exploden,1,,lisp_print_$exploden  use tv 000676 aa 000001 777777 vfd 9/,9/1,18/-1  000677 0a 002632 7060 00 tsx6 pl1_fixup  000700 4a 4 00342 7101 20 tra lisp_print_$exploden  000701 aa 003416 000000 zero .._00157-lisp_subr_tv_,subr  use Names  003420 aa 010 145 170 160 .._00157: acc "exploden"  003421 aa 154 157 144 145 003422 aa 156 000 000 000 use tv 247 expt: type_1_subr subr,expt,2,,lisp_bignums_$expt  use tv 000702 aa 000002 777777 vfd 9/,9/2,18/-1  000703 0a 002625 7060 00 tsx6 type_1_subr  000704 4a 4 00344 7101 20 tra lisp_bignums_$expt  000705 aa 003421 000000 zero .._00160-lisp_subr_tv_,subr  use Names  003423 aa 004 145 170 160 .._00160: acc "expt"  003424 aa 164 000 000 000 use tv 248 filepos: pl1_lsubr lsubr,filepos,1,2,lisp_io_fns_$filepos  use tv 000706 aa 002001 777777 vfd 9/2,9/1,18/-1 000707 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  000710 4a 4 00346 7101 20 tra lisp_io_fns_$filepos  000711 aa 003423 000001 zero .._00161-lisp_subr_tv_,lsubr use Names  003425 aa 007 146 151 154 .._00161: acc "filepos"  003426 aa 145 160 157 163 use tv 249 fix: type_1_subr subr,fix,1,,lisp_bignums_$fix  use tv 000712 aa 000001 777777 vfd 9/,9/1,18/-1  000713 0a 002625 7060 00 tsx6 type_1_subr  000714 4a 4 00350 7101 20 tra lisp_bignums_$fix 000715 aa 003425 000000 zero .._00162-lisp_subr_tv_,subr  use Names  003427 aa 003 146 151 170 .._00162: acc "fix"  use tv 250 fixp: type_0_subr subr,fixp,1,,lisp_quick_fcns_$fixp  use tv  000716 aa 000001 777777 vfd 9/,9/1,18/-1  000717 4a 4 00352 7101 20 tra lisp_quick_fcns_$fixp 000720 aa 000000 000000 zero  000721 aa 003426 000000 zero .._00163-lisp_subr_tv_,subr  use Names 003430 aa 004 146 151 170 .._00163: acc "fixp"  003431 aa 160 000 000 000 use tv 251 flatc: pl1 subr,flatc,1,,lisp_print_$flatc  use tv 000722 aa 000001 777777 vfd 9/,9/1,18/-1  000723 0a 002632 7060 00 tsx6 pl1_fixup  000724 4a 4 00354 7101 20 tra lisp_print_$flatc 000725 aa 003430 000000 zero .._00164-lisp_subr_tv_,subr  use Names  003432 aa 005 146 154 141 .._00164: acc "flatc"  003433 aa 164 143 000 000 use tv 252 flatsize: pl1 subr,flatsize,1,,lisp_print_$flatsize  use tv 000726 aa 000001 777777 vfd 9/,9/1,18/-1  000727 0a 002632 7060 00 tsx6 pl1_fixup  000730 4a 4 00356 7101 20 tra lisp_print_$flatsize  000731 aa 003432 000000 zero .._00165-lisp_subr_tv_,subr  use Names  003434 aa 010 146 154 141 .._00165: acc "flatsize"  003435 aa 164 163 151 172 003436 aa 145 000 000 000 use tv 253 float: type_1_subr subr,float,1,,lisp_bignums_$float  use tv 000732 aa 000001 777777 vfd 9/,9/1,18/-1  000733 0a 002625 7060 00 tsx6 type_1_subr  000734 4a 4 00360 7101 20 tra lisp_bignums_$float  000735 aa 003435 000000 zero .._00166-lisp_subr_tv_,subr  use Names  003437 aa 005 146 154 157 .._00166: acc "float"  003440 aa 141 164 000 000 use tv 254 floatp: type_0_subr subr,floatp,1,,lisp_quick_fcns_$floatp  use tv  000736 aa 000001 777777 vfd 9/,9/1,18/-1  000737 4a 4 00362 7101 20 tra lisp_quick_fcns_$floatp  000740 aa 000000 000000 zero  000741 aa 003437 000000 zero .._00167-lisp_subr_tv_,subr  use Names 003441 aa 006 146 154 157 .._00167: acc "floatp" 003442 aa 141 164 160 000 use tv 255 freturn: pl1 subr,freturn,2,,lisp_error_$freturn  use tv 000742 aa 000002 777777 vfd 9/,9/2,18/-1  000743 0a 002632 7060 00 tsx6 pl1_fixup  000744 4a 4 00364 7101 20 tra lisp_error_$freturn  000745 aa 003441 000000 zero .._00170-lisp_subr_tv_,subr  use Names  003443 aa 007 146 162 145 .._00170: acc "freturn"  003444 aa 164 165 162 156 use tv 256 function: type_0_subr fsubr,function,,,lisp_car_cdrs_$quote  use tv  000746 aa 000000 777777 vfd 9/,9/,18/-1  000747 4a 4 00366 7101 20 tra lisp_car_cdrs_$quote  000750 aa 000000 000000 zero  000751 aa 003443 000002 zero .._00171-lisp_subr_tv_,fsubr use Names 003445 aa 010 146 165 156 .._00171: acc "function"  003446 aa 143 164 151 157 003447 aa 156 000 000 000 use tv 257 gc: pl1 subr,gc,0,,lisp_garbage_collector_$gcsubr use tv 000752 aa 000000 777777 vfd 9/,9/0,18/-1  000753 0a 002632 7060 00 tsx6 pl1_fixup  000754 4a 4 00370 7101 20 tra lisp_garbage_collector_$gcsubr  000755 aa 003446 000000 zero .._00172-lisp_subr_tv_,subr  use Names  003450 aa 002 147 143 000 .._00172: acc "gc" use tv 258 gctwa: pl1 fsubr,gctwa,,,lisp_status_fns_$gctwa  use tv 000756 aa 000000 777777 vfd 9/,9/,18/-1  000757 0a 002632 7060 00 tsx6 pl1_fixup  000760 4a 4 00372 7101 20 tra lisp_status_fns_$gctwa  000761 aa 003447 000002 zero .._00173-lisp_subr_tv_,fsubr use Names  003451 aa 005 147 143 164 .._00173: acc "gctwa"  003452 aa 167 141 000 000 use tv 259 gensym: type_1_subr lsubr,gensym,0,1,lisp_alloc_$gensym_ use tv 000762 aa 001000 777777 vfd 9/1,9/0,18/-1 000763 0a 002625 7060 00 tsx6 type_1_subr  000764 4a 4 00374 7101 20 tra lisp_alloc_$gensym_  000765 aa 003451 000001 zero .._00174-lisp_subr_tv_,lsubr use Names  003453 aa 006 147 145 156 .._00174: acc "gensym" 003454 aa 163 171 155 000 use tv 260 get: type_1_subr subr,get,2,,lisp_property_fns_$get_  use tv 000766 aa 000002 777777 vfd 9/,9/2,18/-1  000767 0a 002625 7060 00 tsx6 type_1_subr  000770 4a 4 00376 7101 20 tra lisp_property_fns_$get_  000771 aa 003453 000000 zero .._00175-lisp_subr_tv_,subr  use Names  003455 aa 003 147 145 164 .._00175: acc "get"  use tv 261 get_pname: pl1 subr,get_pname,1,,lisp_char_fns_$get_pname  use tv 000772 aa 000001 777777 vfd 9/,9/1,18/-1  000773 0a 002632 7060 00 tsx6 pl1_fixup  000774 4a 4 00400 7101 20 tra lisp_char_fns_$get_pname  000775 aa 003454 000000 zero .._00176-lisp_subr_tv_,subr  use Names  003456 aa 011 147 145 164 .._00176: acc "get_pname"  003457 aa 137 160 156 141 003460 aa 155 145 000 000 use tv 262 getl: type_1_subr subr,getl,2,,lisp_property_fns_$getl_ use tv 000776 aa 000002 777777 vfd 9/,9/2,18/-1  000777 0a 002625 7060 00 tsx6 type_1_subr  001000 4a 4 00402 7101 20 tra lisp_property_fns_$getl_  001001 aa 003457 000000 zero .._00177-lisp_subr_tv_,subr  use Names  003461 aa 004 147 145 164 .._00177: acc "getl"  003462 aa 154 000 000 000 use tv 263 go: type_1_subr fsubr,go,,,lisp_$go  use tv 001002 aa 000000 777777 vfd 9/,9/,18/-1  001003 0a 002625 7060 00 tsx6 type_1_subr  001004 4a 4 00404 7101 20 tra lisp_$go  001005 aa 003461 000002 zero .._00200-lisp_subr_tv_,fsubr use Names  003463 aa 002 147 157 000 .._00200: acc "go" use tv 264 greaterp: type_1_subr lsubr,greaterp,1,511,lisp_bignums_$greaterp  use tv 001006 aa 777001 777777 vfd 9/511,9/1,18/-1  001007 0a 002625 7060 00 tsx6 type_1_subr  001010 4a 4 00406 7101 20 tra lisp_bignums_$greaterp  001011 aa 003462 000001 zero .._00201-lisp_subr_tv_,lsubr use Names  003464 aa 010 147 162 145 .._00201: acc "greaterp"  003465 aa 141 164 145 162 003466 aa 160 000 000 000 use tv 265 index: pl1 subr,index,2,,lisp_char_fns_$Index use tv 001012 aa 000002 777777 vfd 9/,9/2,18/-1  001013 0a 002632 7060 00 tsx6 pl1_fixup  001014 4a 4 00410 7101 20 tra lisp_char_fns_$Index  001015 aa 003465 000000 zero .._00202-lisp_subr_tv_,subr  use Names  003467 aa 005 151 156 144 .._00202: acc "index"  003470 aa 145 170 000 000 use tv 266 inpush: pl1 subr,inpush,1,,lisp_io_fns_$inpush  use tv 001016 aa 000001 777777 vfd 9/,9/1,18/-1  001017 0a 002632 7060 00 tsx6 pl1_fixup  001020 4a 4 00412 7101 20 tra lisp_io_fns_$inpush  001021 aa 003467 000000 zero .._00203-lisp_subr_tv_,subr  use Names  003471 aa 006 151 156 160 .._00203: acc "inpush" 003472 aa 165 163 150 000 use tv 267 intern: pl1 subr,intern,1,,lisp_obarray_utils_$intern use tv 001022 aa 000001 777777 vfd 9/,9/1,18/-1  001023 0a 002632 7060 00 tsx6 pl1_fixup  001024 4a 4 00414 7101 20 tra lisp_obarray_utils_$intern  001025 aa 003471 000000 zero .._00204-lisp_subr_tv_,subr  use Names  003473 aa 006 151 156 164 .._00204: acc "intern" 003474 aa 145 162 156 000 use tv 268 ioc: pl1 fsubr,ioc,,,lisp_fault_handler_$ioc  use tv 001026 aa 000000 777777 vfd 9/,9/,18/-1  001027 0a 002632 7060 00 tsx6 pl1_fixup  001030 4a 4 00416 7101 20 tra lisp_fault_handler_$ioc  001031 aa 003473 000002 zero .._00205-lisp_subr_tv_,fsubr use Names  003475 aa 003 151 157 143 .._00205: acc "ioc"  use tv 269 iog: pl1 fsubr,iog,,,lisp_fault_handler_$iog  use tv 001032 aa 000000 777777 vfd 9/,9/,18/-1  001033 0a 002632 7060 00 tsx6 pl1_fixup  001034 4a 4 00420 7101 20 tra lisp_fault_handler_$iog  001035 aa 003474 000002 zero .._00206-lisp_subr_tv_,fsubr use Names  003476 aa 003 151 157 147 .._00206: acc "iog"  use tv 270 isqrt: pl1 subr,isqrt,1,,lisp_trig_$isqrt use tv 001036 aa 000001 777777 vfd 9/,9/1,18/-1  001037 0a 002632 7060 00 tsx6 pl1_fixup  001040 4a 4 00422 7101 20 tra lisp_trig_$isqrt  001041 aa 003475 000000 zero .._00207-lisp_subr_tv_,subr  use Names  003477 aa 005 151 163 161 .._00207: acc "isqrt"  003500 aa 162 164 000 000 use tv 271 last: type_0_subr subr,last,1,,lisp_quick_fcns_$last  use tv  001042 aa 000001 777777 vfd 9/,9/1,18/-1  001043 4a 4 00424 7101 20 tra lisp_quick_fcns_$last 001044 aa 000000 000000 zero  001045 aa 003477 000000 zero .._00210-lisp_subr_tv_,subr  use Names 003501 aa 004 154 141 163 .._00210: acc "last"  003502 aa 164 000 000 000 use tv 272 length: type_0_subr subr,length,1,,lisp_quick_fcns_$length  use tv  001046 aa 000001 777777 vfd 9/,9/1,18/-1  001047 4a 4 00426 7101 20 tra lisp_quick_fcns_$length  001050 aa 000000 000000 zero  001051 aa 003501 000000 zero .._00211-lisp_subr_tv_,subr  use Names 003503 aa 006 154 145 156 .._00211: acc "length" 003504 aa 147 164 150 000 use tv 273 lessp: type_1_subr lsubr,lessp,1,511,lisp_bignums_$lessp use tv 001052 aa 777001 777777 vfd 9/511,9/1,18/-1  001053 0a 002625 7060 00 tsx6 type_1_subr  001054 4a 4 00430 7101 20 tra lisp_bignums_$lessp  001055 aa 003503 000001 zero .._00212-lisp_subr_tv_,lsubr use Names  003505 aa 005 154 145 163 .._00212: acc "lessp"  003506 aa 163 160 000 000 use tv 274 linel: type_0_subr lsubr,linel,1,2,lisp_reader_alm_$linel  use tv  001056 aa 002001 777777 vfd 9/2,9/1,18/-1 001057 4a 4 00432 7101 20 tra lisp_reader_alm_$linel  001060 aa 000000 000000 zero  001061 aa 003505 000001 zero .._00213-lisp_subr_tv_,lsubr use Names 003507 aa 005 154 151 156 .._00213: acc "linel"  003510 aa 145 154 000 000 use tv 275 list: type_1_subr lsubr,list,0,511,lisp_alloc_$list_ use tv 001062 aa 777000 777777 vfd 9/511,9/0,18/-1  001063 0a 002625 7060 00 tsx6 type_1_subr  001064 4a 4 00434 7101 20 tra lisp_alloc_$list_ 001065 aa 003507 000001 zero .._00214-lisp_subr_tv_,lsubr use Names  003511 aa 004 154 151 163 .._00214: acc "list"  003512 aa 164 000 000 000 use tv 276 log: pl1 subr,log,1,,lisp_trig_$log  use tv 001066 aa 000001 777777 vfd 9/,9/1,18/-1  001067 0a 002632 7060 00 tsx6 pl1_fixup  001070 4a 4 00436 7101 20 tra lisp_trig_$log  001071 aa 003511 000000 zero .._00215-lisp_subr_tv_,subr  use Names  003513 aa 003 154 157 147 .._00215: acc "log"  use tv 277 lsh: type_0_subr subr,lsh,2,,lisp_utils_$lsh  use tv  001072 aa 000002 777777 vfd 9/,9/2,18/-1  001073 4a 4 00440 7101 20 tra lisp_utils_$lsh  001074 aa 000000 000000 zero  001075 aa 003512 000000 zero .._00216-lisp_subr_tv_,subr  use Names 003514 aa 003 154 163 150 .._00216: acc "lsh"  use tv 278 make_atom: pl1 subr,make_atom,1,,lisp_char_fns_$make_atom  use tv 001076 aa 000001 777777 vfd 9/,9/1,18/-1  001077 0a 002632 7060 00 tsx6 pl1_fixup  001100 4a 4 00442 7101 20 tra lisp_char_fns_$make_atom  001101 aa 003513 000000 zero .._00217-lisp_subr_tv_,subr  use Names  003515 aa 011 155 141 153 .._00217: acc "make_atom"  003516 aa 145 137 141 164 003517 aa 157 155 000 000 use tv 279 maknam: pl1 subr,maknam,1,,lisp_reader_$maknam  use tv 001102 aa 000001 777777 vfd 9/,9/1,18/-1  001103 0a 002632 7060 00 tsx6 pl1_fixup  001104 4a 4 00444 7101 20 tra lisp_reader_$maknam  001105 aa 003516 000000 zero .._00220-lisp_subr_tv_,subr  use Names  003520 aa 006 155 141 153 .._00220: acc "maknam" 003521 aa 156 141 155 000 use tv 280 makoblist: pl1 subr,makoblist,1,,lisp_obarray_utils_$makoblist use tv 001106 aa 000001 777777 vfd 9/,9/1,18/-1  001107 0a 002632 7060 00 tsx6 pl1_fixup  001110 4a 4 00446 7101 20 tra lisp_obarray_utils_$makoblist 001111 aa 003520 000000 zero .._00221-lisp_subr_tv_,subr  use Names  003522 aa 011 155 141 153 .._00221: acc "makoblist"  003523 aa 157 142 154 151 003524 aa 163 164 000 000 use tv 281 makreadtable: pl1 subr,makreadtable,1,,lisp_reader_$makreadtable  use tv 001112 aa 000001 777777 vfd 9/,9/1,18/-1  001113 0a 002632 7060 00 tsx6 pl1_fixup  001114 4a 4 00450 7101 20 tra lisp_reader_$makreadtable 001115 aa 003523 000000 zero .._00222-lisp_subr_tv_,subr  use Names  003525 aa 014 155 141 153 .._00222: acc "makreadtable"  003526 aa 162 145 141 144 003527 aa 164 141 142 154 003530 aa 145 000 000 000 use tv 282 makunbound: type_1_subr subr,makunbound,1,,lisp_alloc_$makunbound  use tv 001116 aa 000001 777777 vfd 9/,9/1,18/-1  001117 0a 002625 7060 00 tsx6 type_1_subr  001120 4a 4 00452 7101 20 tra lisp_alloc_$makunbound  001121 aa 003527 000000 zero .._00223-lisp_subr_tv_,subr  use Names  003531 aa 012 155 141 153 .._00223: acc "makunbound" 003532 aa 165 156 142 157 003533 aa 165 156 144 000 use tv 283 map: type_1_subr lsubr,map,2,511,lisp_$map  use tv 001122 aa 777002 777777 vfd 9/511,9/2,18/-1  001123 0a 002625 7060 00 tsx6 type_1_subr  001124 4a 4 00454 7101 20 tra lisp_$map 001125 aa 003532 000001 zero .._00224-lisp_subr_tv_,lsubr use Names  003534 aa 003 155 141 160 .._00224: acc "map"  use tv 284 mapc: type_1_subr lsubr,mapc,2,511,lisp_$mapc  use tv 001126 aa 777002 777777 vfd 9/511,9/2,18/-1  001127 0a 002625 7060 00 tsx6 type_1_subr  001130 4a 4 00456 7101 20 tra lisp_$mapc  001131 aa 003533 000001 zero .._00225-lisp_subr_tv_,lsubr use Names  003535 aa 004 155 141 160 .._00225: acc "mapc"  003536 aa 143 000 000 000 use tv 285 mapcan: type_1_subr lsubr,mapcan,2,511,lisp_$mapcan  use tv 001132 aa 777002 777777 vfd 9/511,9/2,18/-1  001133 0a 002625 7060 00 tsx6 type_1_subr  001134 4a 4 00460 7101 20 tra lisp_$mapcan  001135 aa 003535 000001 zero .._00226-lisp_subr_tv_,lsubr use Names  003537 aa 006 155 141 160 .._00226: acc "mapcan" 003540 aa 143 141 156 000 use tv 286 mapcar: type_1_subr lsubr,mapcar,2,511,lisp_$mapcar  use tv 001136 aa 777002 777777 vfd 9/511,9/2,18/-1  001137 0a 002625 7060 00 tsx6 type_1_subr  001140 4a 4 00462 7101 20 tra lisp_$mapcar  001141 aa 003537 000001 zero .._00227-lisp_subr_tv_,lsubr use Names  003541 aa 006 155 141 160 .._00227: acc "mapcar" 003542 aa 143 141 162 000 use tv 287 mapcon: type_1_subr lsubr,mapcon,2,511,lisp_$mapcon  use tv 001142 aa 777002 777777 vfd 9/511,9/2,18/-1  001143 0a 002625 7060 00 tsx6 type_1_subr  001144 4a 4 00464 7101 20 tra lisp_$mapcon  001145 aa 003541 000001 zero .._00230-lisp_subr_tv_,lsubr use Names  003543 aa 006 155 141 160 .._00230: acc "mapcon" 003544 aa 143 157 156 000 use tv 288 maplist: type_1_subr lsubr,maplist,2,511,lisp_$maplist  use tv 001146 aa 777002 777777 vfd 9/511,9/2,18/-1  001147 0a 002625 7060 00 tsx6 type_1_subr  001150 4a 4 00466 7101 20 tra lisp_$maplist 001151 aa 003543 000001 zero .._00231-lisp_subr_tv_,lsubr use Names  003545 aa 007 155 141 160 .._00231: acc "maplist"  003546 aa 154 151 163 164 use tv 289 max: type_1_subr lsubr,max,1,511,lisp_bignums_$max  use tv 001152 aa 777001 777777 vfd 9/511,9/1,18/-1  001153 0a 002625 7060 00 tsx6 type_1_subr  001154 4a 4 00470 7101 20 tra lisp_bignums_$max 001155 aa 003545 000001 zero .._00232-lisp_subr_tv_,lsubr use Names  003547 aa 003 155 141 170 .._00232: acc "max"  use tv 290 member: type_0_subr subr,member,2,,lisp_quick_fcns_$member  use tv  001156 aa 000002 777777 vfd 9/,9/2,18/-1  001157 4a 4 00472 7101 20 tra lisp_quick_fcns_$member  001160 aa 000000 000000 zero  001161 aa 003546 000000 zero .._00233-lisp_subr_tv_,subr  use Names 003550 aa 006 155 145 155 .._00233: acc "member" 003551 aa 142 145 162 000 use tv 291 memq: type_0_subr subr,memq,2,,lisp_quick_fcns_$memq  use tv  001162 aa 000002 777777 vfd 9/,9/2,18/-1  001163 4a 4 00474 7101 20 tra lisp_quick_fcns_$memq 001164 aa 000000 000000 zero  001165 aa 003550 000000 zero .._00234-lisp_subr_tv_,subr  use Names 003552 aa 004 155 145 155 .._00234: acc "memq"  003553 aa 161 000 000 000 use tv 292 min: type_1_subr lsubr,min,1,511,lisp_bignums_$min  use tv 001166 aa 777001 777777 vfd 9/511,9/1,18/-1  001167 0a 002625 7060 00 tsx6 type_1_subr  001170 4a 4 00476 7101 20 tra lisp_bignums_$min 001171 aa 003552 000001 zero .._00235-lisp_subr_tv_,lsubr use Names  003554 aa 003 155 151 156 .._00235: acc "min"  use tv 293 minus: type_1_subr subr,minus,1,,lisp_bignums_$minus  use tv 001172 aa 000001 777777 vfd 9/,9/1,18/-1  001173 0a 002625 7060 00 tsx6 type_1_subr  001174 4a 4 00500 7101 20 tra lisp_bignums_$minus  001175 aa 003553 000000 zero .._00236-lisp_subr_tv_,subr  use Names  003555 aa 005 155 151 156 .._00236: acc "minus"  003556 aa 165 163 000 000 use tv 294 minusp: type_1_subr subr,minusp,1,,lisp_bignums_$minusp use tv 001176 aa 000001 777777 vfd 9/,9/1,18/-1  001177 0a 002625 7060 00 tsx6 type_1_subr  001200 4a 4 00502 7101 20 tra lisp_bignums_$minusp  001201 aa 003555 000000 zero .._00237-lisp_subr_tv_,subr  use Names  003557 aa 006 155 151 156 .._00237: acc "minusp" 003560 aa 165 163 160 000 use tv 295 mergef: pl1_lsubr lsubr,mergef,2,511,lisp_io_control_$mergef  use tv 001202 aa 777002 777777 vfd 9/511,9/2,18/-1  001203 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001204 4a 4 00504 7101 20 tra lisp_io_control_$mergef  001205 aa 003557 000001 zero .._00240-lisp_subr_tv_,lsubr use Names  003561 aa 006 155 145 162 .._00240: acc "mergef" 003562 aa 147 145 146 000 use tv 296 nconc: type_1_subr lsubr,nconc,0,511,lisp_alloc_$nconc  use tv 001206 aa 777000 777777 vfd 9/511,9/0,18/-1  001207 0a 002625 7060 00 tsx6 type_1_subr  001210 4a 4 00506 7101 20 tra lisp_alloc_$nconc 001211 aa 003561 000001 zero .._00241-lisp_subr_tv_,lsubr use Names  003563 aa 005 156 143 157 .._00241: acc "nconc"  003564 aa 156 143 000 000 use tv 297 ncons: type_1_subr subr,ncons,1,,lisp_alloc_$ncons_ use tv 001212 aa 000001 777777 vfd 9/,9/1,18/-1  001213 0a 002625 7060 00 tsx6 type_1_subr  001214 4a 4 00510 7101 20 tra lisp_alloc_$ncons_  001215 aa 003563 000000 zero .._00242-lisp_subr_tv_,subr  use Names  003565 aa 005 156 143 157 .._00242: acc "ncons"  003566 aa 156 163 000 000 use tv 298 namelist: pl1 subr,namelist,1,,lisp_io_fns_$namelist  use tv 001216 aa 000001 777777 vfd 9/,9/1,18/-1  001217 0a 002632 7060 00 tsx6 pl1_fixup  001220 4a 4 00512 7101 20 tra lisp_io_fns_$namelist 001221 aa 003565 000000 zero .._00243-lisp_subr_tv_,subr  use Names  003567 aa 010 156 141 155 .._00243: acc "namelist"  003570 aa 145 154 151 163 003571 aa 164 000 000 000 use tv 299 names: pl1_lsubr lsubr,names,1,2,lisp_io_fns_$names  use tv 001222 aa 002001 777777 vfd 9/2,9/1,18/-1 001223 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001224 4a 4 00514 7101 20 tra lisp_io_fns_$names  001225 aa 003570 000001 zero .._00244-lisp_subr_tv_,lsubr use Names  003572 aa 005 156 141 155 .._00244: acc "names"  003573 aa 145 163 000 000 use tv 300 namestring: pl1 subr,namestring,1,,lisp_io_fns_$namestring use tv 001226 aa 000001 777777 vfd 9/,9/1,18/-1  001227 0a 002632 7060 00 tsx6 pl1_fixup  001230 4a 4 00516 7101 20 tra lisp_io_fns_$namestring  001231 aa 003572 000000 zero .._00245-lisp_subr_tv_,subr  use Names  003574 aa 012 156 141 155 .._00245: acc "namestring" 003575 aa 145 163 164 162 003576 aa 151 156 147 000 use tv 301 nointerrupt: pl1 subr,nointerrupt,1,,lisp_fault_handler_$nointerrupt  use tv 001232 aa 000001 777777 vfd 9/,9/1,18/-1  001233 0a 002632 7060 00 tsx6 pl1_fixup  001234 4a 4 00520 7101 20 tra lisp_fault_handler_$nointerrupt  001235 aa 003575 000000 zero .._00246-lisp_subr_tv_,subr  use Names  003577 aa 013 156 157 151 .._00246: acc "nointerrupt"  003600 aa 156 164 145 162 003601 aa 162 165 160 164 use tv 302 noret: pl1 subr,noret,1,,lisp_status_fns_$noret  use tv 001236 aa 000001 777777 vfd 9/,9/1,18/-1  001237 0a 002632 7060 00 tsx6 pl1_fixup  001240 4a 4 00522 7101 20 tra lisp_status_fns_$noret  001241 aa 003600 000000 zero .._00247-lisp_subr_tv_,subr  use Names  003602 aa 005 156 157 162 .._00247: acc "noret"  003603 aa 145 164 000 000 use tv 303 not: type_0_subr subr,not,1,,lisp_quick_fcns_$null  use tv  001242 aa 000001 777777 vfd 9/,9/1,18/-1  001243 4a 4 00524 7101 20 tra lisp_quick_fcns_$null 001244 aa 000000 000000 zero  001245 aa 003602 000000 zero .._00250-lisp_subr_tv_,subr  use Names 003604 aa 003 156 157 164 .._00250: acc "not"  use tv 304 nouuo: type_1_subr subr,nouuo,1,,lisp_$nouuo  use tv 001246 aa 000001 777777 vfd 9/,9/1,18/-1  001247 0a 002625 7060 00 tsx6 type_1_subr  001250 4a 4 00526 7101 20 tra lisp_$nouuo  001251 aa 003603 000000 zero .._00251-lisp_subr_tv_,subr  use Names  003605 aa 005 156 157 165 .._00251: acc "nouuo"  003606 aa 165 157 000 000 use tv 305 nreverse: type_1_subr subr,nreverse,1,,lisp_alloc_$nreverse_  use tv 001252 aa 000001 777777 vfd 9/,9/1,18/-1  001253 0a 002625 7060 00 tsx6 type_1_subr  001254 4a 4 00530 7101 20 tra lisp_alloc_$nreverse_ 001255 aa 003605 000000 zero .._00252-lisp_subr_tv_,subr  use Names  003607 aa 010 156 162 145 .._00252: acc "nreverse"  003610 aa 166 145 162 163 003611 aa 145 000 000 000 use tv 306 null: type_0_subr subr,null,1,,lisp_quick_fcns_$null  use tv  001256 aa 000001 777777 vfd 9/,9/1,18/-1  001257 4a 4 00524 7101 20 tra lisp_quick_fcns_$null 001260 aa 000000 000000 zero  001261 aa 003610 000000 zero .._00253-lisp_subr_tv_,subr  use Names 003612 aa 004 156 165 154 .._00253: acc "null"  003613 aa 154 000 000 000 use tv 307 numberp: type_0_subr subr,numberp,1,,lisp_quick_fcns_$numberp  use tv  001262 aa 000001 777777 vfd 9/,9/1,18/-1  001263 4a 4 00532 7101 20 tra lisp_quick_fcns_$numberp  001264 aa 000000 000000 zero  001265 aa 003612 000000 zero .._00254-lisp_subr_tv_,subr  use Names 003614 aa 007 156 165 155 .._00254: acc "numberp"  003615 aa 142 145 162 160 use tv 308 oddp: type_0_subr subr,oddp,1,,lisp_quick_fcns_$oddp  use tv  001266 aa 000001 777777 vfd 9/,9/1,18/-1  001267 4a 4 00534 7101 20 tra lisp_quick_fcns_$oddp 001270 aa 000000 000000 zero  001271 aa 003614 000000 zero .._00255-lisp_subr_tv_,subr  use Names 003616 aa 004 157 144 144 .._00255: acc "oddp"  003617 aa 160 000 000 000 use tv 309 opena: pl1 subr,opena,1,,lisp_io_control_$opena  use tv 001272 aa 000001 777777 vfd 9/,9/1,18/-1  001273 0a 002632 7060 00 tsx6 pl1_fixup  001274 4a 4 00536 7101 20 tra lisp_io_control_$opena  001275 aa 003616 000000 zero .._00256-lisp_subr_tv_,subr  use Names  003620 aa 005 157 160 145 .._00256: acc "opena"  003621 aa 156 141 000 000 use tv 310 openi: pl1 subr,openi,1,,lisp_io_control_$openi  use tv 001276 aa 000001 777777 vfd 9/,9/1,18/-1  001277 0a 002632 7060 00 tsx6 pl1_fixup  001300 4a 4 00540 7101 20 tra lisp_io_control_$openi  001301 aa 003620 000000 zero .._00257-lisp_subr_tv_,subr  use Names  003622 aa 005 157 160 145 .._00257: acc "openi"  003623 aa 156 151 000 000 use tv 311 openo: pl1 subr,openo,1,,lisp_io_control_$openo  use tv 001302 aa 000001 777777 vfd 9/,9/1,18/-1  001303 0a 002632 7060 00 tsx6 pl1_fixup  001304 4a 4 00542 7101 20 tra lisp_io_control_$openo  001305 aa 003622 000000 zero .._00260-lisp_subr_tv_,subr  use Names  003624 aa 005 157 160 145 .._00260: acc "openo"  003625 aa 156 157 000 000 use tv 312 or: type_1_subr fsubr,or,,,lisp_quick_fcns_$or  use tv 001306 aa 000000 777777 vfd 9/,9/,18/-1  001307 0a 002625 7060 00 tsx6 type_1_subr  001310 4a 4 00544 7101 20 tra lisp_quick_fcns_$or  001311 aa 003624 000002 zero .._00261-lisp_subr_tv_,fsubr use Names  003626 aa 002 157 162 000 .._00261: acc "or" use tv 313 plus: type_1_subr lsubr,plus,0,511,lisp_bignums_$plus  use tv 001312 aa 777000 777777 vfd 9/511,9/0,18/-1  001313 0a 002625 7060 00 tsx6 type_1_subr  001314 4a 4 00546 7101 20 tra lisp_bignums_$plus  001315 aa 003625 000001 zero .._00262-lisp_subr_tv_,lsubr use Names  003627 aa 004 160 154 165 .._00262: acc "plus"  003630 aa 163 000 000 000 use tv 314 plusp: type_1_subr subr,plusp,1,,lisp_bignums_$plusp  use tv 001316 aa 000001 777777 vfd 9/,9/1,18/-1  001317 0a 002625 7060 00 tsx6 type_1_subr  001320 4a 4 00550 7101 20 tra lisp_bignums_$plusp  001321 aa 003627 000000 zero .._00263-lisp_subr_tv_,subr  use Names  003631 aa 005 160 154 165 .._00263: acc "plusp"  003632 aa 163 160 000 000 use tv 315 prin1: pl1_lsubr lsubr,prin1,1,2,lisp_print_$prin1_  use tv 001322 aa 002001 777777 vfd 9/2,9/1,18/-1 001323 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001324 4a 4 00552 7101 20 tra lisp_print_$prin1_  001325 aa 003631 000001 zero .._00264-lisp_subr_tv_,lsubr use Names  003633 aa 005 160 162 151 .._00264: acc "prin1"  003634 aa 156 061 000 000 use tv 316 princ: pl1_lsubr lsubr,princ,1,2,lisp_print_$princ_  use tv 001326 aa 002001 777777 vfd 9/2,9/1,18/-1 001327 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001330 4a 4 00554 7101 20 tra lisp_print_$princ_  001331 aa 003633 000001 zero .._00265-lisp_subr_tv_,lsubr use Names  003635 aa 005 160 162 151 .._00265: acc "princ"  003636 aa 156 143 000 000 use tv 317 print: pl1_lsubr lsubr,print,1,2,lisp_print_$print_  use tv 001332 aa 002001 777777 vfd 9/2,9/1,18/-1 001333 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001334 4a 4 00556 7101 20 tra lisp_print_$print_  001335 aa 003635 000001 zero .._00266-lisp_subr_tv_,lsubr use Names  003637 aa 005 160 162 151 .._00266: acc "print"  003640 aa 156 164 000 000 use tv 318 prog2: type_0_subr lsubr,prog2,2,511,lisp_quick_fcns_$prog2  use tv  001336 aa 777002 777777 vfd 9/511,9/2,18/-1  001337 4a 4 00560 7101 20 tra lisp_quick_fcns_$prog2  001340 aa 000000 000000 zero  001341 aa 003637 000001 zero .._00267-lisp_subr_tv_,lsubr use Names 003641 aa 005 160 162 157 .._00267: acc "prog2"  003642 aa 147 062 000 000 use tv 319 prog: pl1 fsubr,prog,,,lisp_prog_fns_$prog use tv 001342 aa 000000 777777 vfd 9/,9/,18/-1  001343 0a 002632 7060 00 tsx6 pl1_fixup  001344 4a 4 00562 7101 20 tra lisp_prog_fns_$prog  001345 aa 003641 000002 zero .._00270-lisp_subr_tv_,fsubr use Names  003643 aa 004 160 162 157 .._00270: acc "prog"  003644 aa 147 000 000 000 use tv 320 progn: type_0_subr lsubr,progn,1,511,lisp_quick_fcns_$progn  use tv  001346 aa 777001 777777 vfd 9/511,9/1,18/-1  001347 4a 4 00564 7101 20 tra lisp_quick_fcns_$progn  001350 aa 000000 000000 zero  001351 aa 003643 000001 zero .._00271-lisp_subr_tv_,lsubr use Names 003645 aa 005 160 162 157 .._00271: acc "progn"  003646 aa 147 156 000 000 use tv 321 putprop: type_1_subr subr,putprop,3,,lisp_property_fns_$putprop_  use tv 001352 aa 000003 777777 vfd 9/,9/3,18/-1  001353 0a 002625 7060 00 tsx6 type_1_subr  001354 4a 4 00566 7101 20 tra lisp_property_fns_$putprop_  001355 aa 003645 000000 zero .._00272-lisp_subr_tv_,subr  use Names  003647 aa 007 160 165 164 .._00272: acc "putprop"  003650 aa 160 162 157 160 use tv 322 quit: pl1 subr,quit,0,,lisp$quit  use tv 001356 aa 000000 777777 vfd 9/,9/0,18/-1  001357 0a 002632 7060 00 tsx6 pl1_fixup  001360 4a 4 00570 7101 20 tra lisp$quit 001361 aa 003647 000000 zero .._00273-lisp_subr_tv_,subr  use Names  003651 aa 004 161 165 151 .._00273: acc "quit"  003652 aa 164 000 000 000 use tv 323 quote: type_0_subr fsubr,quote,,,lisp_car_cdrs_$quote  use tv  001362 aa 000000 777777 vfd 9/,9/,18/-1  001363 4a 4 00366 7101 20 tra lisp_car_cdrs_$quote  001364 aa 000000 000000 zero  001365 aa 003651 000002 zero .._00274-lisp_subr_tv_,fsubr use Names 003653 aa 005 161 165 157 .._00274: acc "quote"  003654 aa 164 145 000 000 use tv 324 quotient: type_1_subr lsubr,quotient,1,511,lisp_bignums_$quotient  use tv 001366 aa 777001 777777 vfd 9/511,9/1,18/-1  001367 0a 002625 7060 00 tsx6 type_1_subr  001370 4a 4 00022 7101 20 tra lisp_bignums_$quotient  001371 aa 003653 000001 zero .._00275-lisp_subr_tv_,lsubr use Names  003655 aa 010 161 165 157 .._00275: acc "quotient"  003656 aa 164 151 145 156 003657 aa 164 000 000 000 use tv 325 random: type_1_subr lsubr,random,0,1,lisp_quick_fcns_$random use tv 001372 aa 001000 777777 vfd 9/1,9/0,18/-1 001373 0a 002625 7060 00 tsx6 type_1_subr  001374 4a 4 00572 7101 20 tra lisp_quick_fcns_$random  001375 aa 003656 000001 zero .._00276-lisp_subr_tv_,lsubr use Names  003660 aa 006 162 141 156 .._00276: acc "random" 003661 aa 144 157 155 000 use tv 326 read: pl1_lsubr lsubr,read,0,2,lisp_reader_$read  use tv 001376 aa 002000 777777 vfd 9/2,9/0,18/-1 001377 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001400 4a 4 00574 7101 20 tra lisp_reader_$read 001401 aa 003660 000001 zero .._00277-lisp_subr_tv_,lsubr use Names  003662 aa 004 162 145 141 .._00277: acc "read"  003663 aa 144 000 000 000 use tv 327 readch: type_1_subr lsubr,readch,0,2,lisp_reader_alm_$readch use tv 001402 aa 002000 777777 vfd 9/2,9/0,18/-1 001403 0a 002625 7060 00 tsx6 type_1_subr  001404 4a 4 00576 7101 20 tra lisp_reader_alm_$readch  001405 aa 003662 000001 zero .._00300-lisp_subr_tv_,lsubr use Names  003664 aa 006 162 145 141 .._00300: acc "readch" 003665 aa 144 143 150 000 use tv 328 readlist: pl1 subr,readlist,1,,lisp_reader_$readlist  use tv 001406 aa 000001 777777 vfd 9/,9/1,18/-1  001407 0a 002632 7060 00 tsx6 pl1_fixup  001410 4a 4 00600 7101 20 tra lisp_reader_$readlist 001411 aa 003664 000000 zero .._00301-lisp_subr_tv_,subr  use Names  003666 aa 010 162 145 141 .._00301: acc "readlist"  003667 aa 144 154 151 163 003670 aa 164 000 000 000 use tv 329 readline: pl1_lsubr lsubr,readline,0,2,lisp_reader_$readstring use tv 001412 aa 002000 777777 vfd 9/2,9/0,18/-1 001413 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001414 4a 4 00602 7101 20 tra lisp_reader_$readstring  001415 aa 003667 000001 zero .._00302-lisp_subr_tv_,lsubr use Names  003671 aa 010 162 145 141 .._00302: acc "readline"  003672 aa 144 154 151 156 003673 aa 145 000 000 000 use tv 330 remainder: type_1_subr subr,remainder,2,,lisp_bignums_$remainder use tv 001416 aa 000002 777777 vfd 9/,9/2,18/-1  001417 0a 002625 7060 00 tsx6 type_1_subr  001420 4a 4 00072 7101 20 tra lisp_bignums_$remainder  001421 aa 003672 000000 zero .._00303-lisp_subr_tv_,subr  use Names  003674 aa 011 162 145 155 .._00303: acc "remainder"  003675 aa 141 151 156 144 003676 aa 145 162 000 000 use tv 331 remob: pl1 subr,remob,1,,lisp_obarray_utils_$remob  use tv 001422 aa 000001 777777 vfd 9/,9/1,18/-1  001423 0a 002632 7060 00 tsx6 pl1_fixup  001424 4a 4 00604 7101 20 tra lisp_obarray_utils_$remob 001425 aa 003675 000000 zero .._00304-lisp_subr_tv_,subr  use Names  003677 aa 005 162 145 155 .._00304: acc "remob"  003700 aa 157 142 000 000 use tv 332 remprop: type_1_subr subr,remprop,2,,lisp_property_fns_$remprop_  use tv 001426 aa 000002 777777 vfd 9/,9/2,18/-1  001427 0a 002625 7060 00 tsx6 type_1_subr  001430 4a 4 00606 7101 20 tra lisp_property_fns_$remprop_  001431 aa 003677 000000 zero .._00305-lisp_subr_tv_,subr  use Names  003701 aa 007 162 145 155 .._00305: acc "remprop"  003702 aa 160 162 157 160 use tv 333 rename: pl1 subr,rename,2,,lisp_io_control_$rename  use tv 001432 aa 000002 777777 vfd 9/,9/2,18/-1  001433 0a 002632 7060 00 tsx6 pl1_fixup  001434 4a 4 00610 7101 20 tra lisp_io_control_$rename  001435 aa 003701 000000 zero .._00306-lisp_subr_tv_,subr  use Names  003703 aa 006 162 145 156 .._00306: acc "rename" 003704 aa 141 155 145 000 use tv 334 return: type_1_subr subr,return,1,,lisp_$return use tv 001436 aa 000001 777777 vfd 9/,9/1,18/-1  001437 0a 002625 7060 00 tsx6 type_1_subr  001440 4a 4 00612 7101 20 tra lisp_$return  001441 aa 003703 000000 zero .._00307-lisp_subr_tv_,subr  use Names  003705 aa 006 162 145 164 .._00307: acc "return" 003706 aa 165 162 156 000 use tv 335 reverse: type_1_subr subr,reverse,1,,lisp_alloc_$reverse  use tv 001442 aa 000001 777777 vfd 9/,9/1,18/-1  001443 0a 002625 7060 00 tsx6 type_1_subr  001444 4a 4 00614 7101 20 tra lisp_alloc_$reverse  001445 aa 003705 000000 zero .._00310-lisp_subr_tv_,subr  use Names  003707 aa 007 162 145 166 .._00310: acc "reverse"  003710 aa 145 162 163 145 use tv 336 rot: type_0_subr subr,rot,2,,lisp_utils_$rot  use tv  001446 aa 000002 777777 vfd 9/,9/2,18/-1  001447 4a 4 00616 7101 20 tra lisp_utils_$rot  001450 aa 000000 000000 zero  001451 aa 003707 000000 zero .._00311-lisp_subr_tv_,subr  use Names 003711 aa 003 162 157 164 .._00311: acc "rot"  use tv 337 rplaca: type_1_subr subr,rplaca,2,,lisp_quick_fcns_$rplaca  use tv 001452 aa 000002 777777 vfd 9/,9/2,18/-1  001453 0a 002625 7060 00 tsx6 type_1_subr  001454 4a 4 00620 7101 20 tra lisp_quick_fcns_$rplaca  001455 aa 003710 000000 zero .._00312-lisp_subr_tv_,subr  use Names  003712 aa 006 162 160 154 .._00312: acc "rplaca" 003713 aa 141 143 141 000 use tv 338 rplacd: type_0_subr subr,rplacd,2,,lisp_quick_fcns_$rplacd  use tv  001456 aa 000002 777777 vfd 9/,9/2,18/-1  001457 4a 4 00622 7101 20 tra lisp_quick_fcns_$rplacd  001460 aa 000000 000000 zero  001461 aa 003712 000000 zero .._00313-lisp_subr_tv_,subr  use Names 003714 aa 006 162 160 154 .._00313: acc "rplacd" 003715 aa 141 143 144 000 use tv 339 runtime: type_0_subr subr,runtime,0,,lisp_quick_fcns_$runtime  use tv  001462 aa 000000 777777 vfd 9/,9/0,18/-1  001463 4a 4 00624 7101 20 tra lisp_quick_fcns_$runtime  001464 aa 000000 000000 zero  001465 aa 003714 000000 zero .._00314-lisp_subr_tv_,subr  use Names 003716 aa 007 162 165 156 .._00314: acc "runtime"  003717 aa 164 151 155 145 use tv 340 sassoc: type_0_subr subr,sassoc,3,,lisp_quick_fcns_$sassoc  use tv  001466 aa 000003 777777 vfd 9/,9/3,18/-1  001467 4a 4 00626 7101 20 tra lisp_quick_fcns_$sassoc  001470 aa 000000 000000 zero  001471 aa 003716 000000 zero .._00315-lisp_subr_tv_,subr  use Names 003720 aa 006 163 141 163 .._00315: acc "sassoc" 003721 aa 163 157 143 000 use tv 341 sassq: type_0_subr subr,sassq,3,,lisp_quick_fcns_$sassq use tv  001472 aa 000003 777777 vfd 9/,9/3,18/-1  001473 4a 4 00630 7101 20 tra lisp_quick_fcns_$sassq  001474 aa 000000 000000 zero  001475 aa 003720 000000 zero .._00316-lisp_subr_tv_,subr  use Names 003722 aa 005 163 141 163 .._00316: acc "sassq"  003723 aa 163 161 000 000 use tv 342 save: pl1 fsubr,save,,,lisp$save  use tv 001476 aa 000000 777777 vfd 9/,9/,18/-1  001477 0a 002632 7060 00 tsx6 pl1_fixup  001500 4a 4 00632 7101 20 tra lisp$save 001501 aa 003722 000002 zero .._00317-lisp_subr_tv_,fsubr use Names  003724 aa 004 163 141 166 .._00317: acc "save"  003725 aa 145 000 000 000 use tv 343 set: type_1_subr subr,set,2,,lisp_quick_fcns_$set  use tv 001502 aa 000002 777777 vfd 9/,9/2,18/-1  001503 0a 002625 7060 00 tsx6 type_1_subr  001504 4a 4 00634 7101 20 tra lisp_quick_fcns_$set  001505 aa 003724 000000 zero .._00320-lisp_subr_tv_,subr  use Names  003726 aa 003 163 145 164 .._00320: acc "set"  use tv 344 setarg: type_1_subr subr,setarg,2,,lisp_$setarg use tv 001506 aa 000002 777777 vfd 9/,9/2,18/-1  001507 0a 002625 7060 00 tsx6 type_1_subr  001510 4a 4 00636 7101 20 tra lisp_$setarg  001511 aa 003725 000000 zero .._00321-lisp_subr_tv_,subr  use Names  003727 aa 006 163 145 164 .._00321: acc "setarg" 003730 aa 141 162 147 000 use tv 345 setq: type_1_subr fsubr,setq,,,lisp_quick_fcns_$setq use tv 001512 aa 000000 777777 vfd 9/,9/,18/-1  001513 0a 002625 7060 00 tsx6 type_1_subr  001514 4a 4 00640 7101 20 tra lisp_quick_fcns_$setq 001515 aa 003727 000002 zero .._00322-lisp_subr_tv_,fsubr use Names  003731 aa 004 163 145 164 .._00322: acc "setq"  003732 aa 161 000 000 000 use tv 346 shortnamestring: pl1 subr,shortnamestring,1,,lisp_io_fns_$shortnamestring  use tv 001516 aa 000001 777777 vfd 9/,9/1,18/-1  001517 0a 002632 7060 00 tsx6 pl1_fixup  001520 4a 4 00642 7101 20 tra lisp_io_fns_$shortnamestring  001521 aa 003731 000000 zero .._00323-lisp_subr_tv_,subr  use Names  003733 aa 017 163 150 157 .._00323: acc "shortnamestring"  003734 aa 162 164 156 141 003735 aa 155 145 163 164 003736 aa 162 151 156 147 use tv 347 signp: type_1_subr fsubr,signp,,,lisp_utils_$signp  use tv 001522 aa 000000 777777 vfd 9/,9/,18/-1  001523 0a 002625 7060 00 tsx6 type_1_subr  001524 4a 4 00644 7101 20 tra lisp_utils_$signp 001525 aa 003735 000002 zero .._00324-lisp_subr_tv_,fsubr use Names  003737 aa 005 163 151 147 .._00324: acc "signp"  003740 aa 156 160 000 000 use tv 348 sin: pl1 subr,sin,1,,lisp_trig_$sin  use tv 001526 aa 000001 777777 vfd 9/,9/1,18/-1  001527 0a 002632 7060 00 tsx6 pl1_fixup  001530 4a 4 00646 7101 20 tra lisp_trig_$sin  001531 aa 003737 000000 zero .._00325-lisp_subr_tv_,subr  use Names  003741 aa 003 163 151 156 .._00325: acc "sin"  use tv 349 sleep: pl1 subr,sleep,1,,lisp_trig_$sleep use tv 001532 aa 000001 777777 vfd 9/,9/1,18/-1  001533 0a 002632 7060 00 tsx6 pl1_fixup  001534 4a 4 00650 7101 20 tra lisp_trig_$sleep  001535 aa 003740 000000 zero .._00326-lisp_subr_tv_,subr  use Names  003742 aa 005 163 154 145 .._00326: acc "sleep"  003743 aa 145 160 000 000 use tv 350 smallnump: type_0_subr subr,smallnump,1,,lisp_quick_fcns_$smallnump  use tv  001536 aa 000001 777777 vfd 9/,9/1,18/-1  001537 4a 4 00652 7101 20 tra lisp_quick_fcns_$smallnump  001540 aa 000000 000000 zero  001541 aa 003742 000000 zero .._00327-lisp_subr_tv_,subr  use Names 003744 aa 011 163 155 141 .._00327: acc "smallnump"  003745 aa 154 154 156 165 003746 aa 155 160 000 000 use tv 351 sqrt: pl1 subr,sqrt,1,,lisp_trig_$sqrt  use tv 001542 aa 000001 777777 vfd 9/,9/1,18/-1  001543 0a 002632 7060 00 tsx6 pl1_fixup  001544 4a 4 00654 7101 20 tra lisp_trig_$sqrt  001545 aa 003745 000000 zero .._00330-lisp_subr_tv_,subr  use Names  003747 aa 004 163 161 162 .._00330: acc "sqrt"  003750 aa 164 000 000 000 use tv 352 sstatus: pl1 fsubr,sstatus,,,lisp_status_fns_$sstatus  use tv 001546 aa 000000 777777 vfd 9/,9/,18/-1  001547 0a 002632 7060 00 tsx6 pl1_fixup  001550 4a 4 00656 7101 20 tra lisp_status_fns_$sstatus  001551 aa 003747 000002 zero .._00331-lisp_subr_tv_,fsubr use Names  003751 aa 007 163 163 164 .._00331: acc "sstatus"  003752 aa 141 164 165 163 use tv 353 status: pl1 fsubr,status,,,lisp_status_fns_$status use tv 001552 aa 000000 777777 vfd 9/,9/,18/-1  001553 0a 002632 7060 00 tsx6 pl1_fixup  001554 4a 4 00660 7101 20 tra lisp_status_fns_$status  001555 aa 003751 000002 zero .._00332-lisp_subr_tv_,fsubr use Names  003753 aa 006 163 164 141 .._00332: acc "status" 003754 aa 164 165 163 000 use tv 354 store: type_1_subr fsubr,store,,,lisp_oprs_$store  use tv 001556 aa 000000 777777 vfd 9/,9/,18/-1  001557 0a 002625 7060 00 tsx6 type_1_subr  001560 4a 4 00662 7101 20 tra lisp_oprs_$store  001561 aa 003753 000002 zero .._00333-lisp_subr_tv_,fsubr use Names  003755 aa 005 163 164 157 .._00333: acc "store"  003756 aa 162 145 000 000 use tv 355 stringlength: pl1 subr,stringlength,1,,lisp_char_fns_$stringlength use tv 001562 aa 000001 777777 vfd 9/,9/1,18/-1  001563 0a 002632 7060 00 tsx6 pl1_fixup  001564 4a 4 00664 7101 20 tra lisp_char_fns_$stringlength  001565 aa 003755 000000 zero .._00334-lisp_subr_tv_,subr  use Names  003757 aa 014 163 164 162 .._00334: acc "stringlength"  003760 aa 151 156 147 154 003761 aa 145 156 147 164 003762 aa 150 000 000 000 use tv 356 stringp: type_0_subr subr,stringp,1,,lisp_quick_fcns_$stringp  use tv  001566 aa 000001 777777 vfd 9/,9/1,18/-1  001567 4a 4 00666 7101 20 tra lisp_quick_fcns_$stringp  001570 aa 000000 000000 zero  001571 aa 003761 000000 zero .._00335-lisp_subr_tv_,subr  use Names 003763 aa 007 163 164 162 .._00335: acc "stringp"  003764 aa 151 156 147 160 use tv 357 sub1: type_1_subr subr,sub1,1,,lisp_bignums_$sub1  use tv 001572 aa 000001 777777 vfd 9/,9/1,18/-1  001573 0a 002625 7060 00 tsx6 type_1_subr  001574 4a 4 00670 7101 20 tra lisp_bignums_$sub1  001575 aa 003763 000000 zero .._00336-lisp_subr_tv_,subr  use Names  003765 aa 004 163 165 142 .._00336: acc "sub1"  003766 aa 061 000 000 000 use tv 358 sublis: type_1_subr subr,sublis,2,,lisp_alloc_$sublis  use tv 001576 aa 000002 777777 vfd 9/,9/2,18/-1  001577 0a 002625 7060 00 tsx6 type_1_subr  001600 4a 4 00672 7101 20 tra lisp_alloc_$sublis  001601 aa 003765 000000 zero .._00337-lisp_subr_tv_,subr  use Names  003767 aa 006 163 165 142 .._00337: acc "sublis" 003770 aa 154 151 163 000 use tv 359 subrp: type_0_subr subr,subrp,1,,lisp_quick_fcns_$subrp use tv  001602 aa 000001 777777 vfd 9/,9/1,18/-1  001603 4a 4 00674 7101 20 tra lisp_quick_fcns_$subrp  001604 aa 000000 000000 zero  001605 aa 003767 000000 zero .._00340-lisp_subr_tv_,subr  use Names 003771 aa 005 163 165 142 .._00340: acc "subrp"  003772 aa 162 160 000 000 use tv 360 subst: type_1_subr subr,subst,3,,lisp_alloc_$subst_ use tv 001606 aa 000003 777777 vfd 9/,9/3,18/-1  001607 0a 002625 7060 00 tsx6 type_1_subr  001610 4a 4 00676 7101 20 tra lisp_alloc_$subst_  001611 aa 003771 000000 zero .._00341-lisp_subr_tv_,subr  use Names  003773 aa 005 163 165 142 .._00341: acc "subst"  003774 aa 163 164 000 000 use tv 361 substr2: pl1 subr,substr2,2,,lisp_char_fns_$Substr2  use tv 001612 aa 000002 777777 vfd 9/,9/2,18/-1  001613 0a 002632 7060 00 tsx6 pl1_fixup  001614 4a 4 00700 7101 20 tra lisp_char_fns_$Substr2  001615 aa 003773 000000 zero .._00342-lisp_subr_tv_,subr  use Names  003775 aa 007 163 165 142 .._00342: acc "substr2"  003776 aa 163 164 162 062 use tv 362 substr: pl1_lsubr lsubr,substr,2,3,lisp_char_fns_$Substr  use tv 001616 aa 003002 777777 vfd 9/3,9/2,18/-1 001617 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001620 4a 4 00702 7101 20 tra lisp_char_fns_$Substr 001621 aa 003775 000001 zero .._00343-lisp_subr_tv_,lsubr use Names  003777 aa 006 163 165 142 .._00343: acc "substr" 004000 aa 163 164 162 000 use tv 363 sysp: pl1 subr,sysp,1,,lisp_defsubr_$sysp use tv 001622 aa 000001 777777 vfd 9/,9/1,18/-1  001623 0a 002632 7060 00 tsx6 pl1_fixup  001624 4a 4 00704 7101 20 tra lisp_defsubr_$sysp  001625 aa 003777 000000 zero .._00344-lisp_subr_tv_,subr  use Names  004001 aa 004 163 171 163 .._00344: acc "sysp"  004002 aa 160 000 000 000 use tv 364 terpri: pl1_lsubr lsubr,terpri,0,1,lisp_print_$terpri  use tv 001626 aa 001000 777777 vfd 9/1,9/0,18/-1 001627 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001630 4a 4 00706 7101 20 tra lisp_print_$terpri  001631 aa 004001 000001 zero .._00345-lisp_subr_tv_,lsubr use Names  004003 aa 006 164 145 162 .._00345: acc "terpri" 004004 aa 160 162 151 000 use tv 365 throw: pl1 fsubr,throw,,,lisp_prog_fns_$throw  use tv 001632 aa 000000 777777 vfd 9/,9/,18/-1  001633 0a 002632 7060 00 tsx6 pl1_fixup  001634 4a 4 00710 7101 20 tra lisp_prog_fns_$throw  001635 aa 004003 000002 zero .._00346-lisp_subr_tv_,fsubr use Names  004005 aa 005 164 150 162 .._00346: acc "throw"  004006 aa 157 167 000 000 use tv 366 time: pl1 subr,time,0,,lisp_status_fns_$time  use tv 001636 aa 000000 777777 vfd 9/,9/0,18/-1  001637 0a 002632 7060 00 tsx6 pl1_fixup  001640 4a 4 00712 7101 20 tra lisp_status_fns_$time 001641 aa 004005 000000 zero .._00347-lisp_subr_tv_,subr  use Names  004007 aa 004 164 151 155 .._00347: acc "time"  004010 aa 145 000 000 000 use tv 367 times: type_1_subr lsubr,times,0,511,lisp_bignums_$times use tv 001642 aa 777000 777777 vfd 9/511,9/0,18/-1  001643 0a 002625 7060 00 tsx6 type_1_subr  001644 4a 4 00714 7101 20 tra lisp_bignums_$times  001645 aa 004007 000001 zero .._00350-lisp_subr_tv_,lsubr use Names  004011 aa 005 164 151 155 .._00350: acc "times"  004012 aa 145 163 000 000 use tv 368 tyi: type_1_subr lsubr,tyi,0,2,lisp_reader_alm_$tyi  use tv 001646 aa 002000 777777 vfd 9/2,9/0,18/-1 001647 0a 002625 7060 00 tsx6 type_1_subr  001650 4a 4 00716 7101 20 tra lisp_reader_alm_$tyi  001651 aa 004011 000001 zero .._00351-lisp_subr_tv_,lsubr use Names  004013 aa 003 164 171 151 .._00351: acc "tyi"  use tv 369 tyipeek: type_1_subr lsubr,tyipeek,0,2,lisp_reader_alm_$tyipeek  use tv 001652 aa 002000 777777 vfd 9/2,9/0,18/-1 001653 0a 002625 7060 00 tsx6 type_1_subr  001654 4a 4 00720 7101 20 tra lisp_reader_alm_$tyipeek  001655 aa 004012 000001 zero .._00352-lisp_subr_tv_,lsubr use Names  004014 aa 007 164 171 151 .._00352: acc "tyipeek"  004015 aa 160 145 145 153 use tv 370 tyo: type_1_subr lsubr,tyo,1,2,lisp_reader_alm_$tyo_alm  use tv 001656 aa 002001 777777 vfd 9/2,9/1,18/-1 001657 0a 002625 7060 00 tsx6 type_1_subr  001660 4a 4 00722 7101 20 tra lisp_reader_alm_$tyo_alm  001661 aa 004014 000001 zero .._00353-lisp_subr_tv_,lsubr use Names  004016 aa 003 164 171 157 .._00353: acc "tyo"  use tv 371 typep: type_1_subr subr,typep,1,,lisp_utils_$typep  use tv 001662 aa 000001 777777 vfd 9/,9/1,18/-1  001663 0a 002625 7060 00 tsx6 type_1_subr  001664 4a 4 00724 7101 20 tra lisp_utils_$typep 001665 aa 004015 000000 zero .._00354-lisp_subr_tv_,subr  use Names  004017 aa 005 164 171 160 .._00354: acc "typep"  004020 aa 145 160 000 000 use tv 372 xcons: type_1_subr subr,xcons,2,,lisp_alloc_$xcons_ use tv 001666 aa 000002 777777 vfd 9/,9/2,18/-1  001667 0a 002625 7060 00 tsx6 type_1_subr  001670 4a 4 00726 7101 20 tra lisp_alloc_$xcons_  001671 aa 004017 000000 zero .._00355-lisp_subr_tv_,subr  use Names  004021 aa 005 170 143 157 .._00355: acc "xcons"  004022 aa 156 163 000 000 use tv 373 zerop: type_0_subr subr,zerop,1,,lisp_quick_fcns_$zerop use tv  001672 aa 000001 777777 vfd 9/,9/1,18/-1  001673 4a 4 00730 7101 20 tra lisp_quick_fcns_$zerop  001674 aa 000000 000000 zero  001675 aa 004021 000000 zero .._00356-lisp_subr_tv_,subr  use Names 004023 aa 005 172 145 162 .._00356: acc "zerop"  004024 aa 157 160 000 000 use tv 374 alphalessp: type_1_subr subr,alphalessp,2,,lisp_quick_fcns_$alphalessp  use tv 001676 aa 000002 777777 vfd 9/,9/2,18/-1  001677 0a 002625 7060 00 tsx6 type_1_subr  001700 4a 4 00732 7101 20 tra lisp_quick_fcns_$alphalessp  001701 aa 004023 000000 zero .._00357-lisp_subr_tv_,subr  use Names  004025 aa 012 141 154 160 .._00357: acc "alphalessp" 004026 aa 150 141 154 145 004027 aa 163 163 160 000 use tv 375 samepnamep: type_1_subr subr,samepnamep,2,,lisp_quick_fcns_$samepnamep  use tv 001702 aa 000002 777777 vfd 9/,9/2,18/-1  001703 0a 002625 7060 00 tsx6 type_1_subr  001704 4a 4 00734 7101 20 tra lisp_quick_fcns_$samepnamep  001705 aa 004026 000000 zero .._00360-lisp_subr_tv_,subr  use Names  004030 aa 012 163 141 155 .._00360: acc "samepnamep" 004031 aa 145 160 156 141 004032 aa 155 145 160 000 use tv 376 getchar: type_1_subr subr,getchar,2,,lisp_quick_fcns_$getchar  use tv 001706 aa 000002 777777 vfd 9/,9/2,18/-1  001707 0a 002625 7060 00 tsx6 type_1_subr  001710 4a 4 00736 7101 20 tra lisp_quick_fcns_$getchar  001711 aa 004031 000000 zero .._00361-lisp_subr_tv_,subr  use Names  004033 aa 007 147 145 164 .._00361: acc "getchar"  004034 aa 143 150 141 162 use tv 377 sxhash: type_1_subr subr,sxhash,1,,lisp_utils_$sxhash  use tv 001712 aa 000001 777777 vfd 9/,9/1,18/-1  001713 0a 002625 7060 00 tsx6 type_1_subr  001714 4a 4 00740 7101 20 tra lisp_utils_$sxhash  001715 aa 004033 000000 zero .._00362-lisp_subr_tv_,subr  use Names  004035 aa 006 163 170 150 .._00362: acc "sxhash" 004036 aa 141 163 150 000 use tv 378 gcd: type_1_subr subr,gcd,2,,lisp_bignums_$gcd  use tv 001716 aa 000002 777777 vfd 9/,9/2,18/-1  001717 0a 002625 7060 00 tsx6 type_1_subr  001720 4a 4 00742 7101 20 tra lisp_bignums_$gcd 001721 aa 004035 000000 zero .._00363-lisp_subr_tv_,subr  use Names  004037 aa 003 147 143 144 .._00363: acc "gcd"  use tv 379 error: pl1_lsubr lsubr,error,0,3,lisp_error_$error use tv 001722 aa 003000 777777 vfd 9/3,9/0,18/-1 001723 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001724 4a 4 00744 7101 20 tra lisp_error_$error 001725 aa 004036 000001 zero .._00364-lisp_subr_tv_,lsubr use Names  004040 aa 005 145 162 162 .._00364: acc "error"  004041 aa 157 162 000 000 use tv 380 setsyntax: pl1 subr,setsyntax,3,,lisp_status_fns_$setsyntax  use tv 001726 aa 000003 777777 vfd 9/,9/3,18/-1  001727 0a 002632 7060 00 tsx6 pl1_fixup  001730 4a 4 00746 7101 20 tra lisp_status_fns_$setsyntax  001731 aa 004040 000000 zero .._00365-lisp_subr_tv_,subr  use Names  004042 aa 011 163 145 164 .._00365: acc "setsyntax"  004043 aa 163 171 156 164 004044 aa 141 170 000 000 use tv 381 cursorpos: pl1_lsubr lsubr,cursorpos,0,3,lisp_io_fns_$cursorpos use tv 001732 aa 003000 777777 vfd 9/3,9/0,18/-1 001733 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001734 4a 4 00750 7101 20 tra lisp_io_fns_$cursorpos  001735 aa 004043 000001 zero .._00366-lisp_subr_tv_,lsubr use Names  004045 aa 011 143 165 162 .._00366: acc "cursorpos"  004046 aa 163 157 162 160 004047 aa 157 163 000 000 use tv 382 force_output: pl1 subr,force-output,1,,lisp_io_control_$force_output  use tv 001736 aa 000001 777777 vfd 9/,9/1,18/-1  001737 0a 002632 7060 00 tsx6 pl1_fixup  001740 4a 4 00752 7101 20 tra lisp_io_control_$force_output 001741 aa 004046 000000 zero .._00367-lisp_subr_tv_,subr  use Names  004050 aa 014 146 157 162 .._00367: acc "force-output"  004051 aa 143 145 055 157 004052 aa 165 164 160 165 004053 aa 164 000 000 000 use tv 383 clear_input: pl1 subr,clear-input,1,,lisp_io_control_$clear_input  use tv 001742 aa 000001 777777 vfd 9/,9/1,18/-1  001743 0a 002632 7060 00 tsx6 pl1_fixup  001744 4a 4 00754 7101 20 tra lisp_io_control_$clear_input  001745 aa 004052 000000 zero .._00370-lisp_subr_tv_,subr  use Names  004054 aa 013 143 154 145 .._00370: acc "clear-input"  004055 aa 141 162 055 151 004056 aa 156 160 165 164 use tv 384 haipart: type_1_subr subr,haipart,2,,lisp_bignums_$haipart  use tv 001746 aa 000002 777777 vfd 9/,9/2,18/-1  001747 0a 002625 7060 00 tsx6 type_1_subr  001750 4a 4 00756 7101 20 tra lisp_bignums_$haipart 001751 aa 004055 000000 zero .._00371-lisp_subr_tv_,subr  use Names  004057 aa 007 150 141 151 .._00371: acc "haipart"  004060 aa 160 141 162 164 use tv 385 haulong: type_1_subr subr,haulong,1,,lisp_bignums_$haulong  use tv 001752 aa 000001 777777 vfd 9/,9/1,18/-1  001753 0a 002625 7060 00 tsx6 type_1_subr  001754 4a 4 00760 7101 20 tra lisp_bignums_$haulong 001755 aa 004057 000000 zero .._00372-lisp_subr_tv_,subr  use Names  004061 aa 007 150 141 165 .._00372: acc "haulong"  004062 aa 154 157 156 147 use tv 386 sort: pl1 subr,sort,2,,lisp_array_fcns_$sort  use tv 001756 aa 000002 777777 vfd 9/,9/2,18/-1  001757 0a 002632 7060 00 tsx6 pl1_fixup  001760 4a 4 00762 7101 20 tra lisp_array_fcns_$sort 001761 aa 004061 000000 zero .._00373-lisp_subr_tv_,subr  use Names  004063 aa 004 163 157 162 .._00373: acc "sort"  004064 aa 164 000 000 000 use tv 387 sortcar: pl1 subr,sortcar,2,,lisp_array_fcns_$sortcar use tv 001762 aa 000002 777777 vfd 9/,9/2,18/-1  001763 0a 002632 7060 00 tsx6 pl1_fixup  001764 4a 4 00764 7101 20 tra lisp_array_fcns_$sortcar  001765 aa 004063 000000 zero .._00374-lisp_subr_tv_,subr  use Names  004065 aa 007 163 157 162 .._00374: acc "sortcar"  004066 aa 164 143 141 162 use tv 388 fillarray: pl1 subr,fillarray,2,,lisp_array_fcns_$fillarray  use tv 001766 aa 000002 777777 vfd 9/,9/2,18/-1  001767 0a 002632 7060 00 tsx6 pl1_fixup  001770 4a 4 00766 7101 20 tra lisp_array_fcns_$fillarray  001771 aa 004065 000000 zero .._00375-lisp_subr_tv_,subr  use Names  004067 aa 011 146 151 154 .._00375: acc "fillarray"  004070 aa 154 141 162 162 004071 aa 141 171 000 000 use tv 389 listarray: pl1_lsubr lsubr,listarray,1,2,lisp_array_fcns_$listarray use tv 001772 aa 002001 777777 vfd 9/2,9/1,18/-1 001773 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  001774 4a 4 00770 7101 20 tra lisp_array_fcns_$listarray  001775 aa 004070 000001 zero .._00376-lisp_subr_tv_,lsubr use Names  004072 aa 011 154 151 163 .._00376: acc "listarray"  004073 aa 164 141 162 162 004074 aa 141 171 000 000 use tv 390 listify: type_1_subr subr,listify,1,,lisp_$listify  use tv 001776 aa 000001 777777 vfd 9/,9/1,18/-1  001777 0a 002625 7060 00 tsx6 type_1_subr  002000 4a 4 00772 7101 20 tra lisp_$listify 002001 aa 004073 000000 zero .._00377-lisp_subr_tv_,subr  use Names  004075 aa 007 154 151 163 .._00377: acc "listify"  004076 aa 164 151 146 171 use tv 391 quikload: none_such ,listen  use tv 002002 aa 000000 777777 zero 0,-1 002003 aa 000000 0020 00 drl 0 002004 aa 000000 000000 zero  002005 aa 004075 000000 zero .._00400-lisp_subr_tv_,  use Names  004077 aa 006 154 151 163 .._00400: acc "listen" 004100 aa 164 145 156 000 use tv 392 funcall: type_1_subr lsubr,funcall,1,511,lisp_$funcall  use tv 002006 aa 777001 777777 vfd 9/511,9/1,18/-1  002007 0a 002625 7060 00 tsx6 type_1_subr  002010 4a 4 00774 7101 20 tra lisp_$funcall 002011 aa 004077 000001 zero .._00401-lisp_subr_tv_,lsubr use Names  004101 aa 007 146 165 156 .._00401: acc "funcall"  004102 aa 143 141 154 154 use tv 393 listen: type_1_subr subr,listen,0,,lisp_reader_alm_$listen  use tv 002012 aa 000000 777777 vfd 9/,9/0,18/-1  002013 0a 002625 7060 00 tsx6 type_1_subr  002014 4a 4 00776 7101 20 tra lisp_reader_alm_$listen  002015 aa 004101 000000 zero .._00402-lisp_subr_tv_,subr  use Names  004103 aa 006 154 151 163 .._00402: acc "listen" 004104 aa 164 145 156 000 use tv 394 fixgcd: type_0_subr subr,\\,2,,lisp_utils_$fixgcd  use tv  002016 aa 000002 777777 vfd 9/,9/2,18/-1  002017 4a 4 01000 7101 20 tra lisp_utils_$fixgcd  002020 aa 000000 000000 zero  002021 aa 004103 000000 zero .._00403-lisp_subr_tv_,subr  use Names 004105 aa 002 134 134 000 .._00403: acc "\\" use tv 395 copysymbol: type_1_subr subr,copysymbol,2,,lisp_alloc_$copysymbol  use tv 002022 aa 000002 777777 vfd 9/,9/2,18/-1  002023 0a 002625 7060 00 tsx6 type_1_subr  002024 4a 4 01002 7101 20 tra lisp_alloc_$copysymbol  002025 aa 004104 000000 zero .._00404-lisp_subr_tv_,subr  use Names  004106 aa 012 143 157 160 .._00404: acc "copysymbol" 004107 aa 171 163 171 155 004110 aa 142 157 154 000 use tv 396 load: pl1 subr,load,1,,lisp_load_$lisp_load_  use tv 002026 aa 000001 777777 vfd 9/,9/1,18/-1  002027 0a 002632 7060 00 tsx6 pl1_fixup  002030 4a 4 01004 7101 20 tra lisp_load_$lisp_load_ 002031 aa 004107 000000 zero .._00405-lisp_subr_tv_,subr  use Names  004111 aa 004 154 157 141 .._00405: acc "load"  004112 aa 144 000 000 000 use tv 397 charpos: type_0_subr lsubr,charpos,1,2,lisp_reader_alm_$charpos  use tv  002032 aa 002001 777777 vfd 9/2,9/1,18/-1 002033 4a 4 01006 7101 20 tra lisp_reader_alm_$charpos  002034 aa 000000 000000 zero  002035 aa 004111 000001 zero .._00406-lisp_subr_tv_,lsubr use Names 004113 aa 007 143 150 141 .._00406: acc "charpos"  004114 aa 162 160 157 163 use tv 398 linenum: type_0_subr lsubr,linenum,1,2,lisp_reader_alm_$linenum  use tv  002036 aa 002001 777777 vfd 9/2,9/1,18/-1 002037 4a 4 01010 7101 20 tra lisp_reader_alm_$linenum  002040 aa 000000 000000 zero  002041 aa 004113 000001 zero .._00407-lisp_subr_tv_,lsubr use Names 004115 aa 007 154 151 156 .._00407: acc "linenum"  004116 aa 145 156 165 155 use tv 399 pagenum: type_0_subr lsubr,pagenum,1,2,lisp_reader_alm_$pagenum  use tv  002042 aa 002001 777777 vfd 9/2,9/1,18/-1 002043 4a 4 01012 7101 20 tra lisp_reader_alm_$pagenum  002044 aa 000000 000000 zero  002045 aa 004115 000001 zero .._00410-lisp_subr_tv_,lsubr use Names 004117 aa 007 160 141 147 .._00410: acc "pagenum"  004120 aa 145 156 165 155 use tv 400 pagel: type_0_subr lsubr,pagel,1,2,lisp_reader_alm_$pagel  use tv  002046 aa 002001 777777 vfd 9/2,9/1,18/-1 002047 4a 4 01014 7101 20 tra lisp_reader_alm_$pagel  002050 aa 000000 000000 zero  002051 aa 004117 000001 zero .._00411-lisp_subr_tv_,lsubr use Names 004121 aa 005 160 141 147 .._00411: acc "pagel"  004122 aa 145 154 000 000 use tv 401 endpagefn: pl1_lsubr lsubr,endpagefn,1,2,lisp_io_fns_$endpagefn use tv 002052 aa 002001 777777 vfd 9/2,9/1,18/-1 002053 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  002054 4a 4 01016 7101 20 tra lisp_io_fns_$endpagefn  002055 aa 004121 000001 zero .._00412-lisp_subr_tv_,lsubr use Names  004123 aa 011 145 156 144 .._00412: acc "endpagefn"  004124 aa 160 141 147 145 004125 aa 146 156 000 000 use tv 402 percent_include: pl1 fsubr,%include,,,lisp_io_control_$percent_include  use tv 002056 aa 000000 777777 vfd 9/,9/,18/-1  002057 0a 002632 7060 00 tsx6 pl1_fixup  002060 4a 4 01020 7101 20 tra lisp_io_control_$percent_include  002061 aa 004124 000002 zero .._00413-lisp_subr_tv_,fsubr use Names  004126 aa 010 045 151 156 .._00413: acc "%include"  004127 aa 143 154 165 144 004130 aa 145 000 000 000 use tv 403 defaultf: pl1 subr,defaultf,1,,lisp_io_fns_$defaultf  use tv 002062 aa 000001 777777 vfd 9/,9/1,18/-1  002063 0a 002632 7060 00 tsx6 pl1_fixup  002064 4a 4 01022 7101 20 tra lisp_io_fns_$defaultf 002065 aa 004127 000000 zero .._00414-lisp_subr_tv_,subr  use Names  004131 aa 010 144 145 146 .._00414: acc "defaultf"  004132 aa 141 165 154 164 004133 aa 146 000 000 000 use tv 404 alloc: pl1 subr,alloc,1,,lisp_status_fns_$alloc  use tv 002066 aa 000001 777777 vfd 9/,9/1,18/-1  002067 0a 002632 7060 00 tsx6 pl1_fixup  002070 4a 4 01024 7101 20 tra lisp_status_fns_$alloc  002071 aa 004132 000000 zero .._00415-lisp_subr_tv_,subr  use Names  004134 aa 005 141 154 154 .._00415: acc "alloc"  004135 aa 157 143 000 000 use tv 405 implode: pl1 subr,implode,1,,lisp_reader_$implode use tv 002072 aa 000001 777777 vfd 9/,9/1,18/-1  002073 0a 002632 7060 00 tsx6 pl1_fixup  002074 4a 4 01026 7101 20 tra lisp_reader_$implode  002075 aa 004134 000000 zero .._00416-lisp_subr_tv_,subr  use Names  004136 aa 007 151 155 160 .._00416: acc "implode"  004137 aa 154 157 144 145 use tv 406 purcopy: type_0_subr subr,purcopy,1,,lisp_subr_tv_$purcopy_code use tv  002076 aa 000001 777777 vfd 9/,9/1,18/-1  002077 4a 4 01030 7101 20 tra lisp_subr_tv_$purcopy_code  002100 aa 000000 000000 zero  002101 aa 004136 000000 zero .._00417-lisp_subr_tv_,subr  use Names 004140 aa 007 160 165 162 .._00417: acc "purcopy"  004141 aa 143 157 160 171 use tv 407 nreconc: type_1_subr subr,nreconc,2,,lisp_alloc_$nreconc_  use tv 002102 aa 000002 777777 vfd 9/,9/2,18/-1  002103 0a 002625 7060 00 tsx6 type_1_subr  002104 4a 4 01032 7101 20 tra lisp_alloc_$nreconc_  002105 aa 004140 000000 zero .._00420-lisp_subr_tv_,subr  use Names  004142 aa 007 156 162 145 .._00420: acc "nreconc"  004143 aa 143 157 156 143 use tv 408 err_1: err_break ,*internal-^b-break,0,0  use tv 002106 aa 000001 777777 vfd 9/0,9/1,18/-1 002107 aa 000574 7060 04 tsx6 err_break-*,ic  002110 aa 000000 000000 zero 0,0  002111 aa 004142 000000 zero .._00421-lisp_subr_tv_,  use Names  004144 aa 022 052 151 156 .._00421: acc "*internal-^b-break" 004145 aa 164 145 162 156 004146 aa 141 154 055 136 004147 aa 142 055 142 162 004150 aa 145 141 153 000 use tv 409 err_5: err_break ,*internal-undf-fnctn-break,-1,8 use tv 002112 aa 000001 777777 vfd 9/0,9/1,18/-1 002113 aa 000570 7060 04 tsx6 err_break-*,ic  002114 aa 777777 000010 zero -1,8 002115 aa 004147 000000 zero .._00422-lisp_subr_tv_,  use Names  004151 aa 032 052 151 156 .._00422: acc "*internal-undf-fnctn-break" 004152 aa 164 145 162 156 004153 aa 141 154 055 165 004154 aa 156 144 146 055 004155 aa 146 156 143 164 004156 aa 156 055 142 162 004157 aa 145 141 153 000 use tv 410 err_6: err_break ,*internal-unbnd-vrbl-break,-1,10  use tv 002116 aa 000001 777777 vfd 9/0,9/1,18/-1 002117 aa 000564 7060 04 tsx6 err_break-*,ic  002120 aa 777777 000012 zero -1,10  002121 aa 004156 000000 zero .._00423-lisp_subr_tv_,  use Names  004160 aa 032 052 151 156 .._00423: acc "*internal-unbnd-vrbl-break" 004161 aa 164 145 162 156 004162 aa 141 154 055 165 004163 aa 156 142 156 144 004164 aa 055 166 162 142 004165 aa 154 055 142 162 004166 aa 145 141 153 000 use tv 411 err_7: err_break ,*internal-wrng-type-arg-break,-1,12 use tv 002122 aa 000001 777777 vfd 9/0,9/1,18/-1 002123 aa 000560 7060 04 tsx6 err_break-*,ic  002124 aa 777777 000014 zero -1,12  002125 aa 004165 000000 zero .._00424-lisp_subr_tv_,  use Names  004167 aa 035 052 151 156 .._00424: acc "*internal-wrng-type-arg-break"  004170 aa 164 145 162 156 004171 aa 141 154 055 167 004172 aa 162 156 147 055 004173 aa 164 171 160 145 004174 aa 055 141 162 147 004175 aa 055 142 162 145 004176 aa 141 153 000 000 use tv 412 err_8: err_break ,*internal-unseen-go-tag-break,-1,14 use tv 002126 aa 000001 777777 vfd 9/0,9/1,18/-1 002127 aa 000554 7060 04 tsx6 err_break-*,ic  002130 aa 777777 000016 zero -1,14  002131 aa 004175 000000 zero .._00425-lisp_subr_tv_,  use Names  004177 aa 035 052 151 156 .._00425: acc "*internal-unseen-go-tag-break"  004200 aa 164 145 162 156 004201 aa 141 154 055 165 004202 aa 156 163 145 145 004203 aa 156 055 147 157 004204 aa 055 164 141 147 004205 aa 055 142 162 145 004206 aa 141 153 000 000 use tv 413 err_9: err_break ,*internal-wrng-no-args-break,-1,16  use tv 002132 aa 000001 777777 vfd 9/0,9/1,18/-1 002133 aa 000550 7060 04 tsx6 err_break-*,ic  002134 aa 777777 000020 zero -1,16  002135 aa 004205 000000 zero .._00426-lisp_subr_tv_,  use Names  004207 aa 034 052 151 156 .._00426: acc "*internal-wrng-no-args-break"  004210 aa 164 145 162 156 004211 aa 141 154 055 167 004212 aa 162 156 147 055 004213 aa 156 157 055 141 004214 aa 162 147 163 055 004215 aa 142 162 145 141 004216 aa 153 000 000 000 use tv 414 err_10: err_break ,*internal-gc-lossage-break,0,18  use tv 002136 aa 000001 777777 vfd 9/0,9/1,18/-1 002137 aa 000544 7060 04 tsx6 err_break-*,ic  002140 aa 000000 000022 zero 0,18 002141 aa 004215 000000 zero .._00427-lisp_subr_tv_,  use Names  004217 aa 032 052 151 156 .._00427: acc "*internal-gc-lossage-break" 004220 aa 164 145 162 156 004221 aa 141 154 055 147 004222 aa 143 055 154 157 004223 aa 163 163 141 147 004224 aa 145 055 142 162 004225 aa 145 141 153 000 use tv 415 err_11: err_break ,*internal-fail-act-break,-1,20 use tv 002142 aa 000001 777777 vfd 9/0,9/1,18/-1 002143 aa 000540 7060 04 tsx6 err_break-*,ic  002144 aa 777777 000024 zero -1,20  002145 aa 004224 000000 zero .._00430-lisp_subr_tv_,  use Names  004226 aa 030 052 151 156 .._00430: acc "*internal-fail-act-break"  004227 aa 164 145 162 156 004230 aa 141 154 055 146 004231 aa 141 151 154 055 004232 aa 141 143 164 055 004233 aa 142 162 145 141 004234 aa 153 000 000 000 use tv 416 err_12: err_break ,*internal-pdl-overflow-break,-1,22 use tv 002146 aa 000001 777777 vfd 9/0,9/1,18/-1 002147 aa 000534 7060 04 tsx6 err_break-*,ic  002150 aa 777777 000026 zero -1,22  002151 aa 004233 000000 zero .._00431-lisp_subr_tv_,  use Names  004235 aa 034 052 151 156 .._00431: acc "*internal-pdl-overflow-break"  004236 aa 164 145 162 156 004237 aa 141 154 055 160 004240 aa 144 154 055 157 004241 aa 166 145 162 146 004242 aa 154 157 167 055 004243 aa 142 162 145 141 004244 aa 153 000 000 000 use tv 417 err_19: type_0_subr subr,*internal-*rset-break,1,,lisp_subr_tv_$star_rset_trap  use tv  002152 aa 000001 777777 vfd 9/,9/1,18/-1  002153 4a 4 01034 7101 20 tra lisp_subr_tv_$star_rset_trap  002154 aa 000000 000000 zero  002155 aa 004243 000000 zero .._00432-lisp_subr_tv_,subr  use Names 004245 aa 025 052 151 156 .._00432: acc "*internal-*rset-break"  004246 aa 164 145 162 156 004247 aa 141 154 055 052 004250 aa 162 163 145 164 004251 aa 055 142 162 145 004252 aa 141 153 000 000 use tv 418 err_18: type_0_subr subr,*internal-autoload-trap,1,,lisp_subr_tv_$autoload_trap use tv  002156 aa 000001 777777 vfd 9/,9/1,18/-1  002157 4a 4 01036 7101 20 tra lisp_subr_tv_$autoload_trap  002160 aa 000000 000000 zero  002161 aa 004251 000000 zero .._00433-lisp_subr_tv_,subr  use Names 004253 aa 027 052 151 156 .._00433: acc "*internal-autoload-trap"  004254 aa 164 145 162 156 004255 aa 141 154 055 141 004256 aa 165 164 157 154 004257 aa 157 141 144 055 004260 aa 164 162 141 160 use tv 419 getcharn: type_1_subr subr,getcharn,2,,lisp_quick_fcns_$getcharn  use tv 002162 aa 000002 777777 vfd 9/,9/2,18/-1  002163 0a 002625 7060 00 tsx6 type_1_subr  002164 4a 4 01040 7101 20 tra lisp_quick_fcns_$getcharn 002165 aa 004257 000000 zero .._00434-lisp_subr_tv_,subr  use Names  004261 aa 010 147 145 164 .._00434: acc "getcharn"  004262 aa 143 150 141 162 004263 aa 156 000 000 000 use tv 420 subrcall: type_1_subr fsubr,subrcall,,,lisp_$subrcall  use tv 002166 aa 000000 777777 vfd 9/,9/,18/-1  002167 0a 002625 7060 00 tsx6 type_1_subr  002170 4a 4 01042 7101 20 tra lisp_$subrcall  002171 aa 004262 000002 zero .._00435-lisp_subr_tv_,fsubr use Names  004264 aa 010 163 165 142 .._00435: acc "subrcall"  004265 aa 162 143 141 154 004266 aa 154 000 000 000 use tv 421 lsubrcall: type_1_subr fsubr,lsubrcall,,,lisp_$lsubrcall  use tv 002172 aa 000000 777777 vfd 9/,9/,18/-1  002173 0a 002625 7060 00 tsx6 type_1_subr  002174 4a 4 01044 7101 20 tra lisp_$lsubrcall  002175 aa 004265 000002 zero .._00436-lisp_subr_tv_,fsubr use Names  004267 aa 011 154 163 165 .._00436: acc "lsubrcall"  004270 aa 142 162 143 141 004271 aa 154 154 000 000 use tv 422 arraycall: type_1_subr fsubr,arraycall,,,lisp_$arraycall  use tv 002176 aa 000000 777777 vfd 9/,9/,18/-1  002177 0a 002625 7060 00 tsx6 type_1_subr  002200 4a 4 01046 7101 20 tra lisp_$arraycall  002201 aa 004270 000002 zero .._00437-lisp_subr_tv_,fsubr use Names  004272 aa 011 141 162 162 .._00437: acc "arraycall"  004273 aa 141 171 143 141 004274 aa 154 154 000 000 use tv 423 maknum: type_1_subr subr,maknum,1,,lisp_alloc_$maknum  use tv 002202 aa 000001 777777 vfd 9/,9/1,18/-1  002203 0a 002625 7060 00 tsx6 type_1_subr  002204 4a 4 01050 7101 20 tra lisp_alloc_$maknum  002205 aa 004273 000000 zero .._00440-lisp_subr_tv_,subr  use Names  004275 aa 006 155 141 153 .._00440: acc "maknum" 004276 aa 156 165 155 000 use tv 424 munkam: type_1_subr subr,munkam,1,,lisp_alloc_$munkam  use tv 002206 aa 000001 777777 vfd 9/,9/1,18/-1  002207 0a 002625 7060 00 tsx6 type_1_subr  002210 4a 4 01052 7101 20 tra lisp_alloc_$munkam  002211 aa 004275 000000 zero .._00441-lisp_subr_tv_,subr  use Names  004277 aa 006 155 165 156 .._00441: acc "munkam" 004300 aa 153 141 155 000 use tv 425 loadarrays: pl1 subr,loadarrays,1,,lisp_loadumparrays_$loadarrays  use tv 002212 aa 000001 777777 vfd 9/,9/1,18/-1  002213 0a 002632 7060 00 tsx6 pl1_fixup  002214 4a 4 01054 7101 20 tra lisp_loadumparrays_$loadarrays  002215 aa 004277 000000 zero .._00442-lisp_subr_tv_,subr  use Names  004301 aa 012 154 157 141 .._00442: acc "loadarrays" 004302 aa 144 141 162 162 004303 aa 141 171 163 000 use tv 426 dumparrays: pl1 subr,dumparrays,2,,lisp_loadumparrays_$dumparrays  use tv 002216 aa 000002 777777 vfd 9/,9/2,18/-1  002217 0a 002632 7060 00 tsx6 pl1_fixup  002220 4a 4 01056 7101 20 tra lisp_loadumparrays_$dumparrays  002221 aa 004302 000000 zero .._00443-lisp_subr_tv_,subr  use Names  004304 aa 012 144 165 155 .._00443: acc "dumparrays" 004305 aa 160 141 162 162 004306 aa 141 171 163 000 use tv 427 expt_fix: type_0_subr subr,^,2,,lisp_utils_$expt_fix  use tv  002222 aa 000002 777777 vfd 9/,9/2,18/-1  002223 4a 4 01060 7101 20 tra lisp_utils_$expt_fix  002224 aa 000000 000000 zero  002225 aa 004305 000000 zero .._00444-lisp_subr_tv_,subr  use Names 004307 aa 001 136 000 000 .._00444: acc "^"  use tv 428 expt_flt: type_0_subr subr,^$,2,,lisp_utils_$expt_flo  use tv  002226 aa 000002 777777 vfd 9/,9/2,18/-1  002227 4a 4 01062 7101 20 tra lisp_utils_$expt_flo  002230 aa 000000 000000 zero  002231 aa 004306 000000 zero .._00445-lisp_subr_tv_,subr  use Names 004310 aa 002 136 044 000 .._00445: acc "^$" use tv 429 symeval: type_1_subr subr,symeval,1,,lisp_$symeval  use tv 002232 aa 000001 777777 vfd 9/,9/1,18/-1  002233 0a 002625 7060 00 tsx6 type_1_subr  002234 4a 4 01064 7101 20 tra lisp_$symeval 002235 aa 004307 000000 zero .._00446-lisp_subr_tv_,subr  use Names  004311 aa 007 163 171 155 .._00446: acc "symeval"  004312 aa 145 166 141 154 use tv 430 plist: type_1_subr subr,plist,1,,lisp_property_fns_$plist_  use tv 002236 aa 000001 777777 vfd 9/,9/1,18/-1  002237 0a 002625 7060 00 tsx6 type_1_subr  002240 4a 4 01066 7101 20 tra lisp_property_fns_$plist_ 002241 aa 004311 000000 zero .._00447-lisp_subr_tv_,subr  use Names  004313 aa 005 160 154 151 .._00447: acc "plist"  004314 aa 163 164 000 000 use tv 431 setplist: type_1_subr subr,setplist,2,,lisp_property_fns_$setplist_ use tv 002242 aa 000002 777777 vfd 9/,9/2,18/-1  002243 0a 002625 7060 00 tsx6 type_1_subr  002244 4a 4 01070 7101 20 tra lisp_property_fns_$setplist_  002245 aa 004313 000000 zero .._00450-lisp_subr_tv_,subr  use Names  004315 aa 010 163 145 164 .._00450: acc "setplist"  004316 aa 160 154 151 163 004317 aa 164 000 000 000 use tv 432 open: pl1_lsubr lsubr,open,0,2,lisp_io_control_$open  use tv 002246 aa 002000 777777 vfd 9/2,9/0,18/-1 002247 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  002250 4a 4 01072 7101 20 tra lisp_io_control_$open 002251 aa 004316 000001 zero .._00451-lisp_subr_tv_,lsubr use Names  004320 aa 004 157 160 145 .._00451: acc "open"  004321 aa 156 000 000 000 use tv 433 in: pl1 subr,in,1,,lisp_io_control_$in  use tv 002252 aa 000001 777777 vfd 9/,9/1,18/-1  002253 0a 002632 7060 00 tsx6 pl1_fixup  002254 4a 4 01074 7101 20 tra lisp_io_control_$in  002255 aa 004320 000000 zero .._00452-lisp_subr_tv_,subr  use Names  004322 aa 002 151 156 000 .._00452: acc "in" use tv 434 out: pl1 subr,out,2,,lisp_io_control_$out use tv 002256 aa 000002 777777 vfd 9/,9/2,18/-1  002257 0a 002632 7060 00 tsx6 pl1_fixup  002260 4a 4 01076 7101 20 tra lisp_io_control_$out  002261 aa 004321 000000 zero .._00453-lisp_subr_tv_,subr  use Names  004323 aa 003 157 165 164 .._00453: acc "out"  use tv 435 truename: pl1 subr,truename,1,,lisp_io_fns_$truename  use tv 002262 aa 000001 777777 vfd 9/,9/1,18/-1  002263 0a 002632 7060 00 tsx6 pl1_fixup  002264 4a 4 01100 7101 20 tra lisp_io_fns_$truename 002265 aa 004322 000000 zero .._00454-lisp_subr_tv_,subr  use Names  004324 aa 010 164 162 165 .._00454: acc "truename"  004325 aa 145 156 141 155 004326 aa 145 000 000 000 use tv 436 evalhook: type_1_subr subr,evalhook,2,,lisp_$evalhook  use tv 002266 aa 000002 777777 vfd 9/,9/2,18/-1  002267 0a 002625 7060 00 tsx6 type_1_subr  002270 4a 4 01102 7101 20 tra lisp_$evalhook  002271 aa 004325 000000 zero .._00455-lisp_subr_tv_,subr  use Names  004327 aa 010 145 166 141 .._00455: acc "evalhook"  004330 aa 154 150 157 157 004331 aa 153 000 000 000 use tv 437 fsc: type_0_subr subr,fsc,2,,lisp_utils_$fsc  use tv  002272 aa 000002 777777 vfd 9/,9/2,18/-1  002273 4a 4 01104 7101 20 tra lisp_utils_$fsc  002274 aa 000000 000000 zero  002275 aa 004330 000000 zero .._00456-lisp_subr_tv_,subr  use Names 004332 aa 003 146 163 143 .._00456: acc "fsc"  use tv 438 ifix: type_0_subr subr,ifix,1,,lisp_utils_$ifix use tv  002276 aa 000001 777777 vfd 9/,9/1,18/-1  002277 4a 4 01106 7101 20 tra lisp_utils_$ifix  002300 aa 000000 000000 zero  002301 aa 004331 000000 zero .._00457-lisp_subr_tv_,subr  use Names 004333 aa 004 151 146 151 .._00457: acc "ifix"  004334 aa 170 000 000 000 use tv 439 progv: pl1 fsubr,progv,,,lisp_prog_fns_$progv  use tv 002302 aa 000000 777777 vfd 9/,9/,18/-1  002303 0a 002632 7060 00 tsx6 pl1_fixup  002304 4a 4 01110 7101 20 tra lisp_prog_fns_$progv  002305 aa 004333 000002 zero .._00460-lisp_subr_tv_,fsubr use Names  004335 aa 005 160 162 157 .._00460: acc "progv"  004336 aa 147 166 000 000 use tv 440 mapatoms: pl1_lsubr lsubr,mapatoms,1,2,lisp_array_fcns_$mapatoms  use tv 002306 aa 002001 777777 vfd 9/2,9/1,18/-1 002307 0a 002671 7060 00 tsx6 pl1_lsubr_fixup  002310 4a 4 01112 7101 20 tra lisp_array_fcns_$mapatoms 002311 aa 004335 000001 zero .._00461-lisp_subr_tv_,lsubr use Names  004337 aa 010 155 141 160 .._00461: acc "mapatoms"  004340 aa 141 164 157 155 004341 aa 163 000 000 000 use tv 441 symbolp: type_0_subr subr,symbolp,1,,lisp_quick_fcns_$symbolp  use tv  002312 aa 000001 777777 vfd 9/,9/1,18/-1  002313 4a 4 01114 7101 20 tra lisp_quick_fcns_$symbolp  002314 aa 000000 000000 zero  002315 aa 004340 000000 zero .._00462-lisp_subr_tv_,subr  use Names 004342 aa 007 163 171 155 .._00462: acc "symbolp"  004343 aa 142 157 154 160 use tv 442 filep: type_0_subr subr,filep,1,,lisp_quick_fcns_$filep use tv  002316 aa 000001 777777 vfd 9/,9/1,18/-1  002317 4a 4 01116 7101 20 tra lisp_quick_fcns_$filep  002320 aa 000000 000000 zero  002321 aa 004342 000000 zero .._00463-lisp_subr_tv_,subr  use Names 004344 aa 005 146 151 154 .._00463: acc "filep"  004345 aa 145 160 000 000 use tv 443 suspend: pl1 subr,suspend,0,,lisp_command_caller_$suspend use tv 002322 aa 000000 777777 vfd 9/,9/0,18/-1  002323 0a 002632 7060 00 tsx6 pl1_fixup  002324 4a 4 01120 7101 20 tra lisp_command_caller_$suspend  002325 aa 004344 000000 zero .._00464-lisp_subr_tv_,subr  use Names  004346 aa 007 163 165 163 .._00464: acc "suspend"  004347 aa 160 145 156 144 use tv 444 ctrl_g: pl1 subr,^g,0,,lisp_fault_handler_$ctrl_g_function  use tv 002326 aa 000000 777777 vfd 9/,9/0,18/-1  002327 0a 002632 7060 00 tsx6 pl1_fixup  002330 4a 4 01122 7101 20 tra lisp_fault_handler_$ctrl_g_function  002331 aa 004346 000000 zero .._00465-lisp_subr_tv_,subr  use Names  004350 aa 002 136 147 000 .._00465: acc "^g" use tv 445 unwind_protect: pl1 fsubr,unwind-protect,,,lisp_prog_fns_$unwind_protect  use tv 002332 aa 000000 777777 vfd 9/,9/,18/-1  002333 0a 002632 7060 00 tsx6 pl1_fixup  002334 4a 4 01124 7101 20 tra lisp_prog_fns_$unwind_protect 002335 aa 004347 000002 zero .._00466-lisp_subr_tv_,fsubr use Names  004351 aa 016 165 156 167 .._00466: acc "unwind-protect" 004352 aa 151 156 144 055 004353 aa 160 162 157 164 004354 aa 145 143 164 000 use tv 446 let: type_1_subr fsubr,let,,,lisp_$let  use tv 002336 aa 000000 777777 vfd 9/,9/,18/-1  002337 0a 002625 7060 00 tsx6 type_1_subr  002340 4a 4 01126 7101 20 tra lisp_$let 002341 aa 004353 000002 zero .._00467-lisp_subr_tv_,fsubr use Names  004355 aa 003 154 145 164 .._00467: acc "let"  use tv 447 arrayp: type_0_subr subr,arrayp,1,,lisp_quick_fcns_$arrayp  use tv  002342 aa 000001 777777 vfd 9/,9/1,18/-1  002343 4a 4 01130 7101 20 tra lisp_quick_fcns_$arrayp  002344 aa 000000 000000 zero  002345 aa 004354 000000 zero .._00470-lisp_subr_tv_,subr  use Names 004356 aa 006 141 162 162 .._00470: acc "arrayp" 004357 aa 141 171 160 000 use tv 448 list_star: type_1_subr lsubr,list*,1,511,lisp_alloc_$list_star_  use tv 002346 aa 777001 777777 vfd 9/511,9/1,18/-1  002347 0a 002625 7060 00 tsx6 type_1_subr  002350 4a 4 01132 7101 20 tra lisp_alloc_$list_star_  002351 aa 004356 000001 zero .._00471-lisp_subr_tv_,lsubr use Names  004360 aa 005 154 151 163 .._00471: acc "list*"  004361 aa 164 052 000 000 use tv 449 eval_when: pl1 fsubr,eval-when,,,lisp_prog_fns_$eval_when  use tv 002352 aa 000000 777777 vfd 9/,9/,18/-1  002353 0a 002632 7060 00 tsx6 pl1_fixup  002354 4a 4 01134 7101 20 tra lisp_prog_fns_$eval_when  002355 aa 004360 000002 zero .._00472-lisp_subr_tv_,fsubr use Names  004362 aa 011 145 166 141 .._00472: acc "eval-when"  004363 aa 154 055 167 150 004364 aa 145 156 000 000 use tv 450 read_from_string: pl1 subr,read-from-string,1,,lisp_reader_$read_from_string  use tv 002356 aa 000001 777777 vfd 9/,9/1,18/-1  002357 0a 002632 7060 00 tsx6 pl1_fixup  002360 4a 4 01136 7101 20 tra lisp_reader_$read_from_string 002361 aa 004363 000000 zero .._00473-lisp_subr_tv_,subr  use Names  004365 aa 020 162 145 141 .._00473: acc "read-from-string"  004366 aa 144 055 146 162 004367 aa 157 155 055 163 004370 aa 164 162 151 156 004371 aa 147 000 000 000 use tv 451 prog1: type_0_subr lsubr,prog1,1,511,lisp_quick_fcns_$prog1  use tv  002362 aa 777001 777777 vfd 9/511,9/1,18/-1  002363 4a 4 01140 7101 20 tra lisp_quick_fcns_$prog1  002364 aa 000000 000000 zero  002365 aa 004370 000001 zero .._00474-lisp_subr_tv_,lsubr use Names 004372 aa 005 160 162 157 .._00474: acc "prog1"  004373 aa 147 061 000 000 use tv 452 displace: type_1_subr subr,displace,2,,lisp_quick_fcns_$displace  use tv 002366 aa 000002 777777 vfd 9/,9/2,18/-1  002367 0a 002625 7060 00 tsx6 type_1_subr  002370 4a 4 01142 7101 20 tra lisp_quick_fcns_$displace 002371 aa 004372 000000 zero .._00475-lisp_subr_tv_,subr  use Names  004374 aa 010 144 151 163 .._00475: acc "displace"  004375 aa 160 154 141 143 004376 aa 145 000 000 000 use tv 453 nth: type_1_subr subr,nth,2,,lisp_car_cdrs_$nth use tv 002372 aa 000002 777777 vfd 9/,9/2,18/-1  002373 0a 002625 7060 00 tsx6 type_1_subr  002374 4a 4 01144 7101 20 tra lisp_car_cdrs_$nth  002375 aa 004375 000000 zero .._00476-lisp_subr_tv_,subr  use Names  004377 aa 003 156 164 150 .._00476: acc "nth"  use tv 454 nthcdr: type_1_subr subr,nthcdr,2,,lisp_car_cdrs_$nthcdr  use tv 002376 aa 000002 777777 vfd 9/,9/2,18/-1  002377 0a 002625 7060 00 tsx6 type_1_subr  002400 4a 4 01146 7101 20 tra lisp_car_cdrs_$nthcdr 002401 aa 004376 000000 zero .._00477-lisp_subr_tv_,subr  use Names  004400 aa 006 156 164 150 .._00477: acc "nthcdr" 004401 aa 143 144 162 000 use tv 455 first: type_0_subr subr,first,1,,lisp_car_cdrs_$car use tv  002402 aa 000001 777777 vfd 9/,9/1,18/-1  002403 4a 4 00210 7101 20 tra lisp_car_cdrs_$car  002404 aa 000000 000000 zero  002405 aa 004400 000000 zero .._00500-lisp_subr_tv_,subr  use Names 004402 aa 005 146 151 162 .._00500: acc "first"  004403 aa 163 164 000 000 use tv 456 second: type_1_subr subr,second,1,,lisp_car_cdrs_$cadr  use tv 002406 aa 000001 777777 vfd 9/,9/1,18/-1  002407 0a 002625 7060 00 tsx6 type_1_subr  002410 4a 4 00206 7101 20 tra lisp_car_cdrs_$cadr  002411 aa 004402 000000 zero .._00501-lisp_subr_tv_,subr  use Names  004404 aa 006 163 145 143 .._00501: acc "second" 004405 aa 157 156 144 000 use tv 457 third: type_1_subr subr,third,1,,lisp_car_cdrs_$caddr  use tv 002412 aa 000001 777777 vfd 9/,9/1,18/-1  002413 0a 002625 7060 00 tsx6 type_1_subr  002414 4a 4 00204 7101 20 tra lisp_car_cdrs_$caddr  002415 aa 004404 000000 zero .._00502-lisp_subr_tv_,subr  use Names  004406 aa 005 164 150 151 .._00502: acc "third"  004407 aa 162 144 000 000 use tv 458 fourth: type_1_subr subr,fourth,1,,lisp_car_cdrs_$cadddr  use tv 002416 aa 000001 777777 vfd 9/,9/1,18/-1  002417 0a 002625 7060 00 tsx6 type_1_subr  002420 4a 4 00202 7101 20 tra lisp_car_cdrs_$cadddr 002421 aa 004406 000000 zero .._00503-lisp_subr_tv_,subr  use Names  004410 aa 006 146 157 165 .._00503: acc "fourth" 004411 aa 162 164 150 000 use tv 459 rest1: type_0_subr subr,rest1,1,,lisp_car_cdrs_$cdr use tv  002422 aa 000001 777777 vfd 9/,9/1,18/-1  002423 4a 4 00252 7101 20 tra lisp_car_cdrs_$cdr  002424 aa 000000 000000 zero  002425 aa 004410 000000 zero .._00504-lisp_subr_tv_,subr  use Names 004412 aa 005 162 145 163 .._00504: acc "rest1"  004413 aa 164 061 000 000 use tv 460 rest2: type_1_subr subr,rest2,1,,lisp_car_cdrs_$cddr  use tv 002426 aa 000001 777777 vfd 9/,9/1,18/-1  002427 0a 002625 7060 00 tsx6 type_1_subr  002430 4a 4 00250 7101 20 tra lisp_car_cdrs_$cddr  002431 aa 004412 000000 zero .._00505-lisp_subr_tv_,subr  use Names  004414 aa 005 162 145 163 .._00505: acc "rest2"  004415 aa 164 062 000 000 use tv 461 rest3: type_1_subr subr,rest3,1,,lisp_car_cdrs_$cdddr  use tv 002432 aa 000001 777777 vfd 9/,9/1,18/-1  002433 0a 002625 7060 00 tsx6 type_1_subr  002434 4a 4 00246 7101 20 tra lisp_car_cdrs_$cdddr  002435 aa 004414 000000 zero .._00506-lisp_subr_tv_,subr  use Names  004416 aa 005 162 145 163 .._00506: acc "rest3"  004417 aa 164 063 000 000 use tv 462 rest4: type_1_subr subr,rest4,1,,lisp_car_cdrs_$cddddr  use tv 002436 aa 000001 777777 vfd 9/,9/1,18/-1  002437 0a 002625 7060 00 tsx6 type_1_subr  002440 4a 4 00244 7101 20 tra lisp_car_cdrs_$cddddr 002441 aa 004416 000000 zero .._00507-lisp_subr_tv_,subr  use Names  004420 aa 005 162 145 163 .._00507: acc "rest4"  004421 aa 164 064 000 000 use tv 463 includef: pl1 subr,includef,1,,lisp_io_control_$includef  use tv 002442 aa 000001 777777 vfd 9/,9/1,18/-1  002443 0a 002632 7060 00 tsx6 pl1_fixup  002444 4a 4 01150 7101 20 tra lisp_io_control_$includef 002445 aa 004420 000000 zero .._00510-lisp_subr_tv_,subr  use Names  004422 aa 010 151 156 143 .._00510: acc "includef"  004423 aa 154 165 144 145 004424 aa 146 000 000 000 use tv 464  465 use tv 002446 466 tv_end: null  467  468 "  469 " trap code for unimplemented subrs in a given release  470 "  000120 471 dup 80 002446 0a 002566 7100 00 472 tra trap_out_unimp 473 dupend 002447 0a 002566 7100 00 tra trap_out_unimp 002450 0a 002566 7100 00 tra trap_out_unimp 002451 0a 002566 7100 00 tra trap_out_unimp 002452 0a 002566 7100 00 tra trap_out_unimp 002453 0a 002566 7100 00 tra trap_out_unimp 002454 0a 002566 7100 00 tra trap_out_unimp 002455 0a 002566 7100 00 tra trap_out_unimp 002456 0a 002566 7100 00 tra trap_out_unimp 002457 0a 002566 7100 00 tra trap_out_unimp 002460 0a 002566 7100 00 tra trap_out_unimp 002461 0a 002566 7100 00 tra trap_out_unimp 002462 0a 002566 7100 00 tra trap_out_unimp 002463 0a 002566 7100 00 tra trap_out_unimp 002464 0a 002566 7100 00 tra trap_out_unimp 002465 0a 002566 7100 00 tra trap_out_unimp 002466 0a 002566 7100 00 tra trap_out_unimp 002467 0a 002566 7100 00 tra trap_out_unimp 002470 0a 002566 7100 00 tra trap_out_unimp 002471 0a 002566 7100 00 tra trap_out_unimp 002472 0a 002566 7100 00 tra trap_out_unimp 002473 0a 002566 7100 00 tra trap_out_unimp 002474 0a 002566 7100 00 tra trap_out_unimp 002475 0a 002566 7100 00 tra trap_out_unimp 002476 0a 002566 7100 00 tra trap_out_unimp 002477 0a 002566 7100 00 tra trap_out_unimp 002500 0a 002566 7100 00 tra trap_out_unimp 002501 0a 002566 7100 00 tra trap_out_unimp 002502 0a 002566 7100 00 tra trap_out_unimp 002503 0a 002566 7100 00 tra trap_out_unimp 002504 0a 002566 7100 00 tra trap_out_unimp 002505 0a 002566 7100 00 tra trap_out_unimp 002506 0a 002566 7100 00 tra trap_out_unimp 002507 0a 002566 7100 00 tra trap_out_unimp 002510 0a 002566 7100 00 tra trap_out_unimp 002511 0a 002566 7100 00 tra trap_out_unimp 002512 0a 002566 7100 00 tra trap_out_unimp 002513 0a 002566 7100 00 tra trap_out_unimp 002514 0a 002566 7100 00 tra trap_out_unimp 002515 0a 002566 7100 00 tra trap_out_unimp 002516 0a 002566 7100 00 tra trap_out_unimp 002517 0a 002566 7100 00 tra trap_out_unimp 002520 0a 002566 7100 00 tra trap_out_unimp 002521 0a 002566 7100 00 tra trap_out_unimp 002522 0a 002566 7100 00 tra trap_out_unimp 002523 0a 002566 7100 00 tra trap_out_unimp 002524 0a 002566 7100 00 tra trap_out_unimp 002525 0a 002566 7100 00 tra trap_out_unimp 002526 0a 002566 7100 00 tra trap_out_unimp 002527 0a 002566 7100 00 tra trap_out_unimp 002530 0a 002566 7100 00 tra trap_out_unimp 002531 0a 002566 7100 00 tra trap_out_unimp 002532 0a 002566 7100 00 tra trap_out_unimp 002533 0a 002566 7100 00 tra trap_out_unimp 002534 0a 002566 7100 00 tra trap_out_unimp 002535 0a 002566 7100 00 tra trap_out_unimp 002536 0a 002566 7100 00 tra trap_out_unimp 002537 0a 002566 7100 00 tra trap_out_unimp 002540 0a 002566 7100 00 tra trap_out_unimp 002541 0a 002566 7100 00 tra trap_out_unimp 002542 0a 002566 7100 00 tra trap_out_unimp 002543 0a 002566 7100 00 tra trap_out_unimp 002544 0a 002566 7100 00 tra trap_out_unimp 002545 0a 002566 7100 00 tra trap_out_unimp 002546 0a 002566 7100 00 tra trap_out_unimp 002547 0a 002566 7100 00 tra trap_out_unimp 002550 0a 002566 7100 00 tra trap_out_unimp 002551 0a 002566 7100 00 tra trap_out_unimp 002552 0a 002566 7100 00 tra trap_out_unimp 002553 0a 002566 7100 00 tra trap_out_unimp 002554 0a 002566 7100 00 tra trap_out_unimp 002555 0a 002566 7100 00 tra trap_out_unimp 002556 0a 002566 7100 00 tra trap_out_unimp 002557 0a 002566 7100 00 tra trap_out_unimp 002560 0a 002566 7100 00 tra trap_out_unimp 002561 0a 002566 7100 00 tra trap_out_unimp 002562 0a 002566 7100 00 tra trap_out_unimp 002563 0a 002566 7100 00 tra trap_out_unimp 002564 0a 002566 7100 00 tra trap_out_unimp 002565 0a 002566 7100 00 tra trap_out_unimp 474  002566 475 trap_out_unimp: 002566 aa 000100 6270 00 476 push 64  002567 aa 7 00040 2721 20 002570 477 trap_out_unimp_1:  002570 0a 002576 3500 00 478 eppap trap_argl  002571 4a 4 01152 3521 20 479 short_call signal_$signal_ 002572 aa 7 00036 6701 20 002573 aa 6 00030 3701 20 002574 0a 002570 7100 00 480 tra trap_out_unimp_1  002575 aa 000000 0110 03 481 even  002576 aa 000004 000004 482 trap_argl:zero 4,4  002577 aa 000004 000000 483 zero 4,0  002600 0a 002612 0000 00 484 arg trap_cname 002601 aa 000000 000000 485 zero  002602 0a 002610 0000 00 486 arg trap_nullptr  002603 aa 000000 000000 487 zero  002604 0a 002605 0000 00 488 arg *+1  002605 aa 524000 000030 489 oct 524000000030  002606 0a 002607 0000 00 490 arg *+1  002607 aa 464000 000000 491 oct 464000000000  002610 492 trap_nullptr:  002610 aa 077777 000043 493 its -1,1  002611 aa 000001 000000 002612 aa 165 156 151 155 494 trap_cname:aci "unimplemented_lisp_subr_"  002613 aa 160 154 145 155 002614 aa 145 156 164 145 002615 aa 144 137 154 151 002616 aa 163 160 137 163 002617 aa 165 142 162 137 495  002620 496 segdef purcopy_code  002620 497 purcopy_code: " code to do the purcopy function, which is nugatory  002620 aa 0 77776 2371 00 498 ldaq ap|-2 just return argument  002621 aa 0 77776 3501 00 499 eppap ap|-2  002622 aa 2 00000 7101 00 500 tra bp|0  501  002677 502 segdef star_rset_trap,autoload_trap " used by transfer vector above  503  002623 aa 000000 000004 504 null_argl: oct 4,0  002624 aa 000000 000000 505  002625 506 type_1_subr: " routine to set up type 1 call entry for system subrs.  002625 aa 000004 6270 17 507 eax7 4,x7 " get room to save lp and bp  002626 aa 1 77774 6501 17 508 sprilp ab|-4,x7  002627 aa 1 77776 2521 17 509 spribp ab|-2,x7  002630 aa 1 00044 3701 20 510 epplp ab|system_lp,* " get linkage pointer, which all system subrs share.  002631 aa 000000 7100 16 511 tra 0,x6 " return to transfer instruction.  512  002632 513 pl1_fixup: " routine to switch from lisp mode to pl1 mode.  002632 aa 000006 6270 17 514 eax7 6,x7  002633 aa 1 77772 2521 17 515 spribp ab|-6,x7  002634 aa 1 77774 6501 17 516 sprilp ab|-4,x7  002635 aa 000000 3700 16 517 epplp 0,x6 002636 aa 1 77776 6501 17 518 sprilp ab|-2,x7 " save pointer to entry we are calling.  002637 aa 1 00044 3701 20 519 epplp ab|system_lp,* " get system lp.  002640 4a 4 01154 2501 20 520 spriap |[stack_ptr] 002641 4a 4 01156 7471 20 521 stx7 |[unmkd_ptr]+1 002642 aa 1 00016 5541 00 522 stc1 ab|in_pl1_code " now we are in pl1 code conventions.  523  002643 aa 000060 6270 00 524 push " make a stack frame.  002644 aa 7 00040 2721 20 002645 4a 4 01160 3521 20 525 eppbp |[unmkd_ptr],*  002646 4a 4 01162 3715 20 526 epplb |[..lisp..]  002647 aa 6 00026 6515 00 527 sprilb sp|stack_frame.entry_ptr  002650 aa 777753 3500 04 528 eppap null_argl-*,ic  002651 aa 2 77776 3521 20 529 short_call bp|-2,* " call the entry point. 002652 aa 7 00036 6701 20 002653 aa 6 00030 3701 20 002654 aa 6 00020 3521 20 530 eppbp sp|16,* " pop stack.  002655 aa 7 00024 6521 00 531 sprisp sb|stack_header.stack_end_ptr  002656 aa 2 00000 3721 00 532 eppsp bp|0 " get old stack ptr.  533  002657 4a 4 01164 3501 20 534 eppap |[stack_ptr],* "go back to lisp conventions.  002660 4a 4 01160 3511 20 535 epbpab |[unmkd_ptr],*  002661 4a 4 01156 2271 20 536 ldx7 |[unmkd_ptr]+1 002662 aa 1 00016 4501 00 537 stz ab|in_pl1_code 002663 aa 1 77774 3701 37 538 epplp ab|-4,x7*  002664 aa 1 77772 3521 37 539 eppbp ab|-6,x7*  002665 aa 777772 6270 17 540 eax7 -6,x7 002666 aa 0 77776 2371 00 541 ldaq ap|-2 002667 aa 0 77776 3501 00 542 eppap ap|-2  002670 aa 2 00000 7101 00 543 tra bp|0 " return.  544  002671 545 pl1_lsubr_fixup:  546  002671 aa 0 00002 3501 00 547 eppap ap|2 002672 aa 000000 6360 15 548 eaq 0,x5 " put x5 on stack.  002673 aa 000022 7320 00 549 qrs 18 002674 aa 040047 2350 07 550 lda fixnum_type,dl 002675 aa 0 77776 7571 00 551 staq ap|-2 002676 0a 002632 7100 00 552 tra pl1_fixup  553  554 """ special internal trap & break routines  555  002677 556 autoload_trap:  002677 aa 0 77776 3715 20 557 epplb ap|-2,* pick up argument and take cdr  002700 aa 5 00002 2371 00 558 ldaq lb|2  002701 aa 0 77776 7571 00 559 staq ap|-2 pass argument's cdr to load function  002702 aa 777125 7100 04 560 tra load+1-*,ic  561  562  002703 563 err_break: " x6 -> zero flag,atom_offset  564 " flag = -1 if (errprint nil) should be done. 565 " atom_offset = offset from lisp_static_vars_$user_intr_array of break tag  566  002703 aa 000006 6270 17 567 eax7 6,x7 save caller's bp, lp  002704 aa 1 77774 5421 17 568 sprpbp ab|-4,x7  002705 aa 1 77775 5441 17 569 sprplp ab|-3,x7  002706 aa 1 00044 3701 20 570 epplp ab|system_lp,*  571  002707 572 star_rset_break:  573 " lambda-bind readtable and obarray, and args to argument  574 " and + t itself  575  002707 aa 0 00020 3501 00 576 eppap ap|16  002710 4a 4 01166 2371 20 577 ldaq |[MINUS]  002711 aa 0 77762 7571 00 578 staq ap|-14  002712 4a 4 01170 2371 20 579 ldaq |[MINUS],* + hasn't been setq'ed yet  002713 aa 0 77760 7571 00 580 staq ap|-16  002714 4a 4 01172 7571 20 581 staq |[PLUS],*  002715 4a 4 01174 2371 20 582 ldaq |[args]  002716 aa 0 77766 7571 00 583 staq ap|-10  002717 aa 0 77766 2371 20 584 ldaq ap|-10,*  002720 aa 0 77764 7571 00 585 staq ap|-12  002721 4a 4 01176 2371 20 586 ldaq |[readtable]  002722 aa 0 77772 7571 00 587 staq ap|-6 002723 aa 0 77772 2371 20 588 ldaq ap|-6,*  002724 aa 0 77770 7571 00 589 staq ap|-8 002725 4a 4 01200 2371 20 590 ldaq |[obarray] 002726 aa 0 77776 7571 00 591 staq ap|-2 002727 aa 0 77776 2371 20 592 ldaq ap|-2,*  002730 aa 0 77774 7571 00 593 staq ap|-4 002731 aa 0 77760 6201 00 594 eax0 ap|-16 bot_block 002732 aa 1 77776 4401 17 595 sxl0 ab|-2,x7  002733 aa 0 00000 6201 00 596 eax0 ap|0 top_block  002734 aa 1 77776 7401 17 597 stx0 ab|-2,x7  002735 4a 4 01202 2351 20 598 lda |[binding_top]+1  002736 aa 1 77777 7551 17 599 sta ab|-1,x7  002737 aa 1 77776 6211 17 600 eax1 ab|-2,x7  002740 4a 4 01202 7411 20 601 stx1 |[binding_top]+1  002741 aa 0 77756 2371 00 602 ldaq ap|-18 set args to argument  002742 aa 0 77766 7571 20 603 staq ap|-10,*  604  605 " reset readtable, obarray to initial values  606  002743 aa 1 77773 4461 17 607 sxl6 ab|-5,x7  002744 aa 0 00004 3501 00 608 eppap ap|4 002745 4a 4 01176 2371 20 609 ldaq |[readtable]  002746 aa 0 77774 7571 00 610 staq ap|-4 002747 4a 4 01204 2371 20 611 ldaq |[array]  002750 aa 0 77776 7571 00 612 staq ap|-2 002751 aa 776016 2720 04 613 tspbp get+1-*,ic  002752 aa 1 00012 1171 00 614 cmpaq ab|nil  002753 aa 000002 6000 04 615 tze 2,ic  002754 aa 0 77772 7571 20 616 staq ap|-6,*  617  002755 4a 4 01200 2371 20 618 ldaq |[obarray] 002756 aa 0 00004 3501 00 619 eppap ap|4 002757 aa 0 77774 7571 00 620 staq ap|-4 002760 4a 4 01204 2371 20 621 ldaq |[array]  002761 aa 0 77776 7571 00 622 staq ap|-2 002762 aa 776005 2720 04 623 tspbp get+1-*,ic  002763 aa 1 00012 1171 00 624 cmpaq ab|nil  002764 aa 000002 6000 04 625 tze 2,ic  002765 aa 0 77776 7571 20 626 staq ap|-2,*  627  628 " if necessary, do (iog vt (errprint nil)) 629  002766 aa 1 77773 7261 17 630 lxl6 ab|-5,x7  002767 aa 000000 2340 16 631 szn 0,x6  002770 aa 000030 6050 04 632 tpl err_break_no_errprint-*,ic 633  002771 aa 0 00012 3501 00 634 eppap ap|10 binding + arg 002772 4a 4 01206 2371 20 635 ldaq |[ctrlW]  002773 aa 0 77770 7571 00 636 staq ap|-8 002774 aa 0 77770 2371 20 637 ldaq ap|-8,*  002775 aa 0 77766 7571 00 638 staq ap|-10  002776 4a 4 01210 2371 20 639 ldaq |[ctrlR]  002777 aa 0 77774 7571 00 640 staq ap|-4 003000 aa 0 77774 2371 20 641 ldaq ap|-4,*  003001 aa 0 77772 7571 00 642 staq ap|-6 003002 aa 0 77776 6201 00 643 eax0 ap|-2 003003 aa 1 77776 7401 17 644 stx0 ab|-2,x7 update top_block  003004 aa 1 00012 2371 00 645 ldaq ab|nil  003005 aa 0 77776 7571 00 646 staq ap|-2 003006 aa 0 77774 7571 20 647 staq ap|-4,*  003007 aa 0 77770 7571 20 648 staq ap|-8,*  003010 aa 775633 2720 04 649 tspbp errprint+1-*,ic  650 " unbind ^w and ^r now 003011 aa 0 77774 2371 00 651 ldaq ap|-4 003012 aa 0 77776 7571 20 652 staq ap|-2,*  003013 aa 0 77770 2371 00 653 ldaq ap|-8 003014 aa 0 77772 7571 20 654 staq ap|-6,*  003015 aa 0 77770 6201 00 655 eax0 ap|-8 003016 aa 1 77776 7401 17 656 stx0 ab|-2,x7 update top_block  003017 aa 0 77770 3501 00 657 eppap ap|-8  658  003020 659 err_break_no_errprint:  003020 aa 0 00004 3501 00 660 eppap ap|4 003021 aa 1 00014 2371 00 661 ldaq ab|true construct arg list for break 003022 aa 0 77776 7571 00 662 staq ap|-2 003023 aa 776170 2720 04 663 tspbp ncons+1-*,ic 003024 aa 1 00076 2721 20 664 tspbp ab|xcons_op,*  003025 aa 1 77773 7261 17 665 lxl6 ab|-5,x7 get back x6 003026 aa 000000 7260 16 666 lxl6 0,x6 get offset into user_intr_array 003027 4a 4 01212 2371 20 667 ldaq |[user_intr_array],x6 get break tag  003030 aa 3 00000 7571 00 668 staq bb|0  003031 aa 0 77776 2535 00 669 spribb ap|-2  003032 aa 775255 2720 04 670 tspbp break+1-*,ic 671  672 " unbind and return  673  003033 aa 0 00002 3501 00 674 eppap ap|2 003034 aa 0 77776 7571 00 675 staq ap|-2 save return value  003035 aa 0 77772 2371 00 676 ldaq ap|-6 003036 aa 0 77774 7571 20 677 staq ap|-4,*  003037 aa 0 77766 2371 00 678 ldaq ap|-10  003040 aa 0 77770 7571 20 679 staq ap|-8,*  003041 aa 0 77762 2371 00 680 ldaq ap|-14  003042 aa 0 77764 7571 20 681 staq ap|-12,*  003043 aa 0 77756 2371 00 682 ldaq ap|-18  003044 aa 0 77760 7571 20 683 staq ap|-16,*  003045 aa 1 77777 2211 17 684 ldx1 ab|-1,x7  003046 4a 4 01202 7411 20 685 stx1 |[binding_top]+1  003047 aa 0 77776 2371 00 686 ldaq ap|-2 return value  003050 aa 0 77754 3501 00 687 eppap ap|-20 16 binding + 2 arg + 2 saved result  003051 aa 1 77775 7641 17 688 lprplp ab|-3,x7  003052 aa 1 77774 7621 17 689 lprpbp ab|-4,x7  003053 aa 777772 6270 17 690 eax7 -6,x7 003054 aa 2 00000 7101 00 691 tra bp|0  692  693  003055 694 star_rset_trap: 003055 aa 000015 6260 04 695 eax6 star_rset_trap_control_word-*,ic  003056 aa 000006 6270 17 696 eax7 6,x7  003057 aa 1 77774 5421 17 697 sprpbp ab|-4,x7  003060 aa 1 77775 5441 17 698 sprplp ab|-3,x7  003061 aa 1 00044 3701 20 699 epplp ab|system_lp,*  003062 4a 4 01214 2371 20 700 ldaq |[star_rset],* 003063 aa 1 00012 1171 00 701 cmpaq ab|nil  003064 aa 777623 6010 04 702 tnz star_rset_break-*,ic  703 " (*rset nil) mode, just return nil  704 " ldaq ab|nil  003065 aa 0 77776 3501 00 705 eppap ap|-2  003066 aa 1 77775 7641 17 706 lprplp ab|-3,x7  003067 aa 1 77774 7621 17 707 lprpbp ab|-4,x7  003070 aa 777772 6270 17 708 eax7 -6,x7 003071 aa 2 00000 7101 00 709 tra bp|0  710  003072 711 star_rset_trap_control_word:  003072 aa 000000 000044 712 zero 0,36  713  714 use Names  004425 715 entry ..lisp.. 004425 aa 000000 0020 07 716 ..lisp..: drl 0,dl used to set stack_frame.entry_ptr  717  718 include stack_header  1-1 " BEGIN INCLUDE FILE ... stack_header.incl.alm 3/72 Bill Silver  1-2 "  1-3 " modified 7/76 by M. Weaver for *system links and more system use of areas 1-4 " modified 3/77 by M. Weaver to add rnt_ptr  1-5 " modified 7/77 by S. Webber to add run_unit_depth and assign_linkage_ptr  1-6 " modified 6/83 by J. Ives to add trace_frames and in_trace.  1-7  1-8 " HISTORY COMMENTS: 1-9 " 1) change(86-06-24,DGHowe), approve(86-06-24,MCR7396),  1-10 " audit(86-08-05,Schroth), install(86-11-03,MR12.0-1206):  1-11 " added the heap_header_ptr definition  1-12 " 2) change(86-08-12,Kissel), approve(86-08-12,MCR7473),  1-13 " audit(86-10-10,Fawcett), install(86-11-03,MR12.0-1206):  1-14 " Modified to support control point management. These changes were 1-15 " actually made in February 1985 by G. Palter.  1-16 " 3) change(86-10-22,Fawcett), approve(86-10-22,MCR7473),  1-17 " audit(86-10-22,Farley), install(86-11-03,MR12.0-1206):  1-18 " Remove the old_lot pointer and replace it with cpm_data_ptr. Use the 18  1-19 " bit pad after cur_lot_size for the cpm_enabled. This was done to save 1-20 " some space int the stack header and change the cpd_ptr unal to  1-21 " cpm_data_ptr (ITS pair).  1-22 " END HISTORY COMMENTS 1-23  000004 1-24 equ stack_header.cpm_data_ptr,4 ptr to control point for this stack  000006 1-25 equ stack_header.combined_stat_ptr,6 ptr to separate static area  1-26  000010 1-27 equ stack_header.clr_ptr,8 ptr to area containing linkage sections  000012 1-28 equ stack_header.max_lot_size,10 number of words allowed in lot (DU)  000012 1-29 equ stack_header.main_proc_invoked,10 nonzero if main proc was invoked in run unit (DL)  000012 1-30 equ stack_header.run_unit_depth,10 number of active run units stacked (DL) 000013 1-31 equ stack_header.cur_lot_size,11 DU number of words (entries) in lot  000013 1-32 equ stack_header.cpm_enabled,11 DL non-zero if control point management is enabled  000014 1-33 equ stack_header.system_free_ptr,12 ptr to system storage area 000016 1-34 equ stack_header.user_free_ptr,14 ptr to user storage area  1-35  000020 1-36 equ stack_header.parent_ptr,16 ptr to parent stack or null  000022 1-37 equ stack_header.stack_begin_ptr,18 ptr to first stack frame  000024 1-38 equ stack_header.stack_end_ptr,20 ptr to next useable stack frame 000026 1-39 equ stack_header.lot_ptr,22 ptr to the lot for the current ring  1-40  000030 1-41 equ stack_header.signal_ptr,24 ptr to signal proc for current ring  000032 1-42 equ stack_header.bar_mode_sp,26 value of sp before entering bar mode  000034 1-43 equ stack_header.pl1_operators_ptr,28 ptr: pl1_operators_$operator_table  000036 1-44 equ stack_header.call_op_ptr,30 ptr to standard call operator 1-45  000040 1-46 equ stack_header.push_op_ptr,32 ptr to standard push operator 000042 1-47 equ stack_header.return_op_ptr,34 ptr to standard return operator 000044 1-48 equ stack_header.ret_no_pop_op_ptr,36 ptr: stand. return/ no pop operator  000046 1-49 equ stack_header.entry_op_ptr,38 ptr to standard entry operator  1-50  000050 1-51 equ stack_header.trans_op_tv_ptr,40 ptr to table of translator operator ptrs  000052 1-52 equ stack_header.isot_ptr,42 pointer to ISOT  000054 1-53 equ stack_header.sct_ptr,44 pointer to System Condition Table 000056 1-54 equ stack_header.unwinder_ptr,46 pointer to unwinder for current ring 1-55  000060 1-56 equ stack_header.sys_link_info_ptr,48 ptr to *system link name table  000062 1-57 equ stack_header.rnt_ptr,50 ptr to reference name table  000064 1-58 equ stack_header.ect_ptr,52 ptr to event channel table  000066 1-59 equ stack_header.assign_linkage_ptr,54 ptr to area for hcs_$assign_linkage calls  000070 1-60 equ stack_header.heap_header_ptr,56 ptr to heap header.  000072 1-61 equ stack_header.trace_frames,58 stack of trace_catch_ frames 000073 1-62 equ stach_header.trace_top_ptr,59 trace pointer  000074 1-63 equ stack_header.in_trace,60 trace antirecurse bit  000100 1-64 equ stack_header_end,64 length of stack header  1-65  1-66  1-67  1-68  000000 1-69 equ trace_frames.count,0 number of trace frames on stack  000001 1-70 equ trace_frames.top_ptr,1 packed pointer to top one  1-71  1-72 " The following constant is an offset within the pl1 operators table.  1-73 " It references a transfer vector table.  1-74  000551 1-75 bool tv_offset,551 1-76  1-77  1-78 " The following constants are offsets within this transfer vector table.  1-79  001170 1-80 equ call_offset,tv_offset+271  001171 1-81 equ push_offset,tv_offset+272  001172 1-82 equ return_offset,tv_offset+273  001173 1-83 equ return_no_pop_offset,tv_offset+274 001174 1-84 equ entry_offset,tv_offset+275 1-85  1-86  1-87 " END INCLUDE FILE stack_header.incl.alm  719 include stack_frame  2-1 "  2-2 " BEGIN INCLUDE FILE ... stack_frame.incl.alm 6/72 RBS  2-3 "  2-4 " Modified: 16 Dec 1977, D. Levin - to add fio_ps_ptr  2-5 " Modified: 3 Feb 1978, P. Krupp - to add run_unit_manager_bit & main_proc_bit 2-6 " Modified: 21 March 1978, D. Levin - change fio_ps_ptr to support_ptr  2-7 "  000020 2-8 equ stack_frame.prev_sp,16 000020 2-9 equ stack_frame.condition_word,16  000022 2-10 equ stack_frame.next_sp,18 000022 2-11 equ stack_frame.signaller_word,18  000024 2-12 equ stack_frame.return_ptr,20  000026 2-13 equ stack_frame.entry_ptr,22  000030 2-14 equ stack_frame.operator_ptr,24  000030 2-15 equ stack_frame.lp_ptr,24  000032 2-16 equ stack_frame.arg_ptr,26 000034 2-17 equ stack_frame.static_ptr,28  000035 2-18 equ stack_frame.support_ptr,29 " only used by fortran I/O  000036 2-19 equ stack_frame.on_unit_rel_ptrs,30  000037 2-20 equ stack_frame.operator_ret_ptr,31  000037 2-21 equ stack_frame.translator_id,31  000040 2-22 equ stack_frame.regs,32  000060 2-23 equ stack_frame.min_length,48  000020 2-24 equ stack_frame.flag_word,16  020000 2-25 bool stack_frame.main_proc_bit,020000 (DL) 010000 2-26 bool stack_frame.run_unit_manager,010000 (DL)  004000 2-27 bool stack_frame.signal_bit,004000 (DL)  002000 2-28 bool stack_frame.crawl_out_bit,002000 (DL) 001000 2-29 bool stack_frame.signaller_bit,001000 (DL) 000400 2-30 bool stack_frame.link_trap_bit,000400 (DL) 000200 2-31 bool stack_frame.support_bit,000200 (DL)  000100 2-32 bool stack_frame.condition_bit,000100 (DL) 2-33  2-34 "  2-35 " END INCLUDE FILE ... stack_frame.incl.alm  2-36 "  720 include lisp_object_types  3-1  3-2 " BEGIN INCLUDE FILE lisp_object_types.incl.alm 3-3 "  3-4 " D.A.Moon 14 July 72  3-5  3-6 "These are bit masks used to check or set the type bits in lisp pointers  3-7 "they should be used with cana instructions in the dl mode. 3-8 "  3-9 " Modified 1 Oct 1972 by Dan Bricklin to add bignum types.  3-10  3-11  3-12  077700 3-13 bool lisp_ptr.type,077700 "the whole type field  3-14  040000 3-15 bool Fixed,040000 "fixed number, stored in second word of ptr 020000 3-16 bool Float,020000 "floating number, stored in second word of ptr  061400 3-17 bool Numeric,061400 "fixed or float, big or little  010000 3-18 bool Atsym,010000 "Atomic symbol pointed at by ptr  077700 3-19 bool Atomic,077700 "any of these bits indicates an atom (non-list)  001000 3-20 bool Bignum,001000 "points to a bignum - fixed  060000 3-21 bool Uncollectable,060000 "not a pointer, also both bits on = "pdl_ptr"  004000 3-22 bool String,004000 "points at a lisp character string 002000 3-23 bool Subr,002000 "points at subr link 000400 3-24 bool System_Subr,000400 "marks a subr as being in the text of lisp bound seg. 000200 3-25 bool Array,000200 "points at an array,  3-26 " which is a special kind of subr  067500 3-27 bool Unevalable,067500 "any of these bits means  3-28 " does not have car and cdr  001000 3-29 bool Big_fixed,001000 "points to fixed bignum 000100 3-30 bool File,000100 "points to a file object (i.e. an iochan)  3-31  3-32 "fields for making numbers, a fault tag is included in case someone takes the car or cdr of it  3-33  040047 3-34 bool fixnum_type,040047  020047 3-35 bool flonum_type,020047  3-36  3-37 " END INCLUDE FILE: lisp_object_types.incl.alm  721 include lisp_stack_seg 4-1 " BEGIN INCLUDE FILE lisp_stack_seg.incl.alm  4-2  4-3 " lisp stack segment header format  4-4 " Last modified by Reed 6/21/72 4-5 "  000000 4-6 equ marked_stack_bottom,0 offset of ptr to bottom of marked stack  000002 4-7 equ unmkd_stack_bottom,2 offset of ptr to bottom of unmkd_stack  000004 4-8 equ stack_ptr_ptr,4 offset of ptr to lisp_static_vars_$stack_ptr  000006 4-9 equ unmkd_ptr_ptr,6 offset of ptr to lisp_static_vars_$unmkd_ptr's offset word  000010 4-10 equ array_pointer,8 points at cell of array most recently referenced  000012 4-11 equ nil,10 offset of cell containing pointer to nil...  000014 4-12 equ true,12 offset of cell containing pointer to t...  000016 4-13 equ in_pl1_code,14 offset of flag saying whether stack_ptr  4-14 " & unmkd_ptr or ap and ab|.,x7 are valid...if zero, ap,ab arevalid.  4-15 " table of pointers to operators  4-16  000020 4-17 equ bind_op,16 000022 4-18 equ unbind_op,18  000024 4-19 equ errset1_op,20  000026 4-20 equ errset2_op,22  000030 4-21 equ unerrset_op,24 000032 4-22 equ call_op,26 000034 4-23 equ catch1_op,28  000036 4-24 equ catch2_op,30  000040 4-25 equ uncatch_op,32  000042 4-26 equ gensym_data,34 " data for gensym function  4-27  000044 4-28 equ system_lp,36 pointer to common linkage section for bound segment. 000046 4-29 equ iogbind_op,38 operator to help out with compiled iog. 000050 4-30 equ unseen_go_tag_op,40  000052 4-31 equ throw1_op,42  000054 4-32 equ throw2_op,44  000056 4-33 equ signp_op,46  000060 4-34 equ type_fields,48 000062 4-35 equ return_op,50  000064 4-36 equ err_op,52  000066 4-37 equ pl1_interface,54  000070 4-38 equ pl1_lsubr_interface,56 000072 4-39 equ cons_op,58 operator for compiled cons 000074 4-40 equ ncons_op,60 opeator for compiled cons with nil  000076 4-41 equ xcons_op,62 operator for compiled xcons  000100 4-42 equ begin_list_op,64 operator to begin compiled list code 000102 4-43 equ append_list_op,66 operator to get new list cell and hook on end  000104 4-44 equ terminate_list_op,68 operator to finish off list.  000106 4-45 equ compare_op,70  000110 4-46 equ link_opr,72  000112 4-47 equ array_operator,74  000114 4-48 equ dead_array_operator,76 000116 4-49 equ store_operator,78  000120 4-50 equ floating_store_operator,80 000122 4-51 equ array_info_for_store,82  000124 4-52 equ array_offset_for_store,84  000126 4-53 equ array_link_snap_opr,86 000130 4-54 equ create_string_desc_op,88 string desc for PL/I call 000132 4-55 equ create_array_desc_op,90 array desc for PL/I call  000134 4-56 equ pl1_call_op,92 PL/I call operator 000136 4-57 equ cons_string_op,94 operator to cons up a string  000140 4-58 equ create_varying_string_op,96  000142 4-59 equ unwp1_op,98 unwind-protect start  000144 4-60 equ unwp2_op,100 ditto, for compat.  000146 4-61 equ ununwp_op,102 End unwind-protect. 000150 4-62 equ irest_return_op,104 Interrupt restore return  000152 4-63 equ pl1_call_nopop_op,106 PL1 call, dont pop PL1 frame 000154 4-64 equ rcv_char_star_op,108 Receive char * result, pop pl1frame  4-65 " spare 110  000174 4-66 equ begin_unmkd_stack,124 beginning of unmkd_stack 4-67  4-68 " END INCLUDE FILE lisp_stack_seg.incl.alm  4-69  722  723 use tv hope to get literals in tv section 724 join /text/tv,Names  725 end  ENTRY SEQUENCES  004426 5a 000012 0000 00 004427 aa 7 00046 2721 20 004430 0a 004425 7100 00 NO LITERALS  NAME DEFINITIONS FOR ENTRY POINTS AND SEGDEFS 004432 5a 000003 000000 004433 5a 000100 600000 004434 aa 000000 000000 004435 55 000012 000002 004436 5a 000002 400003 004437 55 000006 000012 004440 aa 015 154 151 163 004441 aa 160 137 163 165 004442 aa 142 162 137 164 004443 aa 166 137 000 000 004444 55 000020 000003 004445 0a 004427 500000 004446 55 000015 000003 004447 aa 010 056 056 154 ..lisp..  004450 aa 151 163 160 056 004451 aa 056 000 000 000 004452 55 000027 000012 004453 0a 002677 400000 004454 55 000023 000003 004455 aa 015 141 165 164 autoload_trap  004456 aa 157 154 157 141 004457 aa 144 137 164 162 004460 aa 141 160 000 000 004461 55 000036 000020 004462 0a 003055 400000 004463 55 000032 000003 004464 aa 016 163 164 141 star_rset_trap  004465 aa 162 137 162 163 004466 aa 145 164 137 164 004467 aa 162 141 160 000 004470 55 000045 000027 004471 0a 002620 400000 004472 55 000041 000003 004473 aa 014 160 165 162 purcopy_code  004474 aa 143 157 160 171 004475 aa 137 143 157 144 004476 aa 145 000 000 000 004477 55 000054 000036 004500 0a 000000 400000 004501 55 000050 000003 004502 aa 016 164 166 137 tv_entry_count  004503 aa 145 156 164 162 004504 aa 171 137 143 157 004505 aa 165 156 164 000 004506 55 000063 000045 004507 0a 000002 400000 004510 55 000057 000003 004511 aa 015 154 151 163 lisp_subr_tv_  004512 aa 160 137 163 165 004513 aa 142 162 137 164 004514 aa 166 137 000 000 004515 55 000071 000054 004516 0a 000002 400000 004517 55 000066 000003 004520 aa 010 164 166 137 tv_begin  004521 aa 142 145 147 151 004522 aa 156 000 000 000 004523 55 000002 000063 004524 6a 000000 400002 004525 55 000074 000003 004526 aa 014 163 171 155 symbol_table  004527 aa 142 157 154 137 004530 aa 164 141 142 154 004531 aa 145 000 000 000 DEFINITIONS HASH TABLE  004532 aa 000000 000015 004533 aa 000000 000000 004534 aa 000000 000000 004535 aa 000000 000000 004536 aa 000000 000000 004537 aa 000000 000000 004540 5a 000012 000000 004541 5a 000020 000000 004542 5a 000036 000000 004543 5a 000045 000000 004544 5a 000063 000000 004545 5a 000071 000000 004546 5a 000027 000000 004547 5a 000054 000000 EXTERNAL NAMES  004550 aa 011 163 164 141 star_rset  004551 aa 162 137 162 163 004552 aa 145 164 000 000 004553 aa 017 165 163 145 user_intr_array 004554 aa 162 137 151 156 004555 aa 164 162 137 141 004556 aa 162 162 141 171 004557 aa 005 143 164 162 ctrlR  004560 aa 154 122 000 000 004561 aa 005 143 164 162 ctrlW  004562 aa 154 127 000 000 004563 aa 013 142 151 156 binding_top 004564 aa 144 151 156 147 004565 aa 137 164 157 160 004566 aa 007 157 142 141 obarray 004567 aa 162 162 141 171 004570 aa 011 162 145 141 readtable  004571 aa 144 164 141 142 004572 aa 154 145 000 000 004573 aa 004 120 114 125 PLUS  004574 aa 123 000 000 000 004575 aa 005 115 111 116 MINUS  004576 aa 125 123 000 000 004577 aa 011 165 156 155 unmkd_ptr  004600 aa 153 144 137 160 004601 aa 164 162 000 000 004602 aa 011 163 164 141 stack_ptr  004603 aa 143 153 137 160 004604 aa 164 162 000 000 004605 aa 021 154 151 163 lisp_static_vars_  004606 aa 160 137 163 164 004607 aa 141 164 151 143 004610 aa 137 166 141 162 004611 aa 163 137 000 000 004612 aa 007 163 151 147 signal_ 004613 aa 156 141 154 137 004614 aa 010 151 156 143 includef  004615 aa 154 165 144 145 004616 aa 146 000 000 000 004617 aa 006 156 164 150 nthcdr  004620 aa 143 144 162 000 004621 aa 003 156 164 150 nth 004622 aa 010 144 151 163 displace  004623 aa 160 154 141 143 004624 aa 145 000 000 000 004625 aa 005 160 162 157 prog1  004626 aa 147 061 000 000 004627 aa 020 162 145 141 read_from_string  004630 aa 144 137 146 162 004631 aa 157 155 137 163 004632 aa 164 162 151 156 004633 aa 147 000 000 000 004634 aa 011 145 166 141 eval_when  004635 aa 154 137 167 150 004636 aa 145 156 000 000 004637 aa 012 154 151 163 list_star_  004640 aa 164 137 163 164 004641 aa 141 162 137 000 004642 aa 006 141 162 162 arrayp  004643 aa 141 171 160 000 004644 aa 003 154 145 164 let 004645 aa 016 165 156 167 unwind_protect  004646 aa 151 156 144 137 004647 aa 160 162 157 164 004650 aa 145 143 164 000 004651 aa 017 143 164 162 ctrl_g_function 004652 aa 154 137 147 137 004653 aa 146 165 156 143 004654 aa 164 151 157 156 004655 aa 007 163 165 163 suspend 004656 aa 160 145 156 144 004657 aa 005 146 151 154 filep  004660 aa 145 160 000 000 004661 aa 007 163 171 155 symbolp 004662 aa 142 157 154 160 004663 aa 010 155 141 160 mapatoms  004664 aa 141 164 157 155 004665 aa 163 000 000 000 004666 aa 005 160 162 157 progv  004667 aa 147 166 000 000 004670 aa 004 151 146 151 ifix  004671 aa 170 000 000 000 004672 aa 003 146 163 143 fsc 004673 aa 010 145 166 141 evalhook  004674 aa 154 150 157 157 004675 aa 153 000 000 000 004676 aa 010 164 162 165 truename  004677 aa 145 156 141 155 004700 aa 145 000 000 000 004701 aa 003 157 165 164 out 004702 aa 002 151 156 000 in  004703 aa 004 157 160 145 open  004704 aa 156 000 000 000 004705 aa 011 163 145 164 setplist_  004706 aa 160 154 151 163 004707 aa 164 137 000 000 004710 aa 006 160 154 151 plist_  004711 aa 163 164 137 000 004712 aa 007 163 171 155 symeval 004713 aa 145 166 141 154 004714 aa 010 145 170 160 expt_flo  004715 aa 164 137 146 154 004716 aa 157 000 000 000 004717 aa 010 145 170 160 expt_fix  004720 aa 164 137 146 151 004721 aa 170 000 000 000 004722 aa 012 144 165 155 dumparrays  004723 aa 160 141 162 162 004724 aa 141 171 163 000 004725 aa 012 154 157 141 loadarrays  004726 aa 144 141 162 162 004727 aa 141 171 163 000 004730 aa 023 154 151 163 lisp_loadumparrays_ 004731 aa 160 137 154 157 004732 aa 141 144 165 155 004733 aa 160 141 162 162 004734 aa 141 171 163 137 004735 aa 006 155 165 156 munkam  004736 aa 153 141 155 000 004737 aa 006 155 141 153 maknum  004740 aa 156 165 155 000 004741 aa 011 141 162 162 arraycall  004742 aa 141 171 143 141 004743 aa 154 154 000 000 004744 aa 011 154 163 165 lsubrcall  004745 aa 142 162 143 141 004746 aa 154 154 000 000 004747 aa 010 163 165 142 subrcall  004750 aa 162 143 141 154 004751 aa 154 000 000 000 004752 aa 010 147 145 164 getcharn  004753 aa 143 150 141 162 004754 aa 156 000 000 000 004755 aa 010 156 162 145 nreconc_  004756 aa 143 157 156 143 004757 aa 137 000 000 000 004760 aa 007 151 155 160 implode 004761 aa 154 157 144 145 004762 aa 005 141 154 154 alloc  004763 aa 157 143 000 000 004764 aa 010 144 145 146 defaultf  004765 aa 141 165 154 164 004766 aa 146 000 000 000 004767 aa 017 160 145 162 percent_include 004770 aa 143 145 156 164 004771 aa 137 151 156 143 004772 aa 154 165 144 145 004773 aa 011 145 156 144 endpagefn  004774 aa 160 141 147 145 004775 aa 146 156 000 000 004776 aa 005 160 141 147 pagel  004777 aa 145 154 000 000 005000 aa 007 160 141 147 pagenum 005001 aa 145 156 165 155 005002 aa 007 154 151 156 linenum 005003 aa 145 156 165 155 005004 aa 007 143 150 141 charpos 005005 aa 162 160 157 163 005006 aa 012 154 151 163 lisp_load_  005007 aa 160 137 154 157 005010 aa 141 144 137 000 005011 aa 012 143 157 160 copysymbol  005012 aa 171 163 171 155 005013 aa 142 157 154 000 005014 aa 006 146 151 170 fixgcd  005015 aa 147 143 144 000 005016 aa 006 154 151 163 listen  005017 aa 164 145 156 000 005020 aa 007 146 165 156 funcall 005021 aa 143 141 154 154 005022 aa 007 154 151 163 listify 005023 aa 164 151 146 171 005024 aa 011 154 151 163 listarray  005025 aa 164 141 162 162 005026 aa 141 171 000 000 005027 aa 011 146 151 154 fillarray  005030 aa 154 141 162 162 005031 aa 141 171 000 000 005032 aa 007 163 157 162 sortcar 005033 aa 164 143 141 162 005034 aa 004 163 157 162 sort  005035 aa 164 000 000 000 005036 aa 007 150 141 165 haulong 005037 aa 154 157 156 147 005040 aa 007 150 141 151 haipart 005041 aa 160 141 162 164 005042 aa 013 143 154 145 clear_input 005043 aa 141 162 137 151 005044 aa 156 160 165 164 005045 aa 014 146 157 162 force_output  005046 aa 143 145 137 157 005047 aa 165 164 160 165 005050 aa 164 000 000 000 005051 aa 011 143 165 162 cursorpos  005052 aa 163 157 162 160 005053 aa 157 163 000 000 005054 aa 011 163 145 164 setsyntax  005055 aa 163 171 156 164 005056 aa 141 170 000 000 005057 aa 005 145 162 162 error  005060 aa 157 162 000 000 005061 aa 003 147 143 144 gcd 005062 aa 006 163 170 150 sxhash  005063 aa 141 163 150 000 005064 aa 007 147 145 164 getchar 005065 aa 143 150 141 162 005066 aa 012 163 141 155 samepnamep  005067 aa 145 160 156 141 005070 aa 155 145 160 000 005071 aa 012 141 154 160 alphalessp  005072 aa 150 141 154 145 005073 aa 163 163 160 000 005074 aa 005 172 145 162 zerop  005075 aa 157 160 000 000 005076 aa 006 170 143 157 xcons_  005077 aa 156 163 137 000 005100 aa 005 164 171 160 typep  005101 aa 145 160 000 000 005102 aa 007 164 171 157 tyo_alm 005103 aa 137 141 154 155 005104 aa 007 164 171 151 tyipeek 005105 aa 160 145 145 153 005106 aa 003 164 171 151 tyi 005107 aa 005 164 151 155 times  005110 aa 145 163 000 000 005111 aa 004 164 151 155 time  005112 aa 145 000 000 000 005113 aa 005 164 150 162 throw  005114 aa 157 167 000 000 005115 aa 006 164 145 162 terpri  005116 aa 160 162 151 000 005117 aa 004 163 171 163 sysp  005120 aa 160 000 000 000 005121 aa 006 123 165 142 Substr  005122 aa 163 164 162 000 005123 aa 007 123 165 142 Substr2 005124 aa 163 164 162 062 005125 aa 006 163 165 142 subst_  005126 aa 163 164 137 000 005127 aa 005 163 165 142 subrp  005130 aa 162 160 000 000 005131 aa 006 163 165 142 sublis  005132 aa 154 151 163 000 005133 aa 004 163 165 142 sub1  005134 aa 061 000 000 000 005135 aa 007 163 164 162 stringp 005136 aa 151 156 147 160 005137 aa 014 163 164 162 stringlength  005140 aa 151 156 147 154 005141 aa 145 156 147 164 005142 aa 150 000 000 000 005143 aa 005 163 164 157 store  005144 aa 162 145 000 000 005145 aa 012 154 151 163 lisp_oprs_  005146 aa 160 137 157 160 005147 aa 162 163 137 000 005150 aa 006 163 164 141 status  005151 aa 164 165 163 000 005152 aa 007 163 163 164 sstatus 005153 aa 141 164 165 163 005154 aa 004 163 161 162 sqrt  005155 aa 164 000 000 000 005156 aa 011 163 155 141 smallnump  005157 aa 154 154 156 165 005160 aa 155 160 000 000 005161 aa 005 163 154 145 sleep  005162 aa 145 160 000 000 005163 aa 003 163 151 156 sin 005164 aa 005 163 151 147 signp  005165 aa 156 160 000 000 005166 aa 017 163 150 157 shortnamestring 005167 aa 162 164 156 141 005170 aa 155 145 163 164 005171 aa 162 151 156 147 005172 aa 004 163 145 164 setq  005173 aa 161 000 000 000 005174 aa 006 163 145 164 setarg  005175 aa 141 162 147 000 005176 aa 003 163 145 164 set 005177 aa 004 163 141 166 save  005200 aa 145 000 000 000 005201 aa 005 163 141 163 sassq  005202 aa 163 161 000 000 005203 aa 006 163 141 163 sassoc  005204 aa 163 157 143 000 005205 aa 007 162 165 156 runtime 005206 aa 164 151 155 145 005207 aa 006 162 160 154 rplacd  005210 aa 141 143 144 000 005211 aa 006 162 160 154 rplaca  005212 aa 141 143 141 000 005213 aa 003 162 157 164 rot 005214 aa 007 162 145 166 reverse 005215 aa 145 162 163 145 005216 aa 006 162 145 164 return  005217 aa 165 162 156 000 005220 aa 006 162 145 156 rename  005221 aa 141 155 145 000 005222 aa 010 162 145 155 remprop_  005223 aa 160 162 157 160 005224 aa 137 000 000 000 005225 aa 005 162 145 155 remob  005226 aa 157 142 000 000 005227 aa 012 162 145 141 readstring  005230 aa 144 163 164 162 005231 aa 151 156 147 000 005232 aa 010 162 145 141 readlist  005233 aa 144 154 151 163 005234 aa 164 000 000 000 005235 aa 006 162 145 141 readch  005236 aa 144 143 150 000 005237 aa 004 162 145 141 read  005240 aa 144 000 000 000 005241 aa 006 162 141 156 random  005242 aa 144 157 155 000 005243 aa 004 161 165 151 quit  005244 aa 164 000 000 000 005245 aa 004 154 151 163 lisp  005246 aa 160 000 000 000 005247 aa 010 160 165 164 putprop_  005250 aa 160 162 157 160 005251 aa 137 000 000 000 005252 aa 005 160 162 157 progn  005253 aa 147 156 000 000 005254 aa 004 160 162 157 prog  005255 aa 147 000 000 000 005256 aa 005 160 162 157 prog2  005257 aa 147 062 000 000 005260 aa 006 160 162 151 print_  005261 aa 156 164 137 000 005262 aa 006 160 162 151 princ_  005263 aa 156 143 137 000 005264 aa 006 160 162 151 prin1_  005265 aa 156 061 137 000 005266 aa 005 160 154 165 plusp  005267 aa 163 160 000 000 005270 aa 004 160 154 165 plus  005271 aa 163 000 000 000 005272 aa 002 157 162 000 or  005273 aa 005 157 160 145 openo  005274 aa 156 157 000 000 005275 aa 005 157 160 145 openi  005276 aa 156 151 000 000 005277 aa 005 157 160 145 opena  005300 aa 156 141 000 000 005301 aa 004 157 144 144 oddp  005302 aa 160 000 000 000 005303 aa 007 156 165 155 numberp 005304 aa 142 145 162 160 005305 aa 011 156 162 145 nreverse_  005306 aa 166 145 162 163 005307 aa 145 137 000 000 005310 aa 005 156 157 165 nouuo  005311 aa 165 157 000 000 005312 aa 004 156 165 154 null  005313 aa 154 000 000 000 005314 aa 005 156 157 162 noret  005315 aa 145 164 000 000 005316 aa 013 156 157 151 nointerrupt 005317 aa 156 164 145 162 005320 aa 162 165 160 164 005321 aa 012 156 141 155 namestring  005322 aa 145 163 164 162 005323 aa 151 156 147 000 005324 aa 005 156 141 155 names  005325 aa 145 163 000 000 005326 aa 010 156 141 155 namelist  005327 aa 145 154 151 163 005330 aa 164 000 000 000 005331 aa 006 156 143 157 ncons_  005332 aa 156 163 137 000 005333 aa 005 156 143 157 nconc  005334 aa 156 143 000 000 005335 aa 006 155 145 162 mergef  005336 aa 147 145 146 000 005337 aa 006 155 151 156 minusp  005340 aa 165 163 160 000 005341 aa 005 155 151 156 minus  005342 aa 165 163 000 000 005343 aa 003 155 151 156 min 005344 aa 004 155 145 155 memq  005345 aa 161 000 000 000 005346 aa 006 155 145 155 member  005347 aa 142 145 162 000 005350 aa 003 155 141 170 max 005351 aa 007 155 141 160 maplist 005352 aa 154 151 163 164 005353 aa 006 155 141 160 mapcon  005354 aa 143 157 156 000 005355 aa 006 155 141 160 mapcar  005356 aa 143 141 162 000 005357 aa 006 155 141 160 mapcan  005360 aa 143 141 156 000 005361 aa 004 155 141 160 mapc  005362 aa 143 000 000 000 005363 aa 003 155 141 160 map 005364 aa 012 155 141 153 makunbound  005365 aa 165 156 142 157 005366 aa 165 156 144 000 005367 aa 014 155 141 153 makreadtable  005370 aa 162 145 141 144 005371 aa 164 141 142 154 005372 aa 145 000 000 000 005373 aa 011 155 141 153 makoblist  005374 aa 157 142 154 151 005375 aa 163 164 000 000 005376 aa 006 155 141 153 maknam  005377 aa 156 141 155 000 005400 aa 014 154 151 163 lisp_reader_  005401 aa 160 137 162 145 005402 aa 141 144 145 162 005403 aa 137 000 000 000 005404 aa 011 155 141 153 make_atom  005405 aa 145 137 141 164 005406 aa 157 155 000 000 005407 aa 003 154 163 150 lsh 005410 aa 003 154 157 147 log 005411 aa 005 154 151 163 list_  005412 aa 164 137 000 000 005413 aa 005 154 151 156 linel  005414 aa 145 154 000 000 005415 aa 005 154 145 163 lessp  005416 aa 163 160 000 000 005417 aa 006 154 145 156 length  005420 aa 147 164 150 000 005421 aa 004 154 141 163 last  005422 aa 164 000 000 000 005423 aa 005 151 163 161 isqrt  005424 aa 162 164 000 000 005425 aa 003 151 157 147 iog 005426 aa 003 151 157 143 ioc 005427 aa 006 151 156 164 intern  005430 aa 145 162 156 000 005431 aa 023 154 151 163 lisp_obarray_utils_ 005432 aa 160 137 157 142 005433 aa 141 162 162 141 005434 aa 171 137 165 164 005435 aa 151 154 163 137 005436 aa 006 151 156 160 inpush  005437 aa 165 163 150 000 005440 aa 005 111 156 144 Index  005441 aa 145 170 000 000 005442 aa 010 147 162 145 greaterp  005443 aa 141 164 145 162 005444 aa 160 000 000 000 005445 aa 002 147 157 000 go  005446 aa 005 147 145 164 getl_  005447 aa 154 137 000 000 005450 aa 011 147 145 164 get_pname  005451 aa 137 160 156 141 005452 aa 155 145 000 000 005453 aa 004 147 145 164 get_  005454 aa 137 000 000 000 005455 aa 022 154 151 163 lisp_property_fns_  005456 aa 160 137 160 162 005457 aa 157 160 145 162 005460 aa 164 171 137 146 005461 aa 156 163 137 000 005462 aa 007 147 145 156 gensym_ 005463 aa 163 171 155 137 005464 aa 005 147 143 164 gctwa  005465 aa 167 141 000 000 005466 aa 006 147 143 163 gcsubr  005467 aa 165 142 162 000 005470 aa 027 154 151 163 lisp_garbage_collector_ 005471 aa 160 137 147 141 005472 aa 162 142 141 147 005473 aa 145 137 143 157 005474 aa 154 154 145 143 005475 aa 164 157 162 137 005476 aa 005 161 165 157 quote  005477 aa 164 145 000 000 005500 aa 007 146 162 145 freturn 005501 aa 164 165 162 156 005502 aa 006 146 154 157 floatp  005503 aa 141 164 160 000 005504 aa 005 146 154 157 float  005505 aa 141 164 000 000 005506 aa 010 146 154 141 flatsize  005507 aa 164 163 151 172 005510 aa 145 000 000 000 005511 aa 005 146 154 141 flatc  005512 aa 164 143 000 000 005513 aa 004 146 151 170 fixp  005514 aa 160 000 000 000 005515 aa 003 146 151 170 fix 005516 aa 007 146 151 154 filepos 005517 aa 145 160 157 163 005520 aa 004 145 170 160 expt  005521 aa 164 000 000 000 005522 aa 010 145 170 160 exploden  005523 aa 154 157 144 145 005524 aa 156 000 000 000 005525 aa 010 145 170 160 explodec  005526 aa 154 157 144 145 005527 aa 143 000 000 000 005530 aa 007 145 170 160 explode 005531 aa 154 157 144 145 005532 aa 013 154 151 163 lisp_print_ 005533 aa 160 137 160 162 005534 aa 151 156 164 137 005535 aa 003 145 170 160 exp 005536 aa 010 160 144 154 pdlframe  005537 aa 146 162 141 155 005540 aa 145 000 000 000 005541 aa 005 145 166 141 eval_  005542 aa 154 137 000 000 005543 aa 006 145 162 162 errset  005544 aa 163 145 164 000 005545 aa 010 145 162 162 errprint  005546 aa 160 162 151 156 005547 aa 164 000 000 000 005550 aa 010 145 162 162 errframe  005551 aa 146 162 141 155 005552 aa 145 000 000 000 005553 aa 003 145 162 162 err 005554 aa 013 154 151 163 lisp_error_ 005555 aa 160 137 145 162 005556 aa 162 157 162 137 005557 aa 005 145 161 165 equal  005560 aa 141 154 000 000 005561 aa 002 145 161 000 eq  005562 aa 005 145 157 146 eoffn  005563 aa 146 156 000 000 005564 aa 002 144 157 000 do  005565 aa 004 144 145 154 delq  005566 aa 161 000 000 000 005567 aa 007 144 145 154 deletef 005570 aa 145 164 145 146 005571 aa 006 144 145 154 delete  005572 aa 145 164 145 000 005573 aa 005 144 145 146 defun  005574 aa 165 156 000 000 005575 aa 007 144 145 146 defsubr 005576 aa 163 165 142 162 005577 aa 007 144 145 146 defprop 005600 aa 160 162 157 160 005601 aa 014 154 151 163 lisp_define_  005602 aa 160 137 144 145 005603 aa 146 151 156 145 005604 aa 137 000 000 000 005605 aa 007 144 145 143 declare 005606 aa 154 141 162 145 005607 aa 003 143 157 163 cos 005610 aa 005 143 157 156 cons_  005611 aa 163 137 000 000 005612 aa 004 143 157 156 cond  005613 aa 144 000 000 000 005614 aa 007 143 157 155 comment 005615 aa 155 145 156 164 005616 aa 005 143 154 157 close  005617 aa 163 145 000 000 005620 aa 020 154 151 163 lisp_io_control_  005621 aa 160 137 151 157 005622 aa 137 143 157 156 005623 aa 164 162 157 154 005624 aa 137 000 000 000 005625 aa 005 143 154 151 cline  005626 aa 156 145 000 000 005627 aa 024 154 151 163 lisp_command_caller_  005630 aa 160 137 143 157 005631 aa 155 155 141 156 005632 aa 144 137 143 141 005633 aa 154 154 145 162 005634 aa 137 000 000 000 005635 aa 005 143 150 162 chrct  005636 aa 143 164 000 000 005637 aa 003 143 144 162 cdr 005640 aa 004 143 144 144 cddr  005641 aa 162 000 000 000 005642 aa 005 143 144 144 cdddr  005643 aa 144 162 000 000 005644 aa 006 143 144 144 cddddr  005645 aa 144 144 162 000 005646 aa 006 143 144 144 cdddar  005647 aa 144 141 162 000 005650 aa 005 143 144 144 cddar  005651 aa 141 162 000 000 005652 aa 006 143 144 144 cddadr  005653 aa 141 144 162 000 005654 aa 006 143 144 144 cddaar  005655 aa 141 141 162 000 005656 aa 004 143 144 141 cdar  005657 aa 162 000 000 000 005660 aa 005 143 144 141 cdadr  005661 aa 144 162 000 000 005662 aa 006 143 144 141 cdaddr  005663 aa 144 144 162 000 005664 aa 006 143 144 141 cdadar  005665 aa 144 141 162 000 005666 aa 005 143 144 141 cdaar  005667 aa 141 162 000 000 005670 aa 006 143 144 141 cdaadr  005671 aa 141 144 162 000 005672 aa 006 143 144 141 cdaaar  005673 aa 141 141 162 000 005674 aa 010 143 141 164 catenate  005675 aa 145 156 141 164 005676 aa 145 000 000 000 005677 aa 005 143 141 164 catch  005700 aa 143 150 000 000 005701 aa 003 143 141 162 car 005702 aa 004 143 141 144 cadr  005703 aa 162 000 000 000 005704 aa 005 143 141 144 caddr  005705 aa 144 162 000 000 005706 aa 006 143 141 144 cadddr  005707 aa 144 144 162 000 005710 aa 006 143 141 144 caddar  005711 aa 144 141 162 000 005712 aa 005 143 141 144 cadar  005713 aa 141 162 000 000 005714 aa 006 143 141 144 cadadr  005715 aa 141 144 162 000 005716 aa 006 143 141 144 cadaar  005717 aa 141 141 162 000 005720 aa 004 143 141 141 caar  005721 aa 162 000 000 000 005722 aa 005 143 141 141 caadr  005723 aa 144 162 000 000 005724 aa 006 143 141 141 caaddr  005725 aa 144 144 162 000 005726 aa 006 143 141 141 caadar  005727 aa 144 141 162 000 005730 aa 005 143 141 141 caaar  005731 aa 141 162 000 000 005732 aa 006 143 141 141 caaadr  005733 aa 141 144 162 000 005734 aa 006 143 141 141 caaaar  005735 aa 141 141 162 000 005736 aa 016 154 151 163 lisp_car_cdrs_  005737 aa 160 137 143 141 005740 aa 162 137 143 144 005741 aa 162 163 137 000 005742 aa 005 142 162 145 break  005743 aa 141 153 000 000 005744 aa 016 154 151 163 lisp_prog_fns_  005745 aa 160 137 160 162 005746 aa 157 147 137 146 005747 aa 156 163 137 000 005750 aa 006 142 157 165 boundp  005751 aa 156 144 160 000 005752 aa 005 142 157 157 boole  005753 aa 154 145 000 000 005754 aa 010 142 154 164 bltarray  005755 aa 141 162 162 141 005756 aa 171 000 000 000 005757 aa 004 142 151 147 bigp  005760 aa 160 000 000 000 005761 aa 010 142 141 153 baktrace  005762 aa 164 162 141 143 005763 aa 145 000 000 000 005764 aa 011 142 141 153 baktrace2  005765 aa 164 162 141 143 005766 aa 145 062 000 000 005767 aa 011 142 141 153 baktrace1  005770 aa 164 162 141 143 005771 aa 145 061 000 000 005772 aa 016 154 151 163 lisp_baktrace_  005773 aa 160 137 142 141 005774 aa 153 164 162 141 005775 aa 143 145 137 000 005776 aa 004 141 164 157 atom  005777 aa 155 000 000 000 006000 aa 004 141 164 141 atan  006001 aa 156 000 000 000 006002 aa 012 154 151 163 lisp_trig_  006003 aa 160 137 164 162 006004 aa 151 147 137 000 006005 aa 004 141 163 163 assq  006006 aa 161 000 000 000 006007 aa 005 141 163 163 assoc  006010 aa 157 143 000 000 006011 aa 011 141 163 143 ascii_alm  006012 aa 151 151 137 141 006013 aa 154 155 000 000 006014 aa 020 154 151 163 lisp_reader_alm_  006015 aa 160 137 162 145 006016 aa 141 144 145 162 006017 aa 137 141 154 155 006020 aa 137 000 000 000 006021 aa 011 141 162 162 arraydims  006022 aa 141 171 144 151 006023 aa 155 163 000 000 006024 aa 005 141 162 162 array  006025 aa 141 171 000 000 006026 aa 004 141 162 147 args  006027 aa 163 000 000 000 006030 aa 015 154 151 163 lisp_defsubr_  006031 aa 160 137 144 145 006032 aa 146 163 165 142 006033 aa 162 137 000 000 006034 aa 003 141 162 147 arg 006035 aa 006 141 160 160 apply_  006036 aa 154 171 137 000 006037 aa 006 141 160 160 append  006040 aa 145 156 144 000 006041 aa 013 154 151 163 lisp_alloc_ 006042 aa 160 137 141 154 006043 aa 154 157 143 137 006044 aa 003 141 156 144 and 006045 aa 020 154 151 163 lisp_quick_fcns_  006046 aa 160 137 161 165 006047 aa 151 143 153 137 006050 aa 146 143 156 163 006051 aa 137 000 000 000 006052 aa 010 141 154 154 allfiles  006053 aa 146 151 154 145 006054 aa 163 000 000 000 006055 aa 014 154 151 163 lisp_io_fns_  006056 aa 160 137 151 157 006057 aa 137 146 156 163 006060 aa 137 000 000 000 006061 aa 012 141 154 141 alarmclock  006062 aa 162 155 143 154 006063 aa 157 143 153 000 006064 aa 023 154 151 163 lisp_fault_handler_ 006065 aa 160 137 146 141 006066 aa 165 154 164 137 006067 aa 150 141 156 144 006070 aa 154 145 162 137 006071 aa 004 141 144 144 add1  006072 aa 061 000 000 000 006073 aa 003 141 142 163 abs 006074 aa 011 162 145 155 remainder  006075 aa 141 151 156 144 006076 aa 145 162 000 000 006077 aa 004 111 164 157 ItoC  006100 aa 103 000 000 000 006101 aa 004 103 164 157 CtoI  006102 aa 111 000 000 000 006103 aa 016 154 151 163 lisp_char_fns_  006104 aa 160 137 143 150 006105 aa 141 162 137 146 006106 aa 156 163 137 000 006107 aa 003 147 164 137 gt_ 006110 aa 004 145 161 154 eql_  006111 aa 137 000 000 000 006112 aa 003 154 163 137 ls_ 006113 aa 010 163 165 142 sub1_fix  006114 aa 061 137 146 151 006115 aa 170 000 000 000 006116 aa 010 163 165 142 sub1_flo  006117 aa 061 137 146 154 006120 aa 157 000 000 000 006121 aa 010 141 144 144 add1_fix  006122 aa 061 137 146 151 006123 aa 170 000 000 000 006124 aa 010 141 144 144 add1_flo  006125 aa 061 137 146 154 006126 aa 157 000 000 000 006127 aa 010 161 165 157 quot_fix  006130 aa 164 137 146 151 006131 aa 170 000 000 000 006132 aa 010 161 165 157 quot_flo  006133 aa 164 137 146 154 006134 aa 157 000 000 000 006135 aa 010 144 151 146 diff_fix  006136 aa 146 137 146 151 006137 aa 170 000 000 000 006140 aa 010 144 151 146 diff_flo  006141 aa 146 137 146 154 006142 aa 157 000 000 000 006143 aa 010 160 154 165 plus_fix  006144 aa 163 137 146 151 006145 aa 170 000 000 000 006146 aa 010 160 154 165 plus_flo  006147 aa 163 137 146 154 006150 aa 157 000 000 000 006151 aa 007 163 164 141 status_ 006152 aa 164 165 163 137 006153 aa 010 163 163 164 sstatus_  006154 aa 141 164 165 163 006155 aa 137 000 000 000 006156 aa 004 162 163 145 rset  006157 aa 164 000 000 000 006160 aa 020 154 151 163 lisp_status_fns_  006161 aa 160 137 163 164 006162 aa 141 164 165 163 006163 aa 137 146 156 163 006164 aa 137 000 000 000 006165 aa 014 163 164 141 star_rearray  006166 aa 162 137 162 145 006167 aa 141 162 162 141 006170 aa 171 000 000 000 006171 aa 010 161 165 157 quotient  006172 aa 164 151 145 156 006173 aa 164 000 000 000 006174 aa 012 163 164 146 stfunction  006175 aa 165 156 143 164 006176 aa 151 157 156 000 006177 aa 005 154 151 163 lisp_  006200 aa 160 137 000 000 006201 aa 012 144 151 146 difference  006202 aa 146 145 162 145 006203 aa 156 143 145 000 006204 aa 015 154 151 163 lisp_bignums_  006205 aa 160 137 142 151 006206 aa 147 156 165 155 006207 aa 163 137 000 000 006210 aa 012 163 164 141 star_array  006211 aa 162 137 141 162 006212 aa 162 141 171 000 006213 aa 020 154 151 163 lisp_array_fcns_  006214 aa 160 137 141 162 006215 aa 162 141 171 137 006216 aa 146 143 156 163 006217 aa 137 000 000 000 006220 aa 011 164 151 155 times_fix  006221 aa 145 163 137 146 006222 aa 151 170 000 000 006223 aa 011 164 151 155 times_flo  006224 aa 145 163 137 146 006225 aa 154 157 000 000 006226 aa 013 154 151 163 lisp_utils_ 006227 aa 160 137 165 164 006230 aa 151 154 163 137 NO TRAP POINTER WORDS  TYPE PAIR BLOCKS  006231 aa 000004 000000 006232 55 000153 000116 006233 aa 000004 000000 006234 55 000153 000121 006235 aa 000004 000000 006236 55 000153 000125 006237 aa 000004 000000 006240 55 000153 000127 006241 aa 000004 000000 006242 55 000153 001372 006243 aa 000004 000000 006244 55 000153 000131 006245 aa 000004 000000 006246 55 000153 000134 006247 aa 000004 000000 006250 55 000153 000136 006251 aa 000004 000000 006252 55 000153 001374 006253 aa 000004 000000 006254 55 000153 000141 006255 aa 000004 000000 006256 55 000153 000143 006257 aa 000004 000000 006260 55 000057 000015 006261 aa 000004 000000 006262 55 000153 000145 006263 aa 000004 000000 006264 55 000153 000150 006265 aa 000004 000000 006266 55 000160 000160 006267 aa 000004 000000 006270 55 001166 000162 006271 aa 000004 000000 006272 55 001304 000165 006273 aa 000004 000000 006274 55 001304 000167 006275 aa 000004 000000 006276 55 001413 000170 006277 aa 000004 000000 006300 55 001413 000173 006301 aa 000004 000000 006302 55 000746 000175 006303 aa 000004 000000 006304 55 001312 000202 006305 aa 000004 000000 006306 55 001407 000205 006307 aa 000004 000000 006310 55 001413 000210 006311 aa 000004 000000 006312 55 001545 000212 006313 aa 000004 000000 006314 55 001312 000213 006315 aa 000004 000000 006316 55 001432 000217 006317 aa 000004 000000 006320 55 001175 000223 006321 aa 000004 000000 006322 55 001413 000225 006323 aa 000004 000000 006324 55 001413 000227 006325 aa 000004 000000 006326 55 001561 000231 006327 aa 000004 000000 006330 55 001312 000234 006331 aa 000004 000000 006332 55 001574 000236 006333 aa 000004 000000 006334 55 001574 000240 006335 aa 000004 000000 006336 55 001545 000241 006337 aa 000004 000000 006340 55 001423 000244 006341 aa 000004 000000 006342 55 001166 000247 006343 aa 000004 000000 006344 55 001166 000250 006345 aa 000004 000000 006346 55 001166 000251 006347 aa 000004 000000 006350 55 001023 000253 006351 aa 000004 000000 006352 55 001023 000256 006353 aa 000004 000000 006354 55 001545 000260 006355 aa 000004 000000 006356 55 001574 000262 006357 aa 000004 000000 006360 55 001574 000265 006361 aa 000004 000000 006362 55 000276 000270 006363 aa 000004 000000 006364 55 000276 000273 006365 aa 000004 000000 006366 55 001407 000303 006367 aa 000004 000000 006370 55 001407 000305 006371 aa 000004 000000 006372 55 001545 000307 006373 aa 000004 000000 006374 55 001545 000312 006375 aa 000004 000000 006376 55 001545 000315 006377 aa 000004 000000 006400 55 001413 000320 006401 aa 000004 000000 006402 55 000057 000023 006403 aa 000004 000000 006404 55 000057 000032 006405 aa 000004 000000 006406 55 001407 000323 006407 aa 000004 000000 006410 55 000057 000041 006411 aa 000004 000000 006412 55 000746 000326 006413 aa 000004 000000 006414 55 001526 000330 006415 aa 000004 000000 006416 55 001423 000332 006417 aa 000004 000000 006420 55 001166 000335 006421 aa 000004 000000 006422 55 001423 000341 006423 aa 000004 000000 006424 55 001362 000344 006425 aa 000004 000000 006426 55 001362 000346 006427 aa 000004 000000 006430 55 001362 000350 006431 aa 000004 000000 006432 55 001362 000352 006433 aa 000004 000000 006434 55 000354 000354 006435 aa 000004 000000 006436 55 001407 000357 006437 aa 000004 000000 006440 55 001574 000362 006441 aa 000004 000000 006442 55 001362 000364 006443 aa 000004 000000 006444 55 001545 000366 006445 aa 000004 000000 006446 55 001545 000370 006447 aa 000004 000000 006450 55 001561 000372 006451 aa 000004 000000 006452 55 001561 000375 006453 aa 000004 000000 006454 55 001561 000400 006455 aa 000004 000000 006456 55 001561 000402 006457 aa 000004 000000 006460 55 001552 000404 006461 aa 000004 000000 006462 55 001552 000406 006463 aa 000004 000000 006464 55 001166 000410 006465 aa 000004 000000 006466 55 001166 000413 006467 aa 000004 000000 006470 55 001423 000417 006471 aa 000004 000000 006472 55 001526 000422 006473 aa 000004 000000 006474 55 001122 000425 006475 aa 000004 000000 006476 55 001552 000427 006477 aa 000004 000000 006500 55 001574 000430 006501 aa 000004 000000 006502 55 001413 000432 006503 aa 000004 000000 006504 55 001413 000434 006505 aa 000004 000000 006506 55 001413 000437 006507 aa 000004 000000 006510 55 001413 000442 006511 aa 000004 000000 006512 55 001407 000444 006513 aa 000004 000000 006514 55 001574 000446 006515 aa 000004 000000 006516 55 001362 000450 006517 aa 000004 000000 006520 55 001362 000452 006521 aa 000004 000000 006522 55 001362 000454 006523 aa 000004 000000 006524 55 001552 000455 006525 aa 000004 000000 006526 55 001526 000457 006527 aa 000004 000000 006530 55 001312 000461 006531 aa 000004 000000 006532 55 001100 000463 006533 aa 000004 000000 006534 55 001376 000465 006535 aa 000004 000000 006536 55 001451 000467 006537 aa 000004 000000 006540 55 001451 000471 006541 aa 000004 000000 006542 55 001407 000473 006543 aa 000004 000000 006544 55 001413 000475 006545 aa 000004 000000 006546 55 001407 000477 006547 aa 000004 000000 006550 55 001552 000501 006551 aa 000004 000000 006552 55 001413 000503 006553 aa 000004 000000 006554 55 001451 000505 006555 aa 000004 000000 006556 55 000513 000511 006557 aa 000004 000000 006560 55 001526 000516 006561 aa 000004 000000 006562 55 001526 000520 006563 aa 000004 000000 006564 55 001350 000522 006565 aa 000004 000000 006566 55 001413 000524 006567 aa 000004 000000 006570 55 001350 000527 006571 aa 000004 000000 006572 55 001350 000531 006573 aa 000004 000000 006574 55 001574 000532 006575 aa 000004 000000 006576 55 001423 000534 006577 aa 000004 000000 006600 55 001413 000540 006601 aa 000004 000000 006602 55 001545 000542 006603 aa 000004 000000 006604 55 001413 000544 006605 aa 000004 000000 006606 55 000613 000545 006607 aa 000004 000000 006610 55 001413 000547 006611 aa 000004 000000 006612 55 001413 000551 006613 aa 000004 000000 006614 55 001413 000553 006615 aa 000004 000000 006616 55 001413 000555 006617 aa 000004 000000 006620 55 001413 000557 006621 aa 000004 000000 006622 55 001574 000561 006623 aa 000004 000000 006624 55 001407 000562 006625 aa 000004 000000 006626 55 001545 000564 006627 aa 000004 000000 006630 55 001166 000566 006631 aa 000004 000000 006632 55 001023 000570 006633 aa 000004 000000 006634 55 000777 000573 006635 aa 000004 000000 006636 55 000746 000575 006637 aa 000004 000000 006640 55 000746 000600 006641 aa 000004 000000 006642 55 001362 000603 006643 aa 000004 000000 006644 55 000746 000605 006645 aa 000004 000000 006646 55 001413 000607 006647 aa 000004 000000 006650 55 000613 000611 006651 aa 000004 000000 006652 55 001023 000615 006653 aa 000004 000000 006654 55 001413 000620 006655 aa 000004 000000 006656 55 001312 000622 006657 aa 000004 000000 006660 55 001413 000624 006661 aa 000004 000000 006662 55 001100 000626 006663 aa 000004 000000 006664 55 001100 000630 006665 aa 000004 000000 006666 55 001100 000632 006667 aa 000004 000000 006670 55 001552 000634 006671 aa 000004 000000 006672 55 001552 000636 006673 aa 000004 000000 006674 55 001413 000640 006675 aa 000004 000000 006676 55 001166 000641 006677 aa 000004 000000 006700 55 001166 000643 006701 aa 000004 000000 006702 55 001166 000645 006703 aa 000004 000000 006704 55 001413 000647 006705 aa 000004 000000 006706 55 001413 000651 006707 aa 000004 000000 006710 55 001407 000653 006711 aa 000004 000000 006712 55 001545 000656 006713 aa 000004 000000 006714 55 001413 000660 006715 aa 000004 000000 006716 55 001526 000662 006717 aa 000004 000000 006720 55 001432 000664 006721 aa 000004 000000 006722 55 001423 000667 006723 aa 000004 000000 006724 55 001423 000672 006725 aa 000004 000000 006726 55 001423 000674 006727 aa 000004 000000 006730 55 001407 000677 006731 aa 000004 000000 006732 55 001407 000701 006733 aa 000004 000000 006734 55 001166 000703 006735 aa 000004 000000 006736 55 001552 000705 006737 aa 000004 000000 006740 55 001552 000707 006741 aa 000004 000000 006742 55 001552 000711 006743 aa 000004 000000 006744 55 001413 000712 006745 aa 000004 000000 006746 55 001413 000714 006747 aa 000004 000000 006750 55 001552 000716 006751 aa 000004 000000 006752 55 001545 000717 006753 aa 000004 000000 006754 55 001545 000721 006755 aa 000004 000000 006756 55 001545 000723 006757 aa 000004 000000 006760 55 001545 000725 006761 aa 000004 000000 006762 55 001545 000727 006763 aa 000004 000000 006764 55 001545 000731 006765 aa 000004 000000 006766 55 001407 000732 006767 aa 000004 000000 006770 55 000746 000735 006771 aa 000004 000000 006772 55 000777 000741 006773 aa 000004 000000 006774 55 000746 000744 006775 aa 000004 000000 006776 55 001451 000752 006777 aa 000004 000000 007000 55 001574 000755 007001 aa 000004 000000 007002 55 001350 000756 007003 aa 000004 000000 007004 55 001407 000757 007005 aa 000004 000000 007006 55 001362 000761 007007 aa 000004 000000 007010 55 001552 000763 007011 aa 000004 000000 007012 55 001413 000765 007013 aa 000004 000000 007014 55 001413 000767 007015 aa 000004 000000 007016 55 001350 000771 007017 aa 000004 000000 007020 55 001432 000773 007021 aa 000004 000000 007022 55 001432 000774 007023 aa 000004 000000 007024 55 000777 000775 007025 aa 000004 000000 007026 55 001423 001004 007027 aa 000004 000000 007030 55 001451 001006 007031 aa 000004 000000 007032 55 001552 001010 007033 aa 000004 000000 007034 55 001545 001013 007035 aa 000004 000000 007036 55 001023 001014 007037 aa 000004 000000 007040 55 001451 001016 007041 aa 000004 000000 007042 55 001023 001021 007043 aa 000004 000000 007044 55 001407 001030 007045 aa 000004 000000 007046 55 001526 001032 007047 aa 000004 000000 007050 55 001036 001034 007051 aa 000004 000000 007052 55 001304 001044 007053 aa 000004 000000 007054 55 001122 001046 007055 aa 000004 000000 007056 55 001413 001050 007057 aa 000004 000000 007060 55 001552 001052 007061 aa 000004 000000 007062 55 001100 001054 007063 aa 000004 000000 007064 55 001100 001057 007065 aa 000004 000000 007066 55 001413 001061 007067 aa 000004 000000 007070 55 001552 001063 007071 aa 000004 000000 007072 55 001423 001064 007073 aa 000004 000000 007074 55 001552 001066 007075 aa 000004 000000 007076 55 001100 001070 007077 aa 000004 000000 007100 55 001100 001073 007101 aa 000004 000000 007102 55 001100 001076 007103 aa 000004 000000 007104 55 001350 001103 007105 aa 000004 000000 007106 55 001122 001104 007107 aa 000004 000000 007110 55 001545 001107 007111 aa 000004 000000 007112 55 001312 001111 007113 aa 000004 000000 007114 55 001122 001113 007115 aa 000004 000000 007116 55 001122 001116 007117 aa 000004 000000 007120 55 001122 001121 007121 aa 000004 000000 007122 55 001413 001125 007123 aa 000004 000000 007124 55 001413 001127 007125 aa 000004 000000 007126 55 001423 001130 007127 aa 000004 000000 007130 55 001312 001132 007131 aa 000004 000000 007132 55 001413 001133 007133 aa 000004 000000 007134 55 001166 001135 007135 aa 000004 000000 007136 55 001413 001137 007137 aa 000004 000000 007140 55 001147 001141 007141 aa 000004 000000 007142 55 001376 001143 007143 aa 000004 000000 007144 55 001147 001145 007145 aa 000004 000000 007146 55 001413 001153 007147 aa 000004 000000 007150 55 001350 001155 007151 aa 000004 000000 007152 55 001407 001156 007153 aa 000004 000000 007154 55 001413 001160 007155 aa 000004 000000 007156 55 001413 001162 007157 aa 000004 000000 007160 55 001166 001164 007161 aa 000004 000000 007162 55 001175 001173 007163 aa 000004 000000 007164 55 001362 001203 007165 aa 000004 000000 007166 55 001304 001205 007167 aa 000004 000000 007170 55 001304 001206 007171 aa 000004 000000 007172 55 001304 001210 007173 aa 000004 000000 007174 55 001304 001212 007175 aa 000004 000000 007176 55 001304 001214 007177 aa 000004 000000 007200 55 001304 001216 007201 aa 000004 000000 007202 55 001304 001220 007203 aa 000004 000000 007204 55 001304 001222 007205 aa 000004 000000 007206 55 001304 001224 007207 aa 000004 000000 007210 55 001304 001226 007211 aa 000004 000000 007212 55 001304 001230 007213 aa 000004 000000 007214 55 001304 001232 007215 aa 000004 000000 007216 55 001304 001234 007217 aa 000004 000000 007220 55 001304 001236 007221 aa 000004 000000 007222 55 001304 001240 007223 aa 000004 000000 007224 55 001451 001242 007225 aa 000004 000000 007226 55 001312 001245 007227 aa 000004 000000 007230 55 001304 001247 007231 aa 000004 000000 007232 55 001304 001250 007233 aa 000004 000000 007234 55 001304 001252 007235 aa 000004 000000 007236 55 001304 001254 007237 aa 000004 000000 007240 55 001304 001256 007241 aa 000004 000000 007242 55 001304 001260 007243 aa 000004 000000 007244 55 001304 001262 007245 aa 000004 000000 007246 55 001304 001264 007247 aa 000004 000000 007250 55 001304 001266 007251 aa 000004 000000 007252 55 001304 001270 007253 aa 000004 000000 007254 55 001304 001272 007255 aa 000004 000000 007256 55 001304 001274 007257 aa 000004 000000 007260 55 001304 001276 007261 aa 000004 000000 007262 55 001304 001300 007263 aa 000004 000000 007264 55 001304 001302 007265 aa 000004 000000 007266 55 001312 001310 007267 aa 000004 000000 007270 55 001407 001316 007271 aa 000004 000000 007272 55 001574 001320 007273 aa 000004 000000 007274 55 001561 001322 007275 aa 000004 000000 007276 55 001413 001325 007277 aa 000004 000000 007300 55 001340 001327 007301 aa 000004 000000 007302 55 001340 001332 007303 aa 000004 000000 007304 55 001340 001335 007305 aa 000004 000000 007306 55 001413 001344 007307 aa 000004 000000 007310 55 001350 001346 007311 aa 000004 000000 007312 55 001413 001353 007313 aa 000004 000000 007314 55 001413 001355 007315 aa 000004 000000 007316 55 001362 001357 007317 aa 000004 000000 007320 55 001561 001367 007321 aa 000004 000000 007322 55 001561 001372 007323 aa 000004 000000 007324 55 001376 001374 007325 aa 000004 000000 007326 55 001545 001402 007327 aa 000004 000000 007330 55 001545 001403 007331 aa 000004 000000 007332 55 001407 001405 007333 aa 000004 000000 007334 55 001413 001412 007335 aa 000004 000000 007336 55 001423 001420 007337 aa 000004 000000 007340 55 001432 001427 007341 aa 000004 000000 007342 55 001552 001437 007343 aa 000004 000000 007344 55 001552 001441 007345 aa 000004 000000 007346 55 001552 001442 007347 aa 000004 000000 007350 55 001451 001445 007351 aa 000004 000000 007352 55 001451 001447 007353 aa 000004 000000 007354 55 001574 001455 007355 aa 000004 000000 007356 55 001574 001456 007357 aa 000004 000000 007360 55 001574 001460 007361 aa 000004 000000 007362 55 001574 001461 007363 aa 000004 000000 007364 55 001574 001464 007365 aa 000004 000000 007366 55 001574 001467 007367 aa 000004 000000 007370 55 001574 001472 007371 aa 000004 000000 007372 55 001574 001475 007373 aa 000004 000000 007374 55 001574 001500 007375 aa 000004 000000 007376 55 001574 001503 007377 aa 000004 000000 007400 55 001574 001506 007401 aa 000004 000000 007402 55 001574 001511 007403 aa 000004 000000 007404 55 001574 001514 007405 aa 000004 000000 007406 55 001526 001517 007407 aa 000004 000000 007410 55 001526 001521 007411 aa 000004 000000 007412 55 001526 001524 007413 aa 000004 000000 007414 55 001561 001533 007415 aa 000004 000000 007416 55 001552 001537 007417 aa 000004 000000 007420 55 001545 001542 007421 aa 000004 000000 007422 55 001552 001547 007423 aa 000004 000000 007424 55 001561 001556 007425 aa 000004 000000 007426 55 001574 001566 007427 aa 000004 000000 007430 55 001574 001571 007431 aa 000001 000000 007432 aa 000000 000000 INTERNAL EXPRESSION WORDS 007433 5a 001577 000000 007434 5a 001601 000000 007435 5a 001603 000000 007436 5a 001605 000000 007437 5a 001607 000000 007440 5a 001611 000001 007441 5a 001613 000000 007442 5a 001615 000000 007443 5a 001617 000000 007444 5a 001621 000000 007445 5a 001623 000000 007446 5a 001625 000000 007447 5a 001627 000000 007450 5a 001627 000001 007451 5a 001631 000000 007452 5a 001633 000000 007453 5a 001635 000000 007454 5a 001637 000000 007455 5a 001641 000000 007456 5a 001643 000000 007457 5a 001645 000000 007460 5a 001647 000000 007461 5a 001651 000000 007462 5a 001653 000000 007463 5a 001655 000000 007464 5a 001657 000000 007465 5a 001661 000000 007466 5a 001663 000000 007467 5a 001665 000000 007470 5a 001667 000000 007471 5a 001671 000000 007472 5a 001673 000000 007473 5a 001675 000000 007474 5a 001677 000000 007475 5a 001701 000000 007476 5a 001703 000000 007477 5a 001705 000000 007500 5a 001707 000000 007501 5a 001711 000000 007502 5a 001713 000000 007503 5a 001715 000000 007504 5a 001717 000000 007505 5a 001721 000000 007506 5a 001723 000000 007507 5a 001725 000000 007510 5a 001727 000000 007511 5a 001731 000000 007512 5a 001733 000000 007513 5a 001735 000000 007514 5a 001737 000000 007515 5a 001741 000000 007516 5a 001743 000000 007517 5a 001745 000000 007520 5a 001747 000000 007521 5a 001751 000000 007522 5a 001753 000000 007523 5a 001755 000000 007524 5a 001757 000000 007525 5a 001761 000000 007526 5a 001763 000000 007527 5a 001765 000000 007530 5a 001767 000000 007531 5a 001771 000000 007532 5a 001773 000000 007533 5a 001775 000000 007534 5a 001777 000000 007535 5a 002001 000000 007536 5a 002003 000000 007537 5a 002005 000000 007540 5a 002007 000000 007541 5a 002011 000000 007542 5a 002013 000000 007543 5a 002015 000000 007544 5a 002017 000000 007545 5a 002021 000000 007546 5a 002023 000000 007547 5a 002025 000000 007550 5a 002027 000000 007551 5a 002031 000000 007552 5a 002033 000000 007553 5a 002035 000000 007554 5a 002037 000000 007555 5a 002041 000000 007556 5a 002043 000000 007557 5a 002045 000000 007560 5a 002047 000000 007561 5a 002051 000000 007562 5a 002053 000000 007563 5a 002055 000000 007564 5a 002057 000000 007565 5a 002061 000000 007566 5a 002063 000000 007567 5a 002065 000000 007570 5a 002067 000000 007571 5a 002071 000000 007572 5a 002073 000000 007573 5a 002075 000000 007574 5a 002077 000000 007575 5a 002101 000000 007576 5a 002103 000000 007577 5a 002105 000000 007600 5a 002107 000000 007601 5a 002111 000000 007602 5a 002113 000000 007603 5a 002115 000000 007604 5a 002117 000000 007605 5a 002121 000000 007606 5a 002123 000000 007607 5a 002125 000000 007610 5a 002127 000000 007611 5a 002131 000000 007612 5a 002133 000000 007613 5a 002135 000000 007614 5a 002137 000000 007615 5a 002141 000000 007616 5a 002143 000000 007617 5a 002145 000000 007620 5a 002147 000000 007621 5a 002151 000000 007622 5a 002153 000000 007623 5a 002155 000000 007624 5a 002157 000000 007625 5a 002161 000000 007626 5a 002163 000000 007627 5a 002165 000000 007630 5a 002167 000000 007631 5a 002171 000000 007632 5a 002173 000000 007633 5a 002175 000000 007634 5a 002177 000000 007635 5a 002201 000000 007636 5a 002203 000000 007637 5a 002205 000000 007640 5a 002207 000000 007641 5a 002211 000000 007642 5a 002213 000000 007643 5a 002215 000000 007644 5a 002217 000000 007645 5a 002221 000000 007646 5a 002223 000000 007647 5a 002225 000000 007650 5a 002227 000000 007651 5a 002231 000000 007652 5a 002233 000000 007653 5a 002235 000000 007654 5a 002237 000000 007655 5a 002241 000000 007656 5a 002243 000000 007657 5a 002245 000000 007660 5a 002247 000000 007661 5a 002251 000000 007662 5a 002253 000000 007663 5a 002255 000000 007664 5a 002257 000000 007665 5a 002261 000000 007666 5a 002263 000000 007667 5a 002265 000000 007670 5a 002267 000000 007671 5a 002271 000000 007672 5a 002273 000000 007673 5a 002275 000000 007674 5a 002277 000000 007675 5a 002301 000000 007676 5a 002303 000000 007677 5a 002305 000000 007700 5a 002307 000000 007701 5a 002311 000000 007702 5a 002313 000000 007703 5a 002315 000000 007704 5a 002317 000000 007705 5a 002321 000000 007706 5a 002323 000000 007707 5a 002325 000000 007710 5a 002327 000000 007711 5a 002331 000000 007712 5a 002333 000000 007713 5a 002335 000000 007714 5a 002337 000000 007715 5a 002341 000000 007716 5a 002343 000000 007717 5a 002345 000000 007720 5a 002347 000000 007721 5a 002351 000000 007722 5a 002353 000000 007723 5a 002355 000000 007724 5a 002357 000000 007725 5a 002361 000000 007726 5a 002363 000000 007727 5a 002365 000000 007730 5a 002367 000000 007731 5a 002371 000000 007732 5a 002373 000000 007733 5a 002375 000000 007734 5a 002377 000000 007735 5a 002401 000000 007736 5a 002403 000000 007737 5a 002405 000000 007740 5a 002407 000000 007741 5a 002411 000000 007742 5a 002413 000000 007743 5a 002415 000000 007744 5a 002417 000000 007745 5a 002421 000000 007746 5a 002423 000000 007747 5a 002425 000000 007750 5a 002427 000000 007751 5a 002431 000000 007752 5a 002433 000000 007753 5a 002435 000000 007754 5a 002437 000000 007755 5a 002441 000000 007756 5a 002443 000000 007757 5a 002445 000000 007760 5a 002447 000000 007761 5a 002451 000000 007762 5a 002453 000000 007763 5a 002455 000000 007764 5a 002457 000000 007765 5a 002461 000000 007766 5a 002463 000000 007767 5a 002465 000000 007770 5a 002467 000000 007771 5a 002471 000000 007772 5a 002473 000000 007773 5a 002475 000000 007774 5a 002477 000000 007775 5a 002501 000000 007776 5a 002503 000000 007777 5a 002505 000000 010000 5a 002507 000000 010001 5a 002511 000000 010002 5a 002513 000000 010003 5a 002515 000000 010004 5a 002517 000000 010005 5a 002521 000000 010006 5a 002523 000000 010007 5a 002525 000000 010010 5a 002527 000000 010011 5a 002531 000000 010012 5a 002533 000000 010013 5a 002535 000000 010014 5a 002537 000000 010015 5a 002541 000000 010016 5a 002543 000000 010017 5a 002545 000000 010020 5a 002547 000000 010021 5a 002551 000000 010022 5a 002553 000000 010023 5a 002555 000000 010024 5a 002557 000000 010025 5a 002561 000000 010026 5a 002563 000000 010027 5a 002565 000000 010030 5a 002567 000000 010031 5a 002571 000000 010032 5a 002573 000000 010033 5a 002575 000000 010034 5a 002577 000000 010035 5a 002601 000000 010036 5a 002603 000000 010037 5a 002605 000000 010040 5a 002607 000000 010041 5a 002611 000000 010042 5a 002613 000000 010043 5a 002615 000000 010044 5a 002617 000000 010045 5a 002621 000000 010046 5a 002623 000000 010047 5a 002625 000000 010050 5a 002627 000000 010051 5a 002631 000000 010052 5a 002633 000000 010053 5a 002635 000000 010054 5a 002637 000000 010055 5a 002641 000000 010056 5a 002643 000000 010057 5a 002645 000000 010060 5a 002647 000000 010061 5a 002651 000000 010062 5a 002653 000000 010063 5a 002655 000000 010064 5a 002657 000000 010065 5a 002661 000000 010066 5a 002663 000000 010067 5a 002665 000000 010070 5a 002667 000000 010071 5a 002671 000000 010072 5a 002673 000000 010073 5a 002675 000000 010074 5a 002677 000000 010075 5a 002701 000000 010076 5a 002703 000000 010077 5a 002705 000000 010100 5a 002707 000000 010101 5a 002711 000000 010102 5a 002713 000000 010103 5a 002715 000000 010104 5a 002717 000000 010105 5a 002721 000000 010106 5a 002723 000000 010107 5a 002725 000000 010110 5a 002727 000000 010111 5a 002731 000000 010112 5a 002733 000000 010113 5a 002735 000000 010114 5a 002737 000000 010115 5a 002741 000000 010116 5a 002743 000000 010117 5a 002745 000000 010120 5a 002747 000000 010121 5a 002751 000000 010122 5a 002753 000000 010123 5a 002755 000000 010124 5a 002757 000000 010125 5a 002761 000000 010126 5a 002763 000000 010127 5a 002765 000000 010130 5a 002767 000000 010131 5a 002771 000000 010132 5a 002773 000000 010133 5a 002775 000000 LINKAGE INFORMATION 000000 aa 000000 000000 000001 0a 004432 000000 000002 aa 000000 000000 000003 aa 000000 000000 000004 aa 000000 000000 000005 aa 000000 000000 000006 22 000010 001216 000007 a2 000000 000000 000010 9a 777770 0000 46 lisp_utils_|times_flo  000011 5a 003501 0000 00 000012 9a 777766 0000 46 lisp_utils_|times_fix  000013 5a 003500 0000 00 000014 9a 777764 0000 46 lisp_array_fcns_|star_array 000015 5a 003477 0000 00 000016 9a 777762 0000 46 lisp_bignums_|difference  000017 5a 003476 0000 00 000020 9a 777760 0000 46 lisp_|stfunction  000021 5a 003475 0000 00 000022 9a 777756 0000 46 lisp_bignums_|quotient  000023 5a 003474 0000 00 000024 9a 777754 0000 46 lisp_array_fcns_|star_rearray  000025 5a 003473 0000 00 000026 9a 777752 0000 46 lisp_status_fns_|rset  000027 5a 003472 0000 00 000030 9a 777750 0000 46 lisp_status_fns_|sstatus_  000031 5a 003471 0000 00 000032 9a 777746 0000 46 lisp_status_fns_|status_  000033 5a 003470 0000 00 000034 9a 777744 0000 46 lisp_utils_|plus_flo  000035 5a 003467 0000 00 000036 9a 777742 0000 46 lisp_utils_|plus_fix  000037 5a 003466 0000 00 000040 9a 777740 0000 46 lisp_utils_|diff_flo  000041 5a 003465 0000 00 000042 9a 777736 0000 46 lisp_utils_|diff_fix  000043 5a 003464 0000 00 000044 9a 777734 0000 46 lisp_utils_|quot_flo  000045 5a 003463 0000 00 000046 9a 777732 0000 46 lisp_utils_|quot_fix  000047 5a 003462 0000 00 000050 9a 777730 0000 46 lisp_utils_|add1_flo  000051 5a 003461 0000 00 000052 9a 777726 0000 46 lisp_utils_|add1_fix  000053 5a 003460 0000 00 000054 9a 777724 0000 46 lisp_utils_|sub1_flo  000055 5a 003457 0000 00 000056 9a 777722 0000 46 lisp_utils_|sub1_fix  000057 5a 003456 0000 00 000060 9a 777720 0000 46 lisp_utils_|ls_ 000061 5a 003455 0000 00 000062 9a 777716 0000 46 lisp_utils_|eql_  000063 5a 003454 0000 00 000064 9a 777714 0000 46 lisp_utils_|gt_ 000065 5a 003453 0000 00 000066 9a 777712 0000 46 lisp_char_fns_|CtoI 000067 5a 003452 0000 00 000070 9a 777710 0000 46 lisp_char_fns_|ItoC 000071 5a 003451 0000 00 000072 9a 777706 0000 46 lisp_bignums_|remainder 000073 5a 003450 0000 00 000074 9a 777704 0000 46 lisp_bignums_|abs  000075 5a 003447 0000 00 000076 9a 777702 0000 46 lisp_bignums_|add1  000077 5a 003446 0000 00 000100 9a 777700 0000 46 lisp_fault_handler_|alarmclock  000101 5a 003445 0000 00 000102 9a 777676 0000 46 lisp_io_fns_|allfiles  000103 5a 003444 0000 00 000104 9a 777674 0000 46 lisp_quick_fcns_|and  000105 5a 003443 0000 00 000106 9a 777672 0000 46 lisp_alloc_|append  000107 5a 003442 0000 00 000110 9a 777670 0000 46 lisp_|apply_  000111 5a 003441 0000 00 000112 9a 777666 0000 46 lisp_|arg  000113 5a 003440 0000 00 000114 9a 777664 0000 46 lisp_defsubr_|args  000115 5a 003437 0000 00 000116 9a 777662 0000 46 lisp_array_fcns_|array  000117 5a 003436 0000 00 000120 9a 777660 0000 46 lisp_array_fcns_|arraydims  000121 5a 003435 0000 00 000122 9a 777656 0000 46 lisp_reader_alm_|ascii_alm  000123 5a 003434 0000 00 000124 9a 777654 0000 46 lisp_quick_fcns_|assoc  000125 5a 003433 0000 00 000126 9a 777652 0000 46 lisp_quick_fcns_|assq  000127 5a 003432 0000 00 000130 9a 777650 0000 46 lisp_trig_|atan 000131 5a 003431 0000 00 000132 9a 777646 0000 46 lisp_quick_fcns_|atom  000133 5a 003430 0000 00 000134 9a 777644 0000 46 lisp_baktrace_|baktrace1  000135 5a 003427 0000 00 000136 9a 777642 0000 46 lisp_baktrace_|baktrace2  000137 5a 003426 0000 00 000140 9a 777640 0000 46 lisp_baktrace_|baktrace 000141 5a 003425 0000 00 000142 9a 777636 0000 46 lisp_quick_fcns_|bigp  000143 5a 003424 0000 00 000144 9a 777634 0000 46 lisp_array_fcns_|bltarray  000145 5a 003423 0000 00 000146 9a 777632 0000 46 lisp_utils_|boole  000147 5a 003422 0000 00 000150 9a 777630 0000 46 lisp_alloc_|boundp  000151 5a 003421 0000 00 000152 9a 777626 0000 46 lisp_prog_fns_|break  000153 5a 003420 0000 00 000154 9a 777624 0000 46 lisp_car_cdrs_|caaaar  000155 5a 003417 0000 00 000156 9a 777622 0000 46 lisp_car_cdrs_|caaadr  000157 5a 003416 0000 00 000160 9a 777620 0000 46 lisp_car_cdrs_|caaar  000161 5a 003415 0000 00 000162 9a 777616 0000 46 lisp_car_cdrs_|caadar  000163 5a 003414 0000 00 000164 9a 777614 0000 46 lisp_car_cdrs_|caaddr  000165 5a 003413 0000 00 000166 9a 777612 0000 46 lisp_car_cdrs_|caadr  000167 5a 003412 0000 00 000170 9a 777610 0000 46 lisp_car_cdrs_|caar 000171 5a 003411 0000 00 000172 9a 777606 0000 46 lisp_car_cdrs_|cadaar  000173 5a 003410 0000 00 000174 9a 777604 0000 46 lisp_car_cdrs_|cadadr  000175 5a 003407 0000 00 000176 9a 777602 0000 46 lisp_car_cdrs_|cadar  000177 5a 003406 0000 00 000200 9a 777600 0000 46 lisp_car_cdrs_|caddar  000201 5a 003405 0000 00 000202 9a 777576 0000 46 lisp_car_cdrs_|cadddr  000203 5a 003404 0000 00 000204 9a 777574 0000 46 lisp_car_cdrs_|caddr  000205 5a 003403 0000 00 000206 9a 777572 0000 46 lisp_car_cdrs_|cadr 000207 5a 003402 0000 00 000210 9a 777570 0000 46 lisp_car_cdrs_|car  000211 5a 003401 0000 00 000212 9a 777566 0000 46 lisp_prog_fns_|catch  000213 5a 003400 0000 00 000214 9a 777564 0000 46 lisp_char_fns_|catenate 000215 5a 003377 0000 00 000216 9a 777562 0000 46 lisp_car_cdrs_|cdaaar  000217 5a 003376 0000 00 000220 9a 777560 0000 46 lisp_car_cdrs_|cdaadr  000221 5a 003375 0000 00 000222 9a 777556 0000 46 lisp_car_cdrs_|cdaar  000223 5a 003374 0000 00 000224 9a 777554 0000 46 lisp_car_cdrs_|cdadar  000225 5a 003373 0000 00 000226 9a 777552 0000 46 lisp_car_cdrs_|cdaddr  000227 5a 003372 0000 00 000230 9a 777550 0000 46 lisp_car_cdrs_|cdadr  000231 5a 003371 0000 00 000232 9a 777546 0000 46 lisp_car_cdrs_|cdar 000233 5a 003370 0000 00 000234 9a 777544 0000 46 lisp_car_cdrs_|cddaar  000235 5a 003367 0000 00 000236 9a 777542 0000 46 lisp_car_cdrs_|cddadr  000237 5a 003366 0000 00 000240 9a 777540 0000 46 lisp_car_cdrs_|cddar  000241 5a 003365 0000 00 000242 9a 777536 0000 46 lisp_car_cdrs_|cdddar  000243 5a 003364 0000 00 000244 9a 777534 0000 46 lisp_car_cdrs_|cddddr  000245 5a 003363 0000 00 000246 9a 777532 0000 46 lisp_car_cdrs_|cdddr  000247 5a 003362 0000 00 000250 9a 777530 0000 46 lisp_car_cdrs_|cddr 000251 5a 003361 0000 00 000252 9a 777526 0000 46 lisp_car_cdrs_|cdr  000253 5a 003360 0000 00 000254 9a 777524 0000 46 lisp_reader_alm_|chrct  000255 5a 003357 0000 00 000256 9a 777522 0000 46 lisp_command_caller_|cline  000257 5a 003356 0000 00 000260 9a 777520 0000 46 lisp_io_control_|close  000261 5a 003355 0000 00 000262 9a 777516 0000 46 lisp_quick_fcns_|comment  000263 5a 003354 0000 00 000264 9a 777514 0000 46 lisp_quick_fcns_|cond  000265 5a 003353 0000 00 000266 9a 777512 0000 46 lisp_alloc_|cons_  000267 5a 003352 0000 00 000270 9a 777510 0000 46 lisp_trig_|cos  000271 5a 003351 0000 00 000272 9a 777506 0000 46 lisp_quick_fcns_|declare  000273 5a 003350 0000 00 000274 9a 777504 0000 46 lisp_define_|defprop  000275 5a 003347 0000 00 000276 9a 777502 0000 46 lisp_defsubr_|defsubr  000277 5a 003346 0000 00 000300 9a 777500 0000 46 lisp_define_|defun  000301 5a 003345 0000 00 000302 9a 777476 0000 46 lisp_quick_fcns_|delete 000303 5a 003344 0000 00 000304 9a 777474 0000 46 lisp_io_control_|deletef  000305 5a 003343 0000 00 000306 9a 777472 0000 46 lisp_quick_fcns_|delq  000307 5a 003342 0000 00 000310 9a 777470 0000 46 lisp_prog_fns_|do  000311 5a 003341 0000 00 000312 9a 777466 0000 46 lisp_io_fns_|eoffn  000313 5a 003340 0000 00 000314 9a 777464 0000 46 lisp_quick_fcns_|eq 000315 5a 003337 0000 00 000316 9a 777462 0000 46 lisp_quick_fcns_|equal  000317 5a 003336 0000 00 000320 9a 777460 0000 46 lisp_error_|err 000321 5a 003335 0000 00 000322 9a 777456 0000 46 lisp_error_|errframe  000323 5a 003334 0000 00 000324 9a 777454 0000 46 lisp_error_|errprint  000325 5a 003333 0000 00 000326 9a 777452 0000 46 lisp_prog_fns_|errset  000327 5a 003332 0000 00 000330 9a 777450 0000 46 lisp_|eval_ 000331 5a 003331 0000 00 000332 9a 777446 0000 46 lisp_error_|pdlframe  000333 5a 003330 0000 00 000334 9a 777444 0000 46 lisp_trig_|exp  000335 5a 003327 0000 00 000336 9a 777442 0000 46 lisp_print_|explode 000337 5a 003326 0000 00 000340 9a 777440 0000 46 lisp_print_|explodec  000341 5a 003325 0000 00 000342 9a 777436 0000 46 lisp_print_|exploden  000343 5a 003324 0000 00 000344 9a 777434 0000 46 lisp_bignums_|expt  000345 5a 003323 0000 00 000346 9a 777432 0000 46 lisp_io_fns_|filepos  000347 5a 003322 0000 00 000350 9a 777430 0000 46 lisp_bignums_|fix  000351 5a 003321 0000 00 000352 9a 777426 0000 46 lisp_quick_fcns_|fixp  000353 5a 003320 0000 00 000354 9a 777424 0000 46 lisp_print_|flatc  000355 5a 003317 0000 00 000356 9a 777422 0000 46 lisp_print_|flatsize  000357 5a 003316 0000 00 000360 9a 777420 0000 46 lisp_bignums_|float 000361 5a 003315 0000 00 000362 9a 777416 0000 46 lisp_quick_fcns_|floatp 000363 5a 003314 0000 00 000364 9a 777414 0000 46 lisp_error_|freturn 000365 5a 003313 0000 00 000366 9a 777412 0000 46 lisp_car_cdrs_|quote  000367 5a 003312 0000 00 000370 9a 777410 0000 46 lisp_garbage_collector_|gcsubr  000371 5a 003311 0000 00 000372 9a 777406 0000 46 lisp_status_fns_|gctwa  000373 5a 003310 0000 00 000374 9a 777404 0000 46 lisp_alloc_|gensym_ 000375 5a 003307 0000 00 000376 9a 777402 0000 46 lisp_property_fns_|get_ 000377 5a 003306 0000 00 000400 9a 777400 0000 46 lisp_char_fns_|get_pname  000401 5a 003305 0000 00 000402 9a 777376 0000 46 lisp_property_fns_|getl_  000403 5a 003304 0000 00 000404 9a 777374 0000 46 lisp_|go  000405 5a 003303 0000 00 000406 9a 777372 0000 46 lisp_bignums_|greaterp  000407 5a 003302 0000 00 000410 9a 777370 0000 46 lisp_char_fns_|Index  000411 5a 003301 0000 00 000412 9a 777366 0000 46 lisp_io_fns_|inpush 000413 5a 003300 0000 00 000414 9a 777364 0000 46 lisp_obarray_utils_|intern  000415 5a 003277 0000 00 000416 9a 777362 0000 46 lisp_fault_handler_|ioc 000417 5a 003276 0000 00 000420 9a 777360 0000 46 lisp_fault_handler_|iog 000421 5a 003275 0000 00 000422 9a 777356 0000 46 lisp_trig_|isqrt  000423 5a 003274 0000 00 000424 9a 777354 0000 46 lisp_quick_fcns_|last  000425 5a 003273 0000 00 000426 9a 777352 0000 46 lisp_quick_fcns_|length 000427 5a 003272 0000 00 000430 9a 777350 0000 46 lisp_bignums_|lessp 000431 5a 003271 0000 00 000432 9a 777346 0000 46 lisp_reader_alm_|linel  000433 5a 003270 0000 00 000434 9a 777344 0000 46 lisp_alloc_|list_  000435 5a 003267 0000 00 000436 9a 777342 0000 46 lisp_trig_|log  000437 5a 003266 0000 00 000440 9a 777340 0000 46 lisp_utils_|lsh 000441 5a 003265 0000 00 000442 9a 777336 0000 46 lisp_char_fns_|make_atom  000443 5a 003264 0000 00 000444 9a 777334 0000 46 lisp_reader_|maknam 000445 5a 003263 0000 00 000446 9a 777332 0000 46 lisp_obarray_utils_|makoblist  000447 5a 003262 0000 00 000450 9a 777330 0000 46 lisp_reader_|makreadtable  000451 5a 003261 0000 00 000452 9a 777326 0000 46 lisp_alloc_|makunbound  000453 5a 003260 0000 00 000454 9a 777324 0000 46 lisp_|map  000455 5a 003257 0000 00 000456 9a 777322 0000 46 lisp_|mapc  000457 5a 003256 0000 00 000460 9a 777320 0000 46 lisp_|mapcan  000461 5a 003255 0000 00 000462 9a 777316 0000 46 lisp_|mapcar  000463 5a 003254 0000 00 000464 9a 777314 0000 46 lisp_|mapcon  000465 5a 003253 0000 00 000466 9a 777312 0000 46 lisp_|maplist  000467 5a 003252 0000 00 000470 9a 777310 0000 46 lisp_bignums_|max  000471 5a 003251 0000 00 000472 9a 777306 0000 46 lisp_quick_fcns_|member 000473 5a 003250 0000 00 000474 9a 777304 0000 46 lisp_quick_fcns_|memq  000475 5a 003247 0000 00 000476 9a 777302 0000 46 lisp_bignums_|min  000477 5a 003246 0000 00 000500 9a 777300 0000 46 lisp_bignums_|minus 000501 5a 003245 0000 00 000502 9a 777276 0000 46 lisp_bignums_|minusp  000503 5a 003244 0000 00 000504 9a 777274 0000 46 lisp_io_control_|mergef 000505 5a 003243 0000 00 000506 9a 777272 0000 46 lisp_alloc_|nconc  000507 5a 003242 0000 00 000510 9a 777270 0000 46 lisp_alloc_|ncons_  000511 5a 003241 0000 00 000512 9a 777266 0000 46 lisp_io_fns_|namelist  000513 5a 003240 0000 00 000514 9a 777264 0000 46 lisp_io_fns_|names  000515 5a 003237 0000 00 000516 9a 777262 0000 46 lisp_io_fns_|namestring 000517 5a 003236 0000 00 000520 9a 777260 0000 46 lisp_fault_handler_|nointerrupt 000521 5a 003235 0000 00 000522 9a 777256 0000 46 lisp_status_fns_|noret  000523 5a 003234 0000 00 000524 9a 777254 0000 46 lisp_quick_fcns_|null  000525 5a 003233 0000 00 000526 9a 777252 0000 46 lisp_|nouuo 000527 5a 003232 0000 00 000530 9a 777250 0000 46 lisp_alloc_|nreverse_  000531 5a 003231 0000 00 000532 9a 777246 0000 46 lisp_quick_fcns_|numberp  000533 5a 003230 0000 00 000534 9a 777244 0000 46 lisp_quick_fcns_|oddp  000535 5a 003227 0000 00 000536 9a 777242 0000 46 lisp_io_control_|opena  000537 5a 003226 0000 00 000540 9a 777240 0000 46 lisp_io_control_|openi  000541 5a 003225 0000 00 000542 9a 777236 0000 46 lisp_io_control_|openo  000543 5a 003224 0000 00 000544 9a 777234 0000 46 lisp_quick_fcns_|or 000545 5a 003223 0000 00 000546 9a 777232 0000 46 lisp_bignums_|plus  000547 5a 003222 0000 00 000550 9a 777230 0000 46 lisp_bignums_|plusp 000551 5a 003221 0000 00 000552 9a 777226 0000 46 lisp_print_|prin1_  000553 5a 003220 0000 00 000554 9a 777224 0000 46 lisp_print_|princ_  000555 5a 003217 0000 00 000556 9a 777222 0000 46 lisp_print_|print_  000557 5a 003216 0000 00 000560 9a 777220 0000 46 lisp_quick_fcns_|prog2  000561 5a 003215 0000 00 000562 9a 777216 0000 46 lisp_prog_fns_|prog 000563 5a 003214 0000 00 000564 9a 777214 0000 46 lisp_quick_fcns_|progn  000565 5a 003213 0000 00 000566 9a 777212 0000 46 lisp_property_fns_|putprop_ 000567 5a 003212 0000 00 000570 9a 777210 0000 46 lisp|quit  000571 5a 003211 0000 00 000572 9a 777206 0000 46 lisp_quick_fcns_|random 000573 5a 003210 0000 00 000574 9a 777204 0000 46 lisp_reader_|read  000575 5a 003207 0000 00 000576 9a 777202 0000 46 lisp_reader_alm_|readch 000577 5a 003206 0000 00 000600 9a 777200 0000 46 lisp_reader_|readlist  000601 5a 003205 0000 00 000602 9a 777176 0000 46 lisp_reader_|readstring 000603 5a 003204 0000 00 000604 9a 777174 0000 46 lisp_obarray_utils_|remob  000605 5a 003203 0000 00 000606 9a 777172 0000 46 lisp_property_fns_|remprop_ 000607 5a 003202 0000 00 000610 9a 777170 0000 46 lisp_io_control_|rename 000611 5a 003201 0000 00 000612 9a 777166 0000 46 lisp_|return  000613 5a 003200 0000 00 000614 9a 777164 0000 46 lisp_alloc_|reverse 000615 5a 003177 0000 00 000616 9a 777162 0000 46 lisp_utils_|rot 000617 5a 003176 0000 00 000620 9a 777160 0000 46 lisp_quick_fcns_|rplaca 000621 5a 003175 0000 00 000622 9a 777156 0000 46 lisp_quick_fcns_|rplacd 000623 5a 003174 0000 00 000624 9a 777154 0000 46 lisp_quick_fcns_|runtime  000625 5a 003173 0000 00 000626 9a 777152 0000 46 lisp_quick_fcns_|sassoc 000627 5a 003172 0000 00 000630 9a 777150 0000 46 lisp_quick_fcns_|sassq  000631 5a 003171 0000 00 000632 9a 777146 0000 46 lisp|save  000633 5a 003170 0000 00 000634 9a 777144 0000 46 lisp_quick_fcns_|set  000635 5a 003167 0000 00 000636 9a 777142 0000 46 lisp_|setarg  000637 5a 003166 0000 00 000640 9a 777140 0000 46 lisp_quick_fcns_|setq  000641 5a 003165 0000 00 000642 9a 777136 0000 46 lisp_io_fns_|shortnamestring  000643 5a 003164 0000 00 000644 9a 777134 0000 46 lisp_utils_|signp  000645 5a 003163 0000 00 000646 9a 777132 0000 46 lisp_trig_|sin  000647 5a 003162 0000 00 000650 9a 777130 0000 46 lisp_trig_|sleep  000651 5a 003161 0000 00 000652 9a 777126 0000 46 lisp_quick_fcns_|smallnump  000653 5a 003160 0000 00 000654 9a 777124 0000 46 lisp_trig_|sqrt 000655 5a 003157 0000 00 000656 9a 777122 0000 46 lisp_status_fns_|sstatus  000657 5a 003156 0000 00 000660 9a 777120 0000 46 lisp_status_fns_|status 000661 5a 003155 0000 00 000662 9a 777116 0000 46 lisp_oprs_|store  000663 5a 003154 0000 00 000664 9a 777114 0000 46 lisp_char_fns_|stringlength 000665 5a 003153 0000 00 000666 9a 777112 0000 46 lisp_quick_fcns_|stringp  000667 5a 003152 0000 00 000670 9a 777110 0000 46 lisp_bignums_|sub1  000671 5a 003151 0000 00 000672 9a 777106 0000 46 lisp_alloc_|sublis  000673 5a 003150 0000 00 000674 9a 777104 0000 46 lisp_quick_fcns_|subrp  000675 5a 003147 0000 00 000676 9a 777102 0000 46 lisp_alloc_|subst_  000677 5a 003146 0000 00 000700 9a 777100 0000 46 lisp_char_fns_|Substr2  000701 5a 003145 0000 00 000702 9a 777076 0000 46 lisp_char_fns_|Substr  000703 5a 003144 0000 00 000704 9a 777074 0000 46 lisp_defsubr_|sysp  000705 5a 003143 0000 00 000706 9a 777072 0000 46 lisp_print_|terpri  000707 5a 003142 0000 00 000710 9a 777070 0000 46 lisp_prog_fns_|throw  000711 5a 003141 0000 00 000712 9a 777066 0000 46 lisp_status_fns_|time  000713 5a 003140 0000 00 000714 9a 777064 0000 46 lisp_bignums_|times 000715 5a 003137 0000 00 000716 9a 777062 0000 46 lisp_reader_alm_|tyi  000717 5a 003136 0000 00 000720 9a 777060 0000 46 lisp_reader_alm_|tyipeek  000721 5a 003135 0000 00 000722 9a 777056 0000 46 lisp_reader_alm_|tyo_alm  000723 5a 003134 0000 00 000724 9a 777054 0000 46 lisp_utils_|typep  000725 5a 003133 0000 00 000726 9a 777052 0000 46 lisp_alloc_|xcons_  000727 5a 003132 0000 00 000730 9a 777050 0000 46 lisp_quick_fcns_|zerop  000731 5a 003131 0000 00 000732 9a 777046 0000 46 lisp_quick_fcns_|alphalessp 000733 5a 003130 0000 00 000734 9a 777044 0000 46 lisp_quick_fcns_|samepnamep 000735 5a 003127 0000 00 000736 9a 777042 0000 46 lisp_quick_fcns_|getchar  000737 5a 003126 0000 00 000740 9a 777040 0000 46 lisp_utils_|sxhash  000741 5a 003125 0000 00 000742 9a 777036 0000 46 lisp_bignums_|gcd  000743 5a 003124 0000 00 000744 9a 777034 0000 46 lisp_error_|error  000745 5a 003123 0000 00 000746 9a 777032 0000 46 lisp_status_fns_|setsyntax  000747 5a 003122 0000 00 000750 9a 777030 0000 46 lisp_io_fns_|cursorpos  000751 5a 003121 0000 00 000752 9a 777026 0000 46 lisp_io_control_|force_output  000753 5a 003120 0000 00 000754 9a 777024 0000 46 lisp_io_control_|clear_input  000755 5a 003117 0000 00 000756 9a 777022 0000 46 lisp_bignums_|haipart  000757 5a 003116 0000 00 000760 9a 777020 0000 46 lisp_bignums_|haulong  000761 5a 003115 0000 00 000762 9a 777016 0000 46 lisp_array_fcns_|sort  000763 5a 003114 0000 00 000764 9a 777014 0000 46 lisp_array_fcns_|sortcar  000765 5a 003113 0000 00 000766 9a 777012 0000 46 lisp_array_fcns_|fillarray  000767 5a 003112 0000 00 000770 9a 777010 0000 46 lisp_array_fcns_|listarray  000771 5a 003111 0000 00 000772 9a 777006 0000 46 lisp_|listify  000773 5a 003110 0000 00 000774 9a 777004 0000 46 lisp_|funcall  000775 5a 003107 0000 00 000776 9a 777002 0000 46 lisp_reader_alm_|listen 000777 5a 003106 0000 00 001000 9a 777000 0000 46 lisp_utils_|fixgcd  001001 5a 003105 0000 00 001002 9a 776776 0000 46 lisp_alloc_|copysymbol  001003 5a 003104 0000 00 001004 9a 776774 0000 46 lisp_load_|lisp_load_  001005 5a 003103 0000 00 001006 9a 776772 0000 46 lisp_reader_alm_|charpos  001007 5a 003102 0000 00 001010 9a 776770 0000 46 lisp_reader_alm_|linenum  001011 5a 003101 0000 00 001012 9a 776766 0000 46 lisp_reader_alm_|pagenum  001013 5a 003100 0000 00 001014 9a 776764 0000 46 lisp_reader_alm_|pagel  001015 5a 003077 0000 00 001016 9a 776762 0000 46 lisp_io_fns_|endpagefn  001017 5a 003076 0000 00 001020 9a 776760 0000 46 lisp_io_control_|percent_include  001021 5a 003075 0000 00 001022 9a 776756 0000 46 lisp_io_fns_|defaultf  001023 5a 003074 0000 00 001024 9a 776754 0000 46 lisp_status_fns_|alloc  001025 5a 003073 0000 00 001026 9a 776752 0000 46 lisp_reader_|implode  001027 5a 003072 0000 00 001030 9a 776750 0000 46 lisp_subr_tv_|purcopy_code  001031 5a 003071 0000 00 001032 9a 776746 0000 46 lisp_alloc_|nreconc_  001033 5a 003070 0000 00 001034 9a 776744 0000 46 lisp_subr_tv_|star_rset_trap  001035 5a 003067 0000 00 001036 9a 776742 0000 46 lisp_subr_tv_|autoload_trap 001037 5a 003066 0000 00 001040 9a 776740 0000 46 lisp_quick_fcns_|getcharn  001041 5a 003065 0000 00 001042 9a 776736 0000 46 lisp_|subrcall  001043 5a 003064 0000 00 001044 9a 776734 0000 46 lisp_|lsubrcall 001045 5a 003063 0000 00 001046 9a 776732 0000 46 lisp_|arraycall 001047 5a 003062 0000 00 001050 9a 776730 0000 46 lisp_alloc_|maknum  001051 5a 003061 0000 00 001052 9a 776726 0000 46 lisp_alloc_|munkam  001053 5a 003060 0000 00 001054 9a 776724 0000 46 lisp_loadumparrays_|loadarrays  001055 5a 003057 0000 00 001056 9a 776722 0000 46 lisp_loadumparrays_|dumparrays  001057 5a 003056 0000 00 001060 9a 776720 0000 46 lisp_utils_|expt_fix  001061 5a 003055 0000 00 001062 9a 776716 0000 46 lisp_utils_|expt_flo  001063 5a 003054 0000 00 001064 9a 776714 0000 46 lisp_|symeval  001065 5a 003053 0000 00 001066 9a 776712 0000 46 lisp_property_fns_|plist_  001067 5a 003052 0000 00 001070 9a 776710 0000 46 lisp_property_fns_|setplist_  001071 5a 003051 0000 00 001072 9a 776706 0000 46 lisp_io_control_|open  001073 5a 003050 0000 00 001074 9a 776704 0000 46 lisp_io_control_|in 001075 5a 003047 0000 00 001076 9a 776702 0000 46 lisp_io_control_|out  001077 5a 003046 0000 00 001100 9a 776700 0000 46 lisp_io_fns_|truename  001101 5a 003045 0000 00 001102 9a 776676 0000 46 lisp_|evalhook  001103 5a 003044 0000 00 001104 9a 776674 0000 46 lisp_utils_|fsc 001105 5a 003043 0000 00 001106 9a 776672 0000 46 lisp_utils_|ifix  001107 5a 003042 0000 00 001110 9a 776670 0000 46 lisp_prog_fns_|progv  001111 5a 003041 0000 00 001112 9a 776666 0000 46 lisp_array_fcns_|mapatoms  001113 5a 003040 0000 00 001114 9a 776664 0000 46 lisp_quick_fcns_|symbolp  001115 5a 003037 0000 00 001116 9a 776662 0000 46 lisp_quick_fcns_|filep  001117 5a 003036 0000 00 001120 9a 776660 0000 46 lisp_command_caller_|suspend  001121 5a 003035 0000 00 001122 9a 776656 0000 46 lisp_fault_handler_|ctrl_g_function 001123 5a 003034 0000 00 001124 9a 776654 0000 46 lisp_prog_fns_|unwind_protect  001125 5a 003033 0000 00 001126 9a 776652 0000 46 lisp_|let  001127 5a 003032 0000 00 001130 9a 776650 0000 46 lisp_quick_fcns_|arrayp 001131 5a 003031 0000 00 001132 9a 776646 0000 46 lisp_alloc_|list_star_  001133 5a 003030 0000 00 001134 9a 776644 0000 46 lisp_prog_fns_|eval_when  001135 5a 003027 0000 00 001136 9a 776642 0000 46 lisp_reader_|read_from_string  001137 5a 003026 0000 00 001140 9a 776640 0000 46 lisp_quick_fcns_|prog1  001141 5a 003025 0000 00 001142 9a 776636 0000 46 lisp_quick_fcns_|displace  001143 5a 003024 0000 00 001144 9a 776634 0000 46 lisp_car_cdrs_|nth  001145 5a 003023 0000 00 001146 9a 776632 0000 46 lisp_car_cdrs_|nthcdr  001147 5a 003022 0000 00 001150 9a 776630 0000 46 lisp_io_control_|includef  001151 5a 003021 0000 00 001152 9a 776626 0000 46 signal_|signal_ 001153 5a 003020 0000 00 001154 9a 776624 0000 46 lisp_static_vars_|stack_ptr 001155 5a 003017 0000 00 001156 9a 776622 0000 46 lisp_static_vars_|unmkd_ptr 001157 5a 003016 0000 00 001160 9a 776620 0000 46 lisp_static_vars_|unmkd_ptr 001161 5a 003015 0000 20 001162 9a 776616 0000 46 lisp_subr_tv_|..lisp..  001163 5a 003014 0000 00 001164 9a 776614 0000 46 lisp_static_vars_|stack_ptr 001165 5a 003017 0000 20 001166 9a 776612 0000 46 lisp_static_vars_|MINUS 001167 5a 003013 0000 00 001170 9a 776610 0000 46 lisp_static_vars_|MINUS 001171 5a 003013 0000 20 001172 9a 776606 0000 46 lisp_static_vars_|PLUS  001173 5a 003012 0000 20 001174 9a 776604 0000 46 lisp_static_vars_|args  001175 5a 003011 0000 00 001176 9a 776602 0000 46 lisp_static_vars_|readtable 001177 5a 003010 0000 00 001200 9a 776600 0000 46 lisp_static_vars_|obarray  001201 5a 003007 0000 00 001202 9a 776576 0000 46 lisp_static_vars_|binding_top  001203 5a 003006 0000 00 001204 9a 776574 0000 46 lisp_static_vars_|array 001205 5a 003005 0000 00 001206 9a 776572 0000 46 lisp_static_vars_|ctrlW 001207 5a 003004 0000 00 001210 9a 776570 0000 46 lisp_static_vars_|ctrlR 001211 5a 003003 0000 00 001212 9a 776566 0000 46 lisp_static_vars_|user_intr_array  001213 5a 003002 0000 16 001214 9a 776564 0000 46 lisp_static_vars_|star_rset 001215 5a 003001 0000 20 SYMBOL INFORMATION SYMBOL TABLE HEADER  000000 aa 000000 000001 000001 aa 163171 155142 000002 aa 164162 145145 000003 aa 000000 000004 000004 aa 000000 114732 000005 aa 732732 062314 000006 aa 000000 114775 000007 aa 677423 303141 000010 aa 141154 155040 000011 aa 040040 040040 000012 aa 000024 000040 000013 aa 000034 000040 000014 aa 000044 000100 000015 aa 000002 000002 000016 aa 000064 000000 000017 aa 000000 000712 000020 aa 000000 000201 000021 aa 000000 000521 000022 aa 000700 000201 000023 aa 000064 000000 000024 aa 101114 115040 000025 aa 126145 162163 000026 aa 151157 156040 000027 aa 040066 056067 000030 aa 040040 117143 000031 aa 164157 142145 000032 aa 162040 061071 000033 aa 070066 040040 000034 aa 107112 157150 000035 aa 156163 157156 000036 aa 056123 171163 000037 aa 115141 151156 000040 aa 164056 141040 000041 aa 040040 040040 000042 aa 040040 040040 000043 aa 040040 040040 000044 aa 154151 163164 000045 aa 040040 040040 000046 aa 040040 040040 000047 aa 040040 040040 000050 aa 040040 040040 000051 aa 040040 040040 000052 aa 040040 040040 000053 aa 040040 040040 000054 aa 040040 040040 000055 aa 040040 040040 000056 aa 040040 040040 000057 aa 040040 040040 000060 aa 040040 040040 000061 aa 040040 040040 000062 aa 040040 040040 000063 aa 040040 040040 000064 aa 000000 000001 000065 aa 000000 000005 000066 aa 000112 000062 000067 aa 147740 446323 000070 aa 000000 114774 000071 aa 461265 600000 000072 aa 000127 000066 000073 aa 147714 750316 000074 aa 000000 114774 000075 aa 453561 000000 000076 aa 000145 000041 000077 aa 052721 247134 000100 aa 000000 105272 000101 aa 317215 400000 000102 aa 000156 000047 000103 aa 106701 741731 000104 aa 000000 110670 000105 aa 211444 000000 000106 aa 000170 000044 000107 aa 120017 346605 000110 aa 000000 112002 000111 aa 404115 200000 000112 aa 076163 160145 >special_ldd>install>MR12.0-1206>lisp_subr_tv_.alm  000113 aa 143151 141154 000114 aa 137154 144144 000115 aa 076151 156163 000116 aa 164141 154154 000117 aa 076115 122061 000120 aa 062056 060055 000121 aa 061062 060066 000122 aa 076154 151163 000123 aa 160137 163165 000124 aa 142162 137164 000125 aa 166137 056141 000126 aa 154155 040040 000127 aa 076163 160145 >special_ldd>install>MR12.0-1206>stack_header.incl.alm  000130 aa 143151 141154 000131 aa 137154 144144 000132 aa 076151 156163 000133 aa 164141 154154 000134 aa 076115 122061 000135 aa 062056 060055 000136 aa 061062 060066 000137 aa 076163 164141 000140 aa 143153 137150 000141 aa 145141 144145 000142 aa 162056 151156 000143 aa 143154 056141 000144 aa 154155 040040 000145 aa 076154 144144 >ldd>include>stack_frame.incl.alm  000146 aa 076151 156143 000147 aa 154165 144145 000150 aa 076163 164141 000151 aa 143153 137146 000152 aa 162141 155145 000153 aa 056151 156143 000154 aa 154056 141154 000155 aa 155040 040040 000156 aa 076154 144144 >ldd>include>lisp_object_types.incl.alm 000157 aa 076151 156143 000160 aa 154165 144145 000161 aa 076154 151163 000162 aa 160137 157142 000163 aa 152145 143164 000164 aa 137164 171160 000165 aa 145163 056151 000166 aa 156143 154056 000167 aa 141154 155040 000170 aa 076154 144144 >ldd>include>lisp_stack_seg.incl.alm  000171 aa 076151 156143 000172 aa 154165 144145 000173 aa 076154 151163 000174 aa 160137 163164 000175 aa 141143 153137 000176 aa 163145 147056 000177 aa 151156 143154 000200 aa 056141 154155 MULTICS ASSEMBLY CROSS REFERENCE LISTING Value Symbol Source file Line number  4425 ..lisp.. lisp_subr_tv_: 526, 715, 716.  3073 .._00000 lisp_subr_tv_: 135.  3074 .._00001 lisp_subr_tv_: 136.  3075 .._00002 lisp_subr_tv_: 137.  3077 .._00003 lisp_subr_tv_: 138.  3101 .._00004 lisp_subr_tv_: 139.  3104 .._00005 lisp_subr_tv_: 140.  3106 .._00006 lisp_subr_tv_: 141.  3111 .._00007 lisp_subr_tv_: 142.  3113 .._00010 lisp_subr_tv_: 143.  3116 .._00011 lisp_subr_tv_: 144.  3120 .._00012 lisp_subr_tv_: 145.  3121 .._00013 lisp_subr_tv_: 146.  3122 .._00014 lisp_subr_tv_: 147.  3123 .._00015 lisp_subr_tv_: 148.  3124 .._00016 lisp_subr_tv_: 149.  3125 .._00017 lisp_subr_tv_: 150.  3126 .._00020 lisp_subr_tv_: 151.  3127 .._00021 lisp_subr_tv_: 152.  3130 .._00022 lisp_subr_tv_: 153.  3131 .._00023 lisp_subr_tv_: 154.  3132 .._00024 lisp_subr_tv_: 155.  3133 .._00025 lisp_subr_tv_: 156.  3134 .._00026 lisp_subr_tv_: 157.  3135 .._00027 lisp_subr_tv_: 158.  3137 .._00030 lisp_subr_tv_: 159.  3141 .._00031 lisp_subr_tv_: 160.  3142 .._00032 lisp_subr_tv_: 161.  3143 .._00033 lisp_subr_tv_: 162.  3145 .._00034 lisp_subr_tv_: 163.  3150 .._00035 lisp_subr_tv_: 164.  3153 .._00036 lisp_subr_tv_: 165.  3154 .._00037 lisp_subr_tv_: 166.  3156 .._00040 lisp_subr_tv_: 167.  3160 .._00041 lisp_subr_tv_: 168.  3161 .._00042 lisp_subr_tv_: 169.  3163 .._00043 lisp_subr_tv_: 170.  3165 .._00044 lisp_subr_tv_: 171.  3170 .._00045 lisp_subr_tv_: 172.  3172 .._00046 lisp_subr_tv_: 173.  3174 .._00047 lisp_subr_tv_: 174.  3176 .._00050 lisp_subr_tv_: 175.  3200 .._00051 lisp_subr_tv_: 176.  3202 .._00052 lisp_subr_tv_: 177.  3205 .._00053 lisp_subr_tv_: 178.  3210 .._00054 lisp_subr_tv_: 179.  3213 .._00055 lisp_subr_tv_: 180.  3215 .._00056 lisp_subr_tv_: 181.  3220 .._00057 lisp_subr_tv_: 182.  3222 .._00060 lisp_subr_tv_: 183.  3224 .._00061 lisp_subr_tv_: 184.  3226 .._00062 lisp_subr_tv_: 185.  3230 .._00063 lisp_subr_tv_: 186.  3232 .._00064 lisp_subr_tv_: 187.  3234 .._00065 lisp_subr_tv_: 188.  3236 .._00066 lisp_subr_tv_: 189.  3240 .._00067 lisp_subr_tv_: 190.  3242 .._00070 lisp_subr_tv_: 191.  3244 .._00071 lisp_subr_tv_: 192.  3246 .._00072 lisp_subr_tv_: 193.  3250 .._00073 lisp_subr_tv_: 194.  3252 .._00074 lisp_subr_tv_: 195.  3254 .._00075 lisp_subr_tv_: 196.  3256 .._00076 lisp_subr_tv_: 197.  3260 .._00077 lisp_subr_tv_: 198.  3262 .._00100 lisp_subr_tv_: 199.  3263 .._00101 lisp_subr_tv_: 200.  3265 .._00102 lisp_subr_tv_: 201.  3270 .._00103 lisp_subr_tv_: 202.  3272 .._00104 lisp_subr_tv_: 203.  3274 .._00105 lisp_subr_tv_: 204.  3276 .._00106 lisp_subr_tv_: 205.  3300 .._00107 lisp_subr_tv_: 206.  3302 .._00110 lisp_subr_tv_: 207.  3304 .._00111 lisp_subr_tv_: 208.  3306 .._00112 lisp_subr_tv_: 209.  3310 .._00113 lisp_subr_tv_: 210.  3312 .._00114 lisp_subr_tv_: 211.  3314 .._00115 lisp_subr_tv_: 212.  3316 .._00116 lisp_subr_tv_: 213.  3320 .._00117 lisp_subr_tv_: 214.  3322 .._00120 lisp_subr_tv_: 215.  3324 .._00121 lisp_subr_tv_: 216.  3325 .._00122 lisp_subr_tv_: 217.  3327 .._00123 lisp_subr_tv_: 218.  3331 .._00124 lisp_subr_tv_: 219.  3333 .._00125 lisp_subr_tv_: 220.  3335 .._00126 lisp_subr_tv_: 221.  3337 .._00127 lisp_subr_tv_: 222.  3341 .._00130 lisp_subr_tv_: 223.  3342 .._00131 lisp_subr_tv_: 224.  3344 .._00132 lisp_subr_tv_: 225.  3347 .._00133 lisp_subr_tv_: 226.  3351 .._00134 lisp_subr_tv_: 227.  3353 .._00135 lisp_subr_tv_: 228.  3355 .._00136 lisp_subr_tv_: 229.  3357 .._00137 lisp_subr_tv_: 230.  3361 .._00140 lisp_subr_tv_: 231.  3363 .._00141 lisp_subr_tv_: 232.  3366 .._00142 lisp_subr_tv_: 233.  3367 .._00143 lisp_subr_tv_: 234.  3371 .._00144 lisp_subr_tv_: 235.  3372 .._00145 lisp_subr_tv_: 236.  3374 .._00146 lisp_subr_tv_: 237.  3375 .._00147 lisp_subr_tv_: 238.  3400 .._00150 lisp_subr_tv_: 239.  3403 .._00151 lisp_subr_tv_: 240.  3405 .._00152 lisp_subr_tv_: 241.  3407 .._00153 lisp_subr_tv_: 242.  3412 .._00154 lisp_subr_tv_: 243.  3413 .._00155 lisp_subr_tv_: 244.  3415 .._00156 lisp_subr_tv_: 245.  3420 .._00157 lisp_subr_tv_: 246.  3423 .._00160 lisp_subr_tv_: 247.  3425 .._00161 lisp_subr_tv_: 248.  3427 .._00162 lisp_subr_tv_: 249.  3430 .._00163 lisp_subr_tv_: 250.  3432 .._00164 lisp_subr_tv_: 251.  3434 .._00165 lisp_subr_tv_: 252.  3437 .._00166 lisp_subr_tv_: 253.  3441 .._00167 lisp_subr_tv_: 254.  3443 .._00170 lisp_subr_tv_: 255.  3445 .._00171 lisp_subr_tv_: 256.  3450 .._00172 lisp_subr_tv_: 257.  3451 .._00173 lisp_subr_tv_: 258.  3453 .._00174 lisp_subr_tv_: 259.  3455 .._00175 lisp_subr_tv_: 260.  3456 .._00176 lisp_subr_tv_: 261.  3461 .._00177 lisp_subr_tv_: 262.  3463 .._00200 lisp_subr_tv_: 263.  3464 .._00201 lisp_subr_tv_: 264.  3467 .._00202 lisp_subr_tv_: 265.  3471 .._00203 lisp_subr_tv_: 266.  3473 .._00204 lisp_subr_tv_: 267.  3475 .._00205 lisp_subr_tv_: 268.  3476 .._00206 lisp_subr_tv_: 269.  3477 .._00207 lisp_subr_tv_: 270.  3501 .._00210 lisp_subr_tv_: 271.  3503 .._00211 lisp_subr_tv_: 272.  3505 .._00212 lisp_subr_tv_: 273.  3507 .._00213 lisp_subr_tv_: 274.  3511 .._00214 lisp_subr_tv_: 275.  3513 .._00215 lisp_subr_tv_: 276.  3514 .._00216 lisp_subr_tv_: 277.  3515 .._00217 lisp_subr_tv_: 278.  3520 .._00220 lisp_subr_tv_: 279.  3522 .._00221 lisp_subr_tv_: 280.  3525 .._00222 lisp_subr_tv_: 281.  3531 .._00223 lisp_subr_tv_: 282.  3534 .._00224 lisp_subr_tv_: 283.  3535 .._00225 lisp_subr_tv_: 284.  3537 .._00226 lisp_subr_tv_: 285.  3541 .._00227 lisp_subr_tv_: 286.  3543 .._00230 lisp_subr_tv_: 287.  3545 .._00231 lisp_subr_tv_: 288.  3547 .._00232 lisp_subr_tv_: 289.  3550 .._00233 lisp_subr_tv_: 290.  3552 .._00234 lisp_subr_tv_: 291.  3554 .._00235 lisp_subr_tv_: 292.  3555 .._00236 lisp_subr_tv_: 293.  3557 .._00237 lisp_subr_tv_: 294.  3561 .._00240 lisp_subr_tv_: 295.  3563 .._00241 lisp_subr_tv_: 296.  3565 .._00242 lisp_subr_tv_: 297.  3567 .._00243 lisp_subr_tv_: 298.  3572 .._00244 lisp_subr_tv_: 299.  3574 .._00245 lisp_subr_tv_: 300.  3577 .._00246 lisp_subr_tv_: 301.  3602 .._00247 lisp_subr_tv_: 302.  3604 .._00250 lisp_subr_tv_: 303.  3605 .._00251 lisp_subr_tv_: 304.  3607 .._00252 lisp_subr_tv_: 305.  3612 .._00253 lisp_subr_tv_: 306.  3614 .._00254 lisp_subr_tv_: 307.  3616 .._00255 lisp_subr_tv_: 308.  3620 .._00256 lisp_subr_tv_: 309.  3622 .._00257 lisp_subr_tv_: 310.  3624 .._00260 lisp_subr_tv_: 311.  3626 .._00261 lisp_subr_tv_: 312.  3627 .._00262 lisp_subr_tv_: 313.  3631 .._00263 lisp_subr_tv_: 314.  3633 .._00264 lisp_subr_tv_: 315.  3635 .._00265 lisp_subr_tv_: 316.  3637 .._00266 lisp_subr_tv_: 317.  3641 .._00267 lisp_subr_tv_: 318.  3643 .._00270 lisp_subr_tv_: 319.  3645 .._00271 lisp_subr_tv_: 320.  3647 .._00272 lisp_subr_tv_: 321.  3651 .._00273 lisp_subr_tv_: 322.  3653 .._00274 lisp_subr_tv_: 323.  3655 .._00275 lisp_subr_tv_: 324.  3660 .._00276 lisp_subr_tv_: 325.  3662 .._00277 lisp_subr_tv_: 326.  3664 .._00300 lisp_subr_tv_: 327.  3666 .._00301 lisp_subr_tv_: 328.  3671 .._00302 lisp_subr_tv_: 329.  3674 .._00303 lisp_subr_tv_: 330.  3677 .._00304 lisp_subr_tv_: 331.  3701 .._00305 lisp_subr_tv_: 332.  3703 .._00306 lisp_subr_tv_: 333.  3705 .._00307 lisp_subr_tv_: 334.  3707 .._00310 lisp_subr_tv_: 335.  3711 .._00311 lisp_subr_tv_: 336.  3712 .._00312 lisp_subr_tv_: 337.  3714 .._00313 lisp_subr_tv_: 338.  3716 .._00314 lisp_subr_tv_: 339.  3720 .._00315 lisp_subr_tv_: 340.  3722 .._00316 lisp_subr_tv_: 341.  3724 .._00317 lisp_subr_tv_: 342.  3726 .._00320 lisp_subr_tv_: 343.  3727 .._00321 lisp_subr_tv_: 344.  3731 .._00322 lisp_subr_tv_: 345.  3733 .._00323 lisp_subr_tv_: 346.  3737 .._00324 lisp_subr_tv_: 347.  3741 .._00325 lisp_subr_tv_: 348.  3742 .._00326 lisp_subr_tv_: 349.  3744 .._00327 lisp_subr_tv_: 350.  3747 .._00330 lisp_subr_tv_: 351.  3751 .._00331 lisp_subr_tv_: 352.  3753 .._00332 lisp_subr_tv_: 353.  3755 .._00333 lisp_subr_tv_: 354.  3757 .._00334 lisp_subr_tv_: 355.  3763 .._00335 lisp_subr_tv_: 356.  3765 .._00336 lisp_subr_tv_: 357.  3767 .._00337 lisp_subr_tv_: 358.  3771 .._00340 lisp_subr_tv_: 359.  3773 .._00341 lisp_subr_tv_: 360.  3775 .._00342 lisp_subr_tv_: 361.  3777 .._00343 lisp_subr_tv_: 362.  4001 .._00344 lisp_subr_tv_: 363.  4003 .._00345 lisp_subr_tv_: 364.  4005 .._00346 lisp_subr_tv_: 365.  4007 .._00347 lisp_subr_tv_: 366.  4011 .._00350 lisp_subr_tv_: 367.  4013 .._00351 lisp_subr_tv_: 368.  4014 .._00352 lisp_subr_tv_: 369.  4016 .._00353 lisp_subr_tv_: 370.  4017 .._00354 lisp_subr_tv_: 371.  4021 .._00355 lisp_subr_tv_: 372.  4023 .._00356 lisp_subr_tv_: 373.  4025 .._00357 lisp_subr_tv_: 374.  4030 .._00360 lisp_subr_tv_: 375.  4033 .._00361 lisp_subr_tv_: 376.  4035 .._00362 lisp_subr_tv_: 377.  4037 .._00363 lisp_subr_tv_: 378.  4040 .._00364 lisp_subr_tv_: 379.  4042 .._00365 lisp_subr_tv_: 380.  4045 .._00366 lisp_subr_tv_: 381.  4050 .._00367 lisp_subr_tv_: 382.  4054 .._00370 lisp_subr_tv_: 383.  4057 .._00371 lisp_subr_tv_: 384.  4061 .._00372 lisp_subr_tv_: 385.  4063 .._00373 lisp_subr_tv_: 386.  4065 .._00374 lisp_subr_tv_: 387.  4067 .._00375 lisp_subr_tv_: 388.  4072 .._00376 lisp_subr_tv_: 389.  4075 .._00377 lisp_subr_tv_: 390.  4077 .._00400 lisp_subr_tv_: 391.  4101 .._00401 lisp_subr_tv_: 392.  4103 .._00402 lisp_subr_tv_: 393.  4105 .._00403 lisp_subr_tv_: 394.  4106 .._00404 lisp_subr_tv_: 395.  4111 .._00405 lisp_subr_tv_: 396.  4113 .._00406 lisp_subr_tv_: 397.  4115 .._00407 lisp_subr_tv_: 398.  4117 .._00410 lisp_subr_tv_: 399.  4121 .._00411 lisp_subr_tv_: 400.  4123 .._00412 lisp_subr_tv_: 401.  4126 .._00413 lisp_subr_tv_: 402.  4131 .._00414 lisp_subr_tv_: 403.  4134 .._00415 lisp_subr_tv_: 404.  4136 .._00416 lisp_subr_tv_: 405.  4140 .._00417 lisp_subr_tv_: 406.  4142 .._00420 lisp_subr_tv_: 407.  4144 .._00421 lisp_subr_tv_: 408.  4151 .._00422 lisp_subr_tv_: 409.  4160 .._00423 lisp_subr_tv_: 410.  4167 .._00424 lisp_subr_tv_: 411.  4177 .._00425 lisp_subr_tv_: 412.  4207 .._00426 lisp_subr_tv_: 413.  4217 .._00427 lisp_subr_tv_: 414.  4226 .._00430 lisp_subr_tv_: 415.  4235 .._00431 lisp_subr_tv_: 416.  4245 .._00432 lisp_subr_tv_: 417.  4253 .._00433 lisp_subr_tv_: 418.  4261 .._00434 lisp_subr_tv_: 419.  4264 .._00435 lisp_subr_tv_: 420.  4267 .._00436 lisp_subr_tv_: 421.  4272 .._00437 lisp_subr_tv_: 422.  4275 .._00440 lisp_subr_tv_: 423.  4277 .._00441 lisp_subr_tv_: 424.  4301 .._00442 lisp_subr_tv_: 425.  4304 .._00443 lisp_subr_tv_: 426.  4307 .._00444 lisp_subr_tv_: 427.  4310 .._00445 lisp_subr_tv_: 428.  4311 .._00446 lisp_subr_tv_: 429.  4313 .._00447 lisp_subr_tv_: 430.  4315 .._00450 lisp_subr_tv_: 431.  4320 .._00451 lisp_subr_tv_: 432.  4322 .._00452 lisp_subr_tv_: 433.  4323 .._00453 lisp_subr_tv_: 434.  4324 .._00454 lisp_subr_tv_: 435.  4327 .._00455 lisp_subr_tv_: 436.  4332 .._00456 lisp_subr_tv_: 437.  4333 .._00457 lisp_subr_tv_: 438.  4335 .._00460 lisp_subr_tv_: 439.  4337 .._00461 lisp_subr_tv_: 440.  4342 .._00462 lisp_subr_tv_: 441.  4344 .._00463 lisp_subr_tv_: 442.  4346 .._00464 lisp_subr_tv_: 443.  4350 .._00465 lisp_subr_tv_: 444.  4351 .._00466 lisp_subr_tv_: 445.  4355 .._00467 lisp_subr_tv_: 446.  4356 .._00470 lisp_subr_tv_: 447.  4360 .._00471 lisp_subr_tv_: 448.  4362 .._00472 lisp_subr_tv_: 449.  4365 .._00473 lisp_subr_tv_: 450.  4372 .._00474 lisp_subr_tv_: 451.  4374 .._00475 lisp_subr_tv_: 452.  4377 .._00476 lisp_subr_tv_: 453.  4400 .._00477 lisp_subr_tv_: 454.  4402 .._00500 lisp_subr_tv_: 455.  4404 .._00501 lisp_subr_tv_: 456.  4406 .._00502 lisp_subr_tv_: 457.  4410 .._00503 lisp_subr_tv_: 458.  4412 .._00504 lisp_subr_tv_: 459.  4414 .._00505 lisp_subr_tv_: 460.  4416 .._00506 lisp_subr_tv_: 461.  4420 .._00507 lisp_subr_tv_: 462.  4422 .._00510 lisp_subr_tv_: 463.  152 abs lisp_subr_tv_: 161.  156 add1 lisp_subr_tv_: 162.  add1_fix lisp_subr_tv_: 152.  add1_flo lisp_subr_tv_: 151.  162 alarmclock lisp_subr_tv_: 163.  166 allfiles lisp_subr_tv_: 164.  2066 alloc lisp_subr_tv_: 404.  1676 alphalessp lisp_subr_tv_: 374.  172 and lisp_subr_tv_: 165.  176 append lisp_subr_tv_: 166.  102 append_list_op lisp_stack_seg: 43.  202 apply lisp_subr_tv_: 167.  apply_ lisp_subr_tv_: 167.  206 arg lisp_subr_tv_: 168.  212 args lisp_subr_tv_: 169, 582. 200 Array lisp_object_types: 25.  216 array lisp_subr_tv_: 170, 611, 621.  2176 arraycall lisp_subr_tv_: 422.  222 arraydims lisp_subr_tv_: 171.  2342 arrayp lisp_subr_tv_: 447.  122 array_info_for_store lisp_stack_seg: 51.  126 array_link_snap_opr lisp_stack_seg: 53.  124 array_offset_for_store lisp_stack_seg: 52.  112 array_operator lisp_stack_seg: 47.  10 array_pointer lisp_stack_seg: 10.  226 ascii lisp_subr_tv_: 172.  ascii_alm lisp_subr_tv_: 172.  232 assoc lisp_subr_tv_: 173.  236 assq lisp_subr_tv_: 174.  242 atan lisp_subr_tv_: 175.  246 atom lisp_subr_tv_: 176.  77700 Atomic lisp_object_types: 19.  10000 Atsym lisp_object_types: 18.  2677 autoload_trap lisp_subr_tv_: 418, 502, 556.  262 baktrace lisp_subr_tv_: 179.  252 baktrace1 lisp_subr_tv_: 177.  256 baktrace2 lisp_subr_tv_: 178.  100 begin_list_op lisp_stack_seg: 42.  174 begin_unmkd_stack lisp_stack_seg: 66.  1000 Bignum lisp_object_types: 20.  266 bigp lisp_subr_tv_: 180.  1000 Big_fixed lisp_object_types: 29.  binding_top lisp_subr_tv_: 598, 601, 685.  20 bind_op lisp_stack_seg: 17.  272 bltarray lisp_subr_tv_: 181.  276 boole lisp_subr_tv_: 182.  302 boundp lisp_subr_tv_: 183, 225. 306 break lisp_subr_tv_: 184, 670. 312 caaaar lisp_subr_tv_: 185.  316 caaadr lisp_subr_tv_: 186.  322 caaar lisp_subr_tv_: 187.  326 caadar lisp_subr_tv_: 188.  332 caaddr lisp_subr_tv_: 189.  336 caadr lisp_subr_tv_: 190.  342 caar lisp_subr_tv_: 191.  346 cadaar lisp_subr_tv_: 192.  352 cadadr lisp_subr_tv_: 193.  356 cadar lisp_subr_tv_: 194.  362 caddar lisp_subr_tv_: 195.  366 cadddr lisp_subr_tv_: 196, 458. 372 caddr lisp_subr_tv_: 197, 457. 376 cadr lisp_subr_tv_: 198, 456. 1170 call_offset stack_header: 80.  32 call_op lisp_stack_seg: 22.  402 car lisp_subr_tv_: 199, 455. 406 catch lisp_subr_tv_: 200.  34 catch1_op lisp_stack_seg: 23.  36 catch2_op lisp_stack_seg: 24.  412 catenate lisp_subr_tv_: 201.  416 cdaaar lisp_subr_tv_: 202.  422 cdaadr lisp_subr_tv_: 203.  426 cdaar lisp_subr_tv_: 204.  432 cdadar lisp_subr_tv_: 205.  436 cdaddr lisp_subr_tv_: 206.  442 cdadr lisp_subr_tv_: 207.  446 cdar lisp_subr_tv_: 208.  452 cddaar lisp_subr_tv_: 209.  456 cddadr lisp_subr_tv_: 210.  462 cddar lisp_subr_tv_: 211.  466 cdddar lisp_subr_tv_: 212.  472 cddddr lisp_subr_tv_: 213, 462. 476 cdddr lisp_subr_tv_: 214, 461. 502 cddr lisp_subr_tv_: 215, 460. 506 cdr lisp_subr_tv_: 216, 459. 2032 charpos lisp_subr_tv_: 397.  512 chrct lisp_subr_tv_: 217.  1742 clear_input lisp_subr_tv_: 383.  516 cline lisp_subr_tv_: 218.  522 close lisp_subr_tv_: 219.  526 comment lisp_subr_tv_: 220.  106 compare_op lisp_stack_seg: 45.  532 cond lisp_subr_tv_: 221.  536 cons lisp_subr_tv_: 222.  cons_ lisp_subr_tv_: 222.  72 cons_op lisp_stack_seg: 39.  136 cons_string_op lisp_stack_seg: 57.  2022 copysymbol lisp_subr_tv_: 395.  542 cos lisp_subr_tv_: 223.  132 create_array_desc_op lisp_stack_seg: 55.  130 create_string_desc_op lisp_stack_seg: 54.  140 create_varying_string_op lisp_stack_seg: 58. 136 CtoI lisp_subr_tv_: 158.  ctrlR lisp_subr_tv_: 639.  ctrlW lisp_subr_tv_: 635.  2326 ctrl_g lisp_subr_tv_: 444.  ctrl_g_function lisp_subr_tv_: 444.  1732 cursorpos lisp_subr_tv_: 381.  114 dead_array_operator lisp_stack_seg: 48.  546 declare lisp_subr_tv_: 224.  2062 defaultf lisp_subr_tv_: 403.  552 definedp lisp_subr_tv_: 225.  556 defprop lisp_subr_tv_: 226.  562 defsubr lisp_subr_tv_: 227.  566 defun lisp_subr_tv_: 228.  572 delete lisp_subr_tv_: 229.  576 deletef lisp_subr_tv_: 230.  602 delq lisp_subr_tv_: 231.  606 difference lisp_subr_tv_: 138, 232. diff_fix lisp_subr_tv_: 148.  diff_flo lisp_subr_tv_: 147.  2366 displace lisp_subr_tv_: 452.  76 div_ lisp_subr_tv_: 150.  72 div_flt lisp_subr_tv_: 149.  612 do lisp_subr_tv_: 233.  2216 dumparrays lisp_subr_tv_: 426.  2052 endpagefn lisp_subr_tv_: 401.  1174 entry_offset stack_header: 84.  616 eoffn lisp_subr_tv_: 234.  622 eq lisp_subr_tv_: 235.  eql_ lisp_subr_tv_: 156.  126 eqn_ lisp_subr_tv_: 156.  626 equal lisp_subr_tv_: 236.  632 err lisp_subr_tv_: 237.  636 errframe lisp_subr_tv_: 238.  1722 error lisp_subr_tv_: 379.  642 errprint lisp_subr_tv_: 239, 649. 646 errset lisp_subr_tv_: 240.  24 errset1_op lisp_stack_seg: 19.  26 errset2_op lisp_stack_seg: 20.  2106 err_1 lisp_subr_tv_: 408.  2136 err_10 lisp_subr_tv_: 414.  2142 err_11 lisp_subr_tv_: 415.  2146 err_12 lisp_subr_tv_: 416.  2156 err_18 lisp_subr_tv_: 418.  2152 err_19 lisp_subr_tv_: 417.  2112 err_5 lisp_subr_tv_: 409.  2116 err_6 lisp_subr_tv_: 410.  2122 err_7 lisp_subr_tv_: 411.  2126 err_8 lisp_subr_tv_: 412.  2132 err_9 lisp_subr_tv_: 413.  2703 err_break lisp_subr_tv_: 408, 409, 410, 411, 412, 413, 414, 415, 416, 563. 3020 err_break_no_errprint lisp_subr_tv_: 632, 659. 64 err_op lisp_stack_seg: 36.  652 eval lisp_subr_tv_: 241.  656 evalframe lisp_subr_tv_: 242.  2266 evalhook lisp_subr_tv_: 436.  eval_ lisp_subr_tv_: 241.  2352 eval_when lisp_subr_tv_: 449.  662 exp lisp_subr_tv_: 243.  666 explode lisp_subr_tv_: 244.  672 explodec lisp_subr_tv_: 245.  676 exploden lisp_subr_tv_: 246.  702 expt lisp_subr_tv_: 247.  2222 expt_fix lisp_subr_tv_: 427.  expt_flo lisp_subr_tv_: 428.  2226 expt_flt lisp_subr_tv_: 428.  100 File lisp_object_types: 30.  2316 filep lisp_subr_tv_: 442.  706 filepos lisp_subr_tv_: 248.  1766 fillarray lisp_subr_tv_: 388.  2402 first lisp_subr_tv_: 455.  40000 Fixed lisp_object_types: 15.  712 fix lisp_subr_tv_: 249.  2016 fixgcd lisp_subr_tv_: 394.  40047 fixnum_type lisp_subr_tv_: 550,  lisp_object_types: 34.  716 fixp lisp_subr_tv_: 250.  722 flatc lisp_subr_tv_: 251.  726 flatsize lisp_subr_tv_: 252.  20000 Float lisp_object_types: 16.  732 float lisp_subr_tv_: 253.  120 floating_store_operator lisp_stack_seg: 50.  736 floatp lisp_subr_tv_: 254.  20047 flonum_type lisp_object_types: 35.  1736 force_output lisp_subr_tv_: 382.  2416 fourth lisp_subr_tv_: 458.  742 freturn lisp_subr_tv_: 255.  2272 fsc lisp_subr_tv_: 437.  2 fsubr lisp_subr_tv_: 56, 139, 165, 170, 184, 200, 220, 221, 224, 226, 228,  233, 237, 240, 256, 258, 263, 268, 269, 312, 319, 323,  342, 345, 347, 352, 353, 354, 365, 402, 420, 421, 422,  439, 445, 446, 449. 2006 funcall lisp_subr_tv_: 392.  746 function lisp_subr_tv_: 256.  752 gc lisp_subr_tv_: 257.  1716 gcd lisp_subr_tv_: 378.  gcsubr lisp_subr_tv_: 257.  756 gctwa lisp_subr_tv_: 258.  762 gensym lisp_subr_tv_: 259.  gensym_ lisp_subr_tv_: 259.  42 gensym_data lisp_stack_seg: 26.  766 get lisp_subr_tv_: 260, 613, 623.  1706 getchar lisp_subr_tv_: 376.  2162 getcharn lisp_subr_tv_: 419.  776 getl lisp_subr_tv_: 262.  getl_ lisp_subr_tv_: 262.  get_ lisp_subr_tv_: 260.  772 get_pname lisp_subr_tv_: 261.  1002 go lisp_subr_tv_: 263.  1006 greaterp lisp_subr_tv_: 264.  132 gt_ lisp_subr_tv_: 157.  1746 haipart lisp_subr_tv_: 384.  1752 haulong lisp_subr_tv_: 385.  2276 ifix lisp_subr_tv_: 438.  2072 implode lisp_subr_tv_: 405.  2252 in lisp_subr_tv_: 433.  2442 includef lisp_subr_tv_: 463.  Index lisp_subr_tv_: 265.  1012 index lisp_subr_tv_: 265.  1016 inpush lisp_subr_tv_: 266.  1022 intern lisp_subr_tv_: 267.  16 in_pl1_code lisp_subr_tv_: 522, 537, lisp_stack_seg: 13.  1026 ioc lisp_subr_tv_: 268.  1032 iog lisp_subr_tv_: 269.  46 iogbind_op lisp_stack_seg: 29.  150 irest_return_op lisp_stack_seg: 62.  1036 isqrt lisp_subr_tv_: 270.  142 ItoC lisp_subr_tv_: 159.  1042 last lisp_subr_tv_: 271.  1046 length lisp_subr_tv_: 272.  1052 lessp lisp_subr_tv_: 273.  2336 let lisp_subr_tv_: 446.  1056 linel lisp_subr_tv_: 274.  2036 linenum lisp_subr_tv_: 398.  110 link_opr lisp_stack_seg: 46.  lisp lisp_subr_tv_: 322, 342. lisp_ lisp_subr_tv_: 139, 167, 168, 241, 263, 283, 284, 285, 286, 287, 288,  304, 334, 344, 390, 392, 420, 421, 422, 429, 436, 446.  lisp_alloc_ lisp_subr_tv_: 166, 183, 222, 225, 259, 275, 282, 296, 297, 305, 335,  358, 360, 372, 395, 407, 423, 424, 448. lisp_array_fcns_ lisp_subr_tv_: 137, 141, 170, 171, 181, 386, 387, 388, 389, 440. lisp_baktrace_ lisp_subr_tv_: 177, 178, 179.  lisp_bignums_ lisp_subr_tv_: 138, 140, 160, 161, 162, 232, 247, 249, 253, 264, 273,  289, 292, 293, 294, 313, 314, 324, 330, 357, 367, 378,  384, 385. lisp_car_cdrs_ lisp_subr_tv_: 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 195,  196, 197, 198, 199, 202, 203, 204, 205, 206, 207, 208,  209, 210, 211, 212, 213, 214, 215, 216, 256, 323, 453,  454, 455, 456, 457, 458, 459, 460, 461, 462.  lisp_char_fns_ lisp_subr_tv_: 158, 159, 201, 261, 265, 278, 355, 361, 362.  lisp_command_caller_ lisp_subr_tv_: 218, 443. lisp_define_ lisp_subr_tv_: 226, 228. lisp_defsubr_ lisp_subr_tv_: 169, 227, 363.  lisp_error_ lisp_subr_tv_: 237, 238, 239, 242, 255, 379. lisp_fault_handler_ lisp_subr_tv_: 163, 268, 269, 301, 444.  lisp_garbage_collector_ lisp_subr_tv_: 257.  lisp_io_control_ lisp_subr_tv_: 219, 230, 295, 309, 310, 311, 333, 382, 383, 402, 432,  433, 434, 463.  lisp_io_fns_ lisp_subr_tv_: 164, 234, 248, 266, 298, 299, 300, 346, 381, 401, 403, 435. lisp_loadumparrays_ lisp_subr_tv_: 425, 426. lisp_load_ lisp_subr_tv_: 396.  lisp_obarray_utils_ lisp_subr_tv_: 267, 280, 331.  lisp_oprs_ lisp_subr_tv_: 354.  lisp_print_ lisp_subr_tv_: 244, 245, 246, 251, 252, 315, 316, 317, 364.  lisp_prog_fns_ lisp_subr_tv_: 184, 200, 233, 240, 319, 365, 439, 445, 449.  lisp_property_fns_ lisp_subr_tv_: 260, 262, 321, 332, 430, 431. 77700 lisp_ptr.type lisp_object_types: 13.  lisp_quick_fcns_ lisp_subr_tv_: 165, 173, 174, 176, 180, 220, 221, 224, 229, 231, 235,  236, 250, 254, 271, 272, 290, 291, 303, 306, 307, 308,  312, 318, 320, 325, 337, 338, 339, 340, 341, 343, 345,  350, 356, 359, 373, 374, 375, 376, 419, 441, 442, 447,  451, 452. lisp_reader_ lisp_subr_tv_: 279, 281, 326, 328, 329, 405, 450.  lisp_reader_alm_ lisp_subr_tv_: 172, 217, 274, 327, 368, 369, 370, 393, 397, 398, 399, 400. lisp_static_vars_ lisp_subr_tv_: 520, 521, 525, 534, 535, 536, 577, 579, 581, 582, 586,  590, 598, 601, 609, 611, 618, 621, 635, 639, 667, 685, 700. lisp_status_fns_ lisp_subr_tv_: 142, 143, 144, 258, 302, 352, 353, 366, 380, 404. 2 lisp_subr_tv_ lisp_subr_tv_: 59, 133, 135, 136, 137, 138, 139, 140, 141, 142, 143,  144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154,  155, 156, 157, 158, 159, 160, 161, 162, 163, 164, 165,  166, 167, 168, 169, 170, 171, 172, 173, 174, 175, 176,  177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187,  188, 189, 190, 191, 192, 193, 194, 195, 196, 197, 198,  199, 200, 201, 202, 203, 204, 205, 206, 207, 208, 209,  210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220,  221, 222, 223, 224, 225, 226, 227, 228, 229, 230, 231,  232, 233, 234, 235, 236, 237, 238, 239, 240, 241, 242,  243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253,  254, 255, 256, 257, 258, 259, 260, 261, 262, 263, 264,  265, 266, 267, 268, 269, 270, 271, 272, 273, 274, 275,  276, 277, 278, 279, 280, 281, 282, 283, 284, 285, 286,  287, 288, 289, 290, 291, 292, 293, 294, 295, 296, 297,  298, 299, 300, 301, 302, 303, 304, 305, 306, 307, 308,  309, 310, 311, 312, 313, 314, 315, 316, 317, 318, 319,  320, 321, 322, 323, 324, 325, 326, 327, 328, 329, 330,  331, 332, 333, 334, 335, 336, 337, 338, 339, 340, 341,  342, 343, 344, 345, 346, 347, 348, 349, 350, 351, 352,  353, 354, 355, 356, 357, 358, 359, 360, 361, 362, 363,  364, 365, 366, 367, 368, 369, 370, 371, 372, 373, 374,  375, 376, 377, 378, 379, 380, 381, 382, 383, 384, 385,  386, 387, 388, 389, 390, 391, 392, 393, 394, 395, 396,  397, 398, 399, 400, 401, 402, 403, 404, 405, 406, 407,  408, 409, 410, 411, 412, 413, 414, 415, 416, 417, 418,  419, 420, 421, 422, 423, 424, 425, 426, 427, 428, 429,  430, 431, 432, 433, 434, 435, 436, 437, 438, 439, 440,  441, 442, 443, 444, 445, 446, 447, 448, 449, 450, 451,  452, 453, 454, 455, 456, 457, 458, 459, 460, 461, 462,  463, 526. lisp_trig_ lisp_subr_tv_: 175, 223, 243, 270, 276, 348, 349, 351. lisp_utils_ lisp_subr_tv_: 135, 136, 145, 146, 147, 148, 149, 150, 151, 152, 153,  154, 155, 156, 157, 182, 277, 336, 347, 371, 377, 394,  427, 428, 437, 438. 1062 list lisp_subr_tv_: 275.  1772 listarray lisp_subr_tv_: 389.  2012 listen lisp_subr_tv_: 393.  1776 listify lisp_subr_tv_: 390.  list_ lisp_subr_tv_: 275.  2346 list_star lisp_subr_tv_: 448.  list_star_ lisp_subr_tv_: 448.  2026 load lisp_subr_tv_: 396, 560. 2212 loadarrays lisp_subr_tv_: 425.  1066 log lisp_subr_tv_: 276.  1072 lsh lisp_subr_tv_: 277.  1 lsubr lisp_subr_tv_: 55, 135, 136, 137, 138, 140, 141, 143, 144, 145, 146,  147, 148, 149, 150, 166, 167, 169, 175, 177, 178, 179,  182, 201, 217, 227, 229, 231, 232, 234, 241, 248, 259,  264, 273, 274, 275, 283, 284, 285, 286, 287, 288, 289,  292, 295, 296, 299, 313, 315, 316, 317, 318, 320, 324,  325, 326, 327, 329, 362, 364, 367, 368, 369, 370, 379,  381, 389, 392, 397, 398, 399, 400, 401, 432, 440, 448, 451. 2172 lsubrcall lisp_subr_tv_: 421.  122 ls_ lisp_subr_tv_: 155.  1076 make_atom lisp_subr_tv_: 278.  1102 maknam lisp_subr_tv_: 279.  2202 maknum lisp_subr_tv_: 423.  1106 makoblist lisp_subr_tv_: 280.  1112 makreadtable lisp_subr_tv_: 281.  1116 makunbound lisp_subr_tv_: 282.  1122 map lisp_subr_tv_: 283.  2306 mapatoms lisp_subr_tv_: 440.  1126 mapc lisp_subr_tv_: 284.  1132 mapcan lisp_subr_tv_: 285.  1136 mapcar lisp_subr_tv_: 286.  1142 mapcon lisp_subr_tv_: 287.  1146 maplist lisp_subr_tv_: 288.  0 marked_stack_bottom lisp_stack_seg: 6.  1152 max lisp_subr_tv_: 289.  1156 member lisp_subr_tv_: 290.  1162 memq lisp_subr_tv_: 291.  1202 mergef lisp_subr_tv_: 295.  MINUS lisp_subr_tv_: 577, 579. 1166 min lisp_subr_tv_: 292.  1172 minus lisp_subr_tv_: 293.  1176 minusp lisp_subr_tv_: 294.  66 mns_ lisp_subr_tv_: 148.  62 mns_flt lisp_subr_tv_: 147.  2206 munkam lisp_subr_tv_: 424.  1216 namelist lisp_subr_tv_: 298.  3073 Names lisp_subr_tv_: 135, 136, 137, 138, 139, 140, 141, 142, 143, 144, 145,  146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156,  157, 158, 159, 160, 161, 162, 163, 164, 165, 166, 167,  168, 169, 170, 171, 172, 173, 174, 175, 176, 177, 178,  179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189,  190, 191, 192, 193, 194, 195, 196, 197, 198, 199, 200,  201, 202, 203, 204, 205, 206, 207, 208, 209, 210, 211,  212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222,  223, 224, 225, 226, 227, 228, 229, 230, 231, 232, 233,  234, 235, 236, 237, 238, 239, 240, 241, 242, 243, 244,  245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255,  256, 257, 258, 259, 260, 261, 262, 263, 264, 265, 266,  267, 268, 269, 270, 271, 272, 273, 274, 275, 276, 277,  278, 279, 280, 281, 282, 283, 284, 285, 286, 287, 288,  289, 290, 291, 292, 293, 294, 295, 296, 297, 298, 299,  300, 301, 302, 303, 304, 305, 306, 307, 308, 309, 310,  311, 312, 313, 314, 315, 316, 317, 318, 319, 320, 321,  322, 323, 324, 325, 326, 327, 328, 329, 330, 331, 332,  333, 334, 335, 336, 337, 338, 339, 340, 341, 342, 343,  344, 345, 346, 347, 348, 349, 350, 351, 352, 353, 354,  355, 356, 357, 358, 359, 360, 361, 362, 363, 364, 365,  366, 367, 368, 369, 370, 371, 372, 373, 374, 375, 376,  377, 378, 379, 380, 381, 382, 383, 384, 385, 386, 387,  388, 389, 390, 391, 392, 393, 394, 395, 396, 397, 398,  399, 400, 401, 402, 403, 404, 405, 406, 407, 408, 409,  410, 411, 412, 413, 414, 415, 416, 417, 418, 419, 420,  421, 422, 423, 424, 425, 426, 427, 428, 429, 430, 431,  432, 433, 434, 435, 436, 437, 438, 439, 440, 441, 442,  443, 444, 445, 446, 447, 448, 449, 450, 451, 452, 453,  454, 455, 456, 457, 458, 459, 460, 461, 462, 463, 714, 724. 1222 names lisp_subr_tv_: 299.  1226 namestring lisp_subr_tv_: 300.  1206 nconc lisp_subr_tv_: 296.  1212 ncons lisp_subr_tv_: 297, 663. ncons_ lisp_subr_tv_: 297.  74 ncons_op lisp_stack_seg: 40.  12 nil lisp_subr_tv_: 614, 624, 645, 701, lisp_stack_seg: 11.  1232 nointerrupt lisp_subr_tv_: 301.  1236 noret lisp_subr_tv_: 302.  1242 not lisp_subr_tv_: 303.  1246 nouuo lisp_subr_tv_: 304.  2102 nreconc lisp_subr_tv_: 407.  nreconc_ lisp_subr_tv_: 407.  1252 nreverse lisp_subr_tv_: 305.  nreverse_ lisp_subr_tv_: 305.  2372 nth lisp_subr_tv_: 453.  2376 nthcdr lisp_subr_tv_: 454.  1256 null lisp_subr_tv_: 303, 306. 2623 null_argl lisp_subr_tv_: 504, 528. 1262 numberp lisp_subr_tv_: 307.  61400 Numeric lisp_object_types: 17.  obarray lisp_subr_tv_: 590, 618. 1266 oddp lisp_subr_tv_: 308.  116 one_mns lisp_subr_tv_: 154.  112 one_mns_flt lisp_subr_tv_: 153.  106 one_pls lisp_subr_tv_: 152.  102 one_pls_flt lisp_subr_tv_: 151.  2246 open lisp_subr_tv_: 432.  1272 opena lisp_subr_tv_: 309.  1276 openi lisp_subr_tv_: 310.  1302 openo lisp_subr_tv_: 311.  1306 or lisp_subr_tv_: 312.  2256 out lisp_subr_tv_: 434.  2046 pagel lisp_subr_tv_: 400.  2042 pagenum lisp_subr_tv_: 399.  pdlframe lisp_subr_tv_: 242.  2056 percent_include lisp_subr_tv_: 402.  152 pl1_call_nopop_op lisp_stack_seg: 63.  134 pl1_call_op lisp_stack_seg: 56.  2632 pl1_fixup lisp_subr_tv_: 142, 158, 159, 163, 164, 170, 171, 181, 184, 200, 218,  219, 223, 226, 228, 230, 233, 237, 238, 239, 240, 242,  243, 244, 245, 246, 251, 252, 255, 257, 258, 261, 265,  266, 267, 268, 269, 270, 276, 278, 279, 280, 281, 298,  300, 301, 302, 309, 310, 311, 319, 322, 328, 331, 333,  342, 346, 348, 349, 351, 352, 353, 355, 361, 363, 365,  366, 380, 382, 383, 386, 387, 388, 396, 402, 403, 404,  405, 425, 426, 433, 434, 435, 439, 443, 444, 445, 449,  450, 463, 513, 552. 66 pl1_interface lisp_stack_seg: 37.  2671 pl1_lsubr_fixup lisp_subr_tv_: 137, 141, 143, 144, 169, 175, 177, 178, 179, 201, 227,  234, 248, 295, 299, 315, 316, 317, 326, 329, 362, 364,  379, 381, 389, 401, 432, 440, 545.  70 pl1_lsubr_interface lisp_stack_seg: 38.  2236 plist lisp_subr_tv_: 430.  plist_ lisp_subr_tv_: 430.  56 pls_ lisp_subr_tv_: 146.  52 pls_flt lisp_subr_tv_: 145.  PLUS lisp_subr_tv_: 581.  1312 plus lisp_subr_tv_: 313.  1316 plusp lisp_subr_tv_: 314.  plus_fix lisp_subr_tv_: 146.  plus_flo lisp_subr_tv_: 145.  1322 prin1 lisp_subr_tv_: 315.  prin1_ lisp_subr_tv_: 315.  1326 princ lisp_subr_tv_: 316.  princ_ lisp_subr_tv_: 316.  1332 print lisp_subr_tv_: 317.  print_ lisp_subr_tv_: 317.  1342 prog lisp_subr_tv_: 319.  2362 prog1 lisp_subr_tv_: 451.  1336 prog2 lisp_subr_tv_: 318.  1346 progn lisp_subr_tv_: 320.  2302 progv lisp_subr_tv_: 439.  2076 purcopy lisp_subr_tv_: 406.  2620 purcopy_code lisp_subr_tv_: 406, 496, 497.  1171 push_offset stack_header: 81.  1352 putprop lisp_subr_tv_: 321.  putprop_ lisp_subr_tv_: 321.  2002 quikload lisp_subr_tv_: 391.  1356 quit lisp_subr_tv_: 322.  1362 quote lisp_subr_tv_: 256, 323. 1366 quotient lisp_subr_tv_: 140, 324. quot_fix lisp_subr_tv_: 150.  quot_flo lisp_subr_tv_: 149.  1372 random lisp_subr_tv_: 325.  154 rcv_char_star_op lisp_stack_seg: 64.  1376 read lisp_subr_tv_: 326.  1402 readch lisp_subr_tv_: 327.  1412 readline lisp_subr_tv_: 329.  1406 readlist lisp_subr_tv_: 328.  readstring lisp_subr_tv_: 329.  readtable lisp_subr_tv_: 586, 609. 2356 read_from_string lisp_subr_tv_: 450.  1416 remainder lisp_subr_tv_: 160, 330. 1422 remob lisp_subr_tv_: 331.  1426 remprop lisp_subr_tv_: 332.  remprop_ lisp_subr_tv_: 332.  146 rem_ lisp_subr_tv_: 160.  1432 rename lisp_subr_tv_: 333.  2422 rest1 lisp_subr_tv_: 459.  2426 rest2 lisp_subr_tv_: 460.  2432 rest3 lisp_subr_tv_: 461.  2436 rest4 lisp_subr_tv_: 462.  1436 return lisp_subr_tv_: 334.  1173 return_no_pop_offset stack_header: 83.  1172 return_offset stack_header: 82.  62 return_op lisp_stack_seg: 35.  1442 reverse lisp_subr_tv_: 335.  1446 rot lisp_subr_tv_: 336.  1452 rplaca lisp_subr_tv_: 337.  1456 rplacd lisp_subr_tv_: 338.  rset lisp_subr_tv_: 142.  1462 runtime lisp_subr_tv_: 339.  1702 samepnamep lisp_subr_tv_: 375.  1466 sassoc lisp_subr_tv_: 340.  1472 sassq lisp_subr_tv_: 341.  1476 save lisp_subr_tv_: 342.  2406 second lisp_subr_tv_: 456.  1502 set lisp_subr_tv_: 343.  1506 setarg lisp_subr_tv_: 344.  2242 setplist lisp_subr_tv_: 431.  setplist_ lisp_subr_tv_: 431.  1512 setq lisp_subr_tv_: 345.  1726 setsyntax lisp_subr_tv_: 380.  1516 shortnamestring lisp_subr_tv_: 346.  signal_ lisp_subr_tv_: 479.  1522 signp lisp_subr_tv_: 347.  56 signp_op lisp_stack_seg: 33.  1526 sin lisp_subr_tv_: 348.  1532 sleep lisp_subr_tv_: 349.  1536 smallnump lisp_subr_tv_: 350.  1756 sort lisp_subr_tv_: 386.  1762 sortcar lisp_subr_tv_: 387.  1542 sqrt lisp_subr_tv_: 351.  1546 sstatus lisp_subr_tv_: 352.  sstatus_ lisp_subr_tv_: 143.  73 stach_header.trace_top_ptr stack_header: 62. 32 stack_frame.arg_ptr stack_frame: 16. 100 stack_frame.condition_bit stack_frame: 32.  20 stack_frame.condition_word stack_frame: 9.  2000 stack_frame.crawl_out_bit stack_frame: 28.  26 stack_frame.entry_ptr lisp_subr_tv_: 527,  stack_frame: 13. 20 stack_frame.flag_word stack_frame: 24. 400 stack_frame.link_trap_bit stack_frame: 30.  30 stack_frame.lp_ptr stack_frame: 15. 20000 stack_frame.main_proc_bit stack_frame: 25.  60 stack_frame.min_length stack_frame: 23. 22 stack_frame.next_sp stack_frame: 10. 36 stack_frame.on_unit_rel_ptrs stack_frame: 19.  30 stack_frame.operator_ptr stack_frame: 14.  37 stack_frame.operator_ret_ptr stack_frame: 20.  20 stack_frame.prev_sp stack_frame: 8. 40 stack_frame.regs stack_frame: 22. 24 stack_frame.return_ptr stack_frame: 12. 10000 stack_frame.run_unit_manager stack_frame: 26.  1000 stack_frame.signaller_bit stack_frame: 29.  22 stack_frame.signaller_word stack_frame: 11.  4000 stack_frame.signal_bit stack_frame: 27. 34 stack_frame.static_ptr stack_frame: 17. 200 stack_frame.support_bit stack_frame: 31. 35 stack_frame.support_ptr stack_frame: 18. 37 stack_frame.translator_id stack_frame: 21.  66 stack_header.assign_linkage_ptr stack_header: 59.  32 stack_header.bar_mode_sp stack_header: 42. 36 stack_header.call_op_ptr stack_header: 44. 10 stack_header.clr_ptr stack_header: 27.  6 stack_header.combined_stat_ptr stack_header: 25.  4 stack_header.cpm_data_ptr stack_header: 24. 13 stack_header.cpm_enabled stack_header: 32. 13 stack_header.cur_lot_size stack_header: 31. 64 stack_header.ect_ptr stack_header: 58.  46 stack_header.entry_op_ptr stack_header: 49. 70 stack_header.heap_header_ptr stack_header: 60. 74 stack_header.in_trace stack_header: 63.  52 stack_header.isot_ptr stack_header: 52.  26 stack_header.lot_ptr stack_header: 39.  12 stack_header.main_proc_invoked stack_header: 29.  12 stack_header.max_lot_size stack_header: 28. 20 stack_header.parent_ptr stack_header: 36.  34 stack_header.pl1_operators_ptr stack_header: 43.  40 stack_header.push_op_ptr stack_header: 46. 42 stack_header.return_op_ptr stack_header: 47. 44 stack_header.ret_no_pop_op_ptr stack_header: 48.  62 stack_header.rnt_ptr stack_header: 57.  12 stack_header.run_unit_depth stack_header: 30. 54 stack_header.sct_ptr stack_header: 53.  30 stack_header.signal_ptr stack_header: 41.  22 stack_header.stack_begin_ptr stack_header: 37. 24 stack_header.stack_end_ptr lisp_subr_tv_: 531, stack_header: 38. 14 stack_header.system_free_ptr stack_header: 33. 60 stack_header.sys_link_info_ptr stack_header: 56.  72 stack_header.trace_frames stack_header: 61. 50 stack_header.trans_op_tv_ptr stack_header: 51. 56 stack_header.unwinder_ptr stack_header: 54. 16 stack_header.user_free_ptr stack_header: 34. 100 stack_header_end stack_header: 64.  stack_ptr lisp_subr_tv_: 520, 534. 4 stack_ptr_ptr lisp_stack_seg: 8.  6 star_ lisp_subr_tv_: 136.  12 star_array lisp_subr_tv_: 137.  16 star_dif lisp_subr_tv_: 138.  2 star_flt lisp_subr_tv_: 135.  22 star_function lisp_subr_tv_: 139.  26 star_quo lisp_subr_tv_: 140.  32 star_rearray lisp_subr_tv_: 141.  36 star_rset lisp_subr_tv_: 142, 700. 2707 star_rset_break lisp_subr_tv_: 572, 702. 3055 star_rset_trap lisp_subr_tv_: 417, 502, 694.  3072 star_rset_trap_control_word lisp_subr_tv_: 695, 711.  42 star_sstatus lisp_subr_tv_: 143.  46 star_status lisp_subr_tv_: 144.  1552 status lisp_subr_tv_: 353.  status_ lisp_subr_tv_: 144.  stfunction lisp_subr_tv_: 139.  1556 store lisp_subr_tv_: 354.  116 store_operator lisp_stack_seg: 49.  4000 String lisp_object_types: 22.  1562 stringlength lisp_subr_tv_: 355.  1566 stringp lisp_subr_tv_: 356.  1572 sub1 lisp_subr_tv_: 357.  sub1_fix lisp_subr_tv_: 154.  sub1_flo lisp_subr_tv_: 153.  1576 sublis lisp_subr_tv_: 358.  2000 Subr lisp_object_types: 23.  0 subr lisp_subr_tv_: 54, 142, 151, 152, 153, 154, 155, 156, 157, 158, 159,  160, 161, 162, 163, 164, 168, 171, 172, 173, 174, 176,  180, 181, 183, 185, 186, 187, 188, 189, 190, 191, 192,  193, 194, 195, 196, 197, 198, 199, 202, 203, 204, 205,  206, 207, 208, 209, 210, 211, 212, 213, 214, 215, 216,  218, 219, 222, 223, 225, 230, 235, 236, 238, 239, 242,  243, 244, 245, 246, 247, 249, 250, 251, 252, 253, 254,  255, 257, 260, 261, 262, 265, 266, 267, 270, 271, 272,  276, 277, 278, 279, 280, 281, 282, 290, 291, 293, 294,  297, 298, 300, 301, 302, 303, 304, 305, 306, 307, 308,  309, 310, 311, 314, 321, 322, 328, 330, 331, 332, 333,  334, 335, 336, 337, 338, 339, 340, 341, 343, 344, 346,  348, 349, 350, 351, 355, 356, 357, 358, 359, 360, 361,  363, 366, 371, 372, 373, 374, 375, 376, 377, 378, 380,  382, 383, 384, 385, 386, 387, 388, 390, 393, 394, 395,  396, 403, 404, 405, 406, 407, 417, 418, 419, 423, 424,  425, 426, 427, 428, 429, 430, 431, 433, 434, 435, 436,  437, 438, 441, 442, 443, 444, 447, 450, 452, 453, 454,  455, 456, 457, 458, 459, 460, 461, 462, 463.  2166 subrcall lisp_subr_tv_: 420.  1602 subrp lisp_subr_tv_: 359.  1606 subst lisp_subr_tv_: 360.  Substr lisp_subr_tv_: 362.  1616 substr lisp_subr_tv_: 362.  Substr2 lisp_subr_tv_: 361.  1612 substr2 lisp_subr_tv_: 361.  subst_ lisp_subr_tv_: 360.  2322 suspend lisp_subr_tv_: 443.  1712 sxhash lisp_subr_tv_: 377.  2312 symbolp lisp_subr_tv_: 441.  2232 symeval lisp_subr_tv_: 429.  1622 sysp lisp_subr_tv_: 363.  44 system_lp lisp_subr_tv_: 510, 519, 570, 699, lisp_stack_seg: 28.  400 System_Subr lisp_object_types: 24.  104 terminate_list_op lisp_stack_seg: 44.  1626 terpri lisp_subr_tv_: 364.  2412 third lisp_subr_tv_: 457.  1632 throw lisp_subr_tv_: 365.  52 throw1_op lisp_stack_seg: 31.  54 throw2_op lisp_stack_seg: 32.  1636 time lisp_subr_tv_: 366.  1642 times lisp_subr_tv_: 367.  times_fix lisp_subr_tv_: 136.  times_flo lisp_subr_tv_: 135.  0 trace_frames.count stack_header: 69.  1 trace_frames.top_ptr stack_header: 70.  2576 trap_argl lisp_subr_tv_: 478, 482. 2612 trap_cname lisp_subr_tv_: 484, 494. 2610 trap_nullptr lisp_subr_tv_: 486, 492. 2566 trap_out_unimp lisp_subr_tv_: 472, 473, 475.  2570 trap_out_unimp_1 lisp_subr_tv_: 477, 480. 14 true lisp_subr_tv_: 661,  lisp_stack_seg: 12.  2262 truename lisp_subr_tv_: 435.  0 tv lisp_subr_tv_: 62, 135, 136, 137, 138, 139, 140, 141, 142, 143, 144,  145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155,  156, 157, 158, 159, 160, 161, 162, 163, 164, 165, 166,  167, 168, 169, 170, 171, 172, 173, 174, 175, 176, 177,  178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188,  189, 190, 191, 192, 193, 194, 195, 196, 197, 198, 199,  200, 201, 202, 203, 204, 205, 206, 207, 208, 209, 210,  211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221,  222, 223, 224, 225, 226, 227, 228, 229, 230, 231, 232,  233, 234, 235, 236, 237, 238, 239, 240, 241, 242, 243,  244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254,  255, 256, 257, 258, 259, 260, 261, 262, 263, 264, 265,  266, 267, 268, 269, 270, 271, 272, 273, 274, 275, 276,  277, 278, 279, 280, 281, 282, 283, 284, 285, 286, 287,  288, 289, 290, 291, 292, 293, 294, 295, 296, 297, 298,  299, 300, 301, 302, 303, 304, 305, 306, 307, 308, 309,  310, 311, 312, 313, 314, 315, 316, 317, 318, 319, 320,  321, 322, 323, 324, 325, 326, 327, 328, 329, 330, 331,  332, 333, 334, 335, 336, 337, 338, 339, 340, 341, 342,  343, 344, 345, 346, 347, 348, 349, 350, 351, 352, 353,  354, 355, 356, 357, 358, 359, 360, 361, 362, 363, 364,  365, 366, 367, 368, 369, 370, 371, 372, 373, 374, 375,  376, 377, 378, 379, 380, 381, 382, 383, 384, 385, 386,  387, 388, 389, 390, 391, 392, 393, 394, 395, 396, 397,  398, 399, 400, 401, 402, 403, 404, 405, 406, 407, 408,  409, 410, 411, 412, 413, 414, 415, 416, 417, 418, 419,  420, 421, 422, 423, 424, 425, 426, 427, 428, 429, 430,  431, 432, 433, 434, 435, 436, 437, 438, 439, 440, 441,  442, 443, 444, 445, 446, 447, 448, 449, 450, 451, 452,  453, 454, 455, 456, 457, 458, 459, 460, 461, 462, 463,  465, 723, 724.  2 tv_begin lisp_subr_tv_: 58, 63, 132.  2446 tv_end lisp_subr_tv_: 63, 466. 0 tv_entry_count lisp_subr_tv_: 60, 63. 551 tv_offset stack_header: 75, 80, 81, 82, 83, 84. 1646 tyi lisp_subr_tv_: 368.  1652 tyipeek lisp_subr_tv_: 369.  1656 tyo lisp_subr_tv_: 370.  tyo_alm lisp_subr_tv_: 370.  1662 typep lisp_subr_tv_: 371.  2625 type_1_subr lisp_subr_tv_: 138, 139, 140, 160, 161, 162, 165, 166, 167, 168, 172,  183, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194,  195, 196, 197, 198, 202, 203, 204, 205, 206, 207, 208,  209, 210, 211, 212, 213, 214, 215, 220, 221, 222, 224,  225, 229, 231, 232, 241, 247, 249, 253, 259, 260, 262,  263, 264, 273, 275, 282, 283, 284, 285, 286, 287, 288,  289, 292, 293, 294, 296, 297, 304, 305, 312, 313, 314,  321, 324, 325, 327, 330, 332, 334, 335, 337, 343, 344,  345, 347, 354, 357, 358, 360, 367, 368, 369, 370, 371,  372, 374, 375, 376, 377, 378, 384, 385, 390, 392, 393,  395, 407, 419, 420, 421, 422, 423, 424, 429, 430, 431,  436, 446, 448, 452, 453, 454, 456, 457, 458, 460, 461,  462, 506. 60 type_fields lisp_stack_seg: 34.  22 unbind_op lisp_stack_seg: 18.  40 uncatch_op lisp_stack_seg: 25.  60000 Uncollectable lisp_object_types: 21.  30 unerrset_op lisp_stack_seg: 21.  67500 Unevalable lisp_object_types: 27.  unmkd_ptr lisp_subr_tv_: 521, 525, 535, 536. 6 unmkd_ptr_ptr lisp_stack_seg: 9.  2 unmkd_stack_bottom lisp_stack_seg: 7.  50 unseen_go_tag_op lisp_stack_seg: 30.  146 ununwp_op lisp_stack_seg: 61.  2332 unwind_protect lisp_subr_tv_: 445.  142 unwp1_op lisp_stack_seg: 59.  144 unwp2_op lisp_stack_seg: 60.  user_intr_array lisp_subr_tv_: 667.  1666 xcons lisp_subr_tv_: 372.  xcons_ lisp_subr_tv_: 372.  76 xcons_op lisp_subr_tv_: 664,  lisp_stack_seg: 41.  1672 zerop lisp_subr_tv_: 373.  NO FATAL ERRORS  ----------------------------------------------------------- Historical Background This edition of the Multics software materials and documentation is provided and donated to Massachusetts Institute of Technology by Group BULL including BULL HN Information Systems Inc. as a contribution to computer science knowledge. This donation is made also to give evidence of the common contributions of Massachusetts Institute of Technology, Bell Laboratories, General Electric, Honeywell Information Systems Inc., Honeywell BULL Inc., Groupe BULL and BULL HN Information Systems Inc. to the development of this operating system. Multics development was initiated by Massachusetts Institute of Technology Project MAC (1963-1970), renamed the MIT Laboratory for Computer Science and Artificial Intelligence in the mid 1970s, under the leadership of Professor Fernando Jose Corbato. Users consider that Multics provided the best software architecture for managing computer hardware properly and for executing programs. Many subsequent operating systems incorporated Multics principles. Multics was distributed in 1975 to 2000 by Group Bull in Europe , and in the U.S. by Bull HN Information Systems Inc., as successor in interest by change in name only to Honeywell Bull Inc. and Honeywell Information Systems Inc. . ----------------------------------------------------------- Permission to use, copy, modify, and distribute these programs and their documentation for any purpose and without fee is hereby granted,provided that the below copyright notice and historical background appear in all copies and that both the copyright notice and historical background and this permission notice appear in supporting documentation, and that the names of MIT, HIS, BULL or BULL HN not be used in advertising or publicity pertaining to distribution of the programs without specific prior written permission. Copyright 1972 by Massachusetts Institute of Technology and Honeywell Information Systems Inc. Copyright 2006 by BULL HN Information Systems Inc. Copyright 2006 by Bull SAS All Rights Reserved