apl_monadic_ 11/29/83 1639.0re 11/29/83 1611.8 173952 @@@@@@@@@@@@@@@@@(<P`          MYqp!4JO]\in{z{~wzrq(nmYo32Mc'&(432F0/]\[ZYwvrq@KJ34=M]cgkovz~WRT[OQiL?"-0L?4O#~p3&"?Zvmv5XXhZ]=e 18#8)HdC$w=zDD@6@HL@DN6#4 @$P8P@4@@[P%@< [P%@2l@d@e@S@]@PP@@FP@c@N@HPP@B@i`FP@NP`@`@@NP@ipS@l@NN@B@l@NNl@PP@@@]@PPHP`@`@@NP]@5@@ @HPFKPP/O@,@5N@@@NPR(@R@]N@5@HvKtO@p5@P/ 5@HgP/bP/R,@@@NPipR(@ R@]N@ 5@Hv5@HwP/R,@@@NPipR(@R@]N@5@Hvn/@=S@/@n@KtO@n@P@/@@5@P/R,@@@NPipR(@R@]N@ Hvn/@xR@@P/R,@@@NPipR(@R@]N@ 5@Hv:@@5@P/R,@@@NPipR(@ R@]N@ 5@HvtO@:@@5@P/R,@@FP ]@5@@@HPFKPP/O@,@5N@@R(@ R@]N@Hv=6/@6@<@P>@:@@XR,@@@NPip6/@]@5@@@6@HP3OPP/O@,@5N@@FP PP@@ H@<@S@>@:@$PP@H@<@S@>@P@@@f@B@:@$PP@@@NPipR(@ R@]N@5@HvKtO@5@P/ 5@H}KtO@P/R,@@P@l@NJ@5@F@<@5@>@:@$PP@PP@@]@PPHP`@`@@[P%@lT@N']@S@Nb@dN@R(@ R@bN@ JPFR@FP@NOR,@h@ HP@@n@LPH@C@h@b@e@JPD@S@]@Nh@HP@@p@LP@@@@n@b@dN@h@LP@@n@d@e@FPD@DP@NP`@`@]@@z@|/@z@~/@x@/@x@/@A@B@ l@A@jeA@BM@~@6/@]@5@@ @6@PP/O@,@5N@@h.@l@h.@@@@[P%@'d@c@NXPP@@FP@c@@e(@[@ ~e@c@dN@GFPF[@b@$@@S@E[@!]@@c@~@f(@ f@N@ ]@f@FPO]@Pf,@ @c@f@ f@dN@f,@S@[F@]@&l@$@NPip]@@l@6/@]@5@@ @6@PP/O@,@5N@@[@NS@]@B@~FPNPip^@_@PPHP`@`@@S@[F@]@W@c@f@f@dN@W@f@FPOW@f,@W@[@X@W~@W~@Z@X)B@ l@[@Nz@6/@]@5@@ @6@PP/O@,@5N@@@k@@z@/@z@/@x@/@x@/@R(@U(@U@SN@W>@\@U@V@ V@\N@Z>@Y@W>@@HP@ `@fR@@P/R,@V,@X@U.@@@ @[P%@%S@T@]@d@b>@e@tz@|/@z@~/@x@/@x@/@l@>h@b@_@NPJP`@`@d@_@ b@NPOFP`@`@^@A@B@!l@A@A@BM@~@6/@]@5@@@6@PP/O@,@5N@h@@@T@T@S@]@V(@V@TN@LP@ `@fn<]@PvP@@V.@[P%@{V(@e(@W@@f@ f@dN@ @f@FPO@e,@f,@@]@f@ f@bN@ ]@f@JPO]@e,@f,@]@^@T@Nb@JPO@@S@N@FP@@N[@@@L@@@NN@h@h@ @[@h@L@@@@C@[@@l@uA@B@dl@A@|wA@VB@T@h.@d@NMl@N@ NF@ NC@NPipl@|/@|@~/@R(@(@@TN@LPHPS@ `Ff@R@|@P/R@~@P/R,@S@.@b@~NR@_@_@NPJP`@`@d@~_@R@NPOFP`@`@@>F^.@ @^@^@l@h.@@[@^@^@Iz@|/@z@~/@x@/@x@/@@$@@NP$@@@@k@y@$@@z@/@z@/@x@/@x@/@b@~NR@_@_@NPJP`@`@d@~_@ R@NPOFP`@`@[@PP@]@vP@[@]@@F@LP@HP@[@~Y@@@X@@@@T@@@@@@U(@U@N@9@R@(@@N@ PR@P@ f@e@X@R.@@.@U@@R(@R@N@P@FL@PPH@P@P@ `@`@nPPH@Y@F/@@@/@.@@R.@U,@NP@^@![P%@Pl@NPP@@@@@@$@@d@e@S@]@ e@c@FPO[@NB@~uFP@NP`@`@^@_@PPHP`@`@@NP@ip@B@0]x@/@x@/@z@/@z@/@FP@NP`@`@W@c@f@ f@dN@W@f@FPOW@f,@W@[@X@W~@Z@U(@U@SN@W>@\@U@V@ V@\N@Z>@@V@Hv/@P/k@*V@W>@R@R@N@Hv?@/@P/W@R.@(@V@W>@R@ R@N@@Hv?@/@P/@H/@P/@@@W@R.@oV@W>@R@R@N@iHv3@/@P/W@R.@_(@V@W>@R@ R@N@W@Hv3@/@ 5@Hv@"/@W@/@R@@P/@@@W@R.@9V@W>@R@R@N@3HvO@@/@P/W@R.@'V@W>@R@R@N@!HvO@@/@P/W@R.@V@Y@ Y@N@W>@Hv/@Y@W>@@P/W@Y.@V,@VX@U.@K@@@PP@@ @@NP@c@@JPF@FP6`>@P N@NP@a@@a@_@FPNP`@`@@a@@F*H@@5@*H@@b@^@_@@@`@`e@@OP@^@GFP@b@FPPe@@$P(PPP@@@,@@$P*PP@P@@C@C@PP@.@PP@,@$P,PPP@@@PP@,@$P.P@@@$P0PPP@@@$P2PP@P@@$P4PPP@@@PP@.@$P6P@@@@]@^@@ @]@>^@(@@@e@@>a@^>@>`@e@NPOP@@@Z@kP@]@NP@@e@@@@g@PP@e@@@@P@@#M,@P@@>@ N@@^@\@$P:P@P@@P@@@@F*Pb@P@P@@k@?P@j@@NPip@@NPip@@$@NPip@@ @NPip@NPip@k@x/@k@z/@@NPip@@e@@Nc~@FPFNP@@@c@~_@NPFP`@`@e@_n@_@ c@NPOFP@O`@`@@b @(@b@@@PPJ@@@L@@@T@@@b@@@ @A@@PP@@F@@H@FP@S@@d@@ @B@@@$@c@JP$@c@@@@$@@M@@@$@@@@?k@l@i@@@?@@@c@P@@r/@@@t/@j(@C(@@@A@B@@@@(@PP@@FPP@c@@@JPP@c@@@PP@@@m@B@FPP@c@@(@m@@@@@h@Xn@p?@P/P@(@@]N@LvH?P/,@@(@@]N@n@H?P/,@@n@p@P/P@(@@]N@LvHP/,@@(@@]N@n@HP/,@@(@@]N@Hvn@P/,@@n@p3@P/P@(@@]N@LvH3P/,@@(@@]N@n@H3P/,@@p@n@pP/PnW@P/P@(@@]N@n@Hvn@L_P/n@LWP/,@@(@@]N@n@Hvn@Ln@P/nW@n@P/,@@(@@]N@n@ @Hv7P/@Hvnw@P/,@@n@pO@p@P/P@(@ @]N@ LvHOHP/,@@(@@]N@ n@HOHP/,@@n@pO@p@P/P@(@@]N@ LvHOHP/,@@(@@]N@ n@HOHP/,@@@P/P@(@@]N@Lvn/@Hp/@@@P/,@@n@=S@v/@n@KtO@v@Kp/@pO@v@@g@j@(@@]N@ Hvp/@@@P/,@@n@=S@v/@n@KtO@ v@Kp/@$pO@v@@g@j@n@p/@(@ @]N@ Hvn/@@@P/,@@n@@KtO@p@@KtO@|@P/P@p@@KtO@Gn@@KtO@Dp@@KtO@p@@KtO@4~@P/P@@ BL@t@H@v@P@x@]@z@r@$PP@@@ 1L@t@H@v@P@x@]@z@r@$PP@@@  L@t@H@v@P@x@]@z@r@$PP@@@ L@t@H@v@P@x@]@z@r@$PP@@(@ @]N@1o@Lv@KtO@o@H@KtO@|@P/H@KtO@o@L@KtO@H@KtO@H@KtO@~@P/,@@@ 'n@O@]@o@@@HPOPP/O@,@oN@@~@p/@]@o@@ @p@PP/O@,@oN@@n@n/@@ !n@O@~@p/@]@o@@@p@PP/O@,@oN@@P@H@0@]@PPHP`@`@@n@@KtO@n@@KtO@W(@@]N@o@Hv@KtO@n@o@P/ o@H@KtO@C~@P/,@@n@pO@|@P/Pp?@r3@Kp/@p@n@KpO@|@P/P~@P/P@@  L@t@H@v@P@x@]@z@r@$P"P@@@ L@t@H@v@P@x@]@z@r@$P P@@(@ @]N@LvHOo@|@P/H?r3@Kp/@LHKpO@|@P/~@P/,@@(@@]N@n@HOo@|@P/H?r3@Kp/@n@HKpO@|@P/~@P/,@@n@pO@|@P/Pp?@r3@Kp/@n@p@KpO@|@P/P~@P/P@(@ @]N@LvHOo@|@P/H?r3@Kp/@LHKpO@|@P/~@P/,@@(@@]N@n@HOo@|@P/H?r3@Kp/@n@HKpO@|@P/~@P/,@@n@pO@|@P/Pp?@r3@Kp/@n@p@KpO@|@P/P~@P/P@(@ @]N@LvHOo@|@P/H?r3@Kp/@LHKpO@|@P/~@P/,@@(@@]N@n@HOo@|@P/H?r3@Kp/@n@HKpO@|@P/~@P/,@@p@@o@n@@oM@|@P/P~@P/P@]@~@ @LPHP FFF@|@P/~@P/.@@]@~@@HP FF@n|@P/~@P/.@@@k@Y@W>@|@H@@V@@|@@W@@k@@@@~@$P$P@@Y@W>@|@~@@H@@V@@|@@W@@k@@@@~@@@$P&P@@j@@i@@k@i@j(@Y@@@VN@ @p/@@Hvn/@W@.@@j@@i@@@/@@ Y@W>@|@H@@V@@|@@W@@k@@@@~@$P$P@@@@KtO@@@KtO@kY@@ @VN@|@Hv@KtO@ |@H@KtO@V@/@W@.@@Y@@@VN@|@HvO@@/@?@r3@K/@|@H@KO@@/@@/@W@.@@Y@@@VN@|@HvO@@/@?@r3@K/@|@H@KO@@/@@/@W@.@@Y@@@VN@|@HvO@@/@?@r3@K/@@|@HKO@@/@@/@W@.@@V@W>@V@HP FFE@/@@/@@@i@j>@n@=S@/@n@KtO@@K/@$O@@@g@H@>Ng@p@@@@@$PP@@p@p3@}@@pw@/@@@@@@$PP@@p@p3@=@@pW@/@@@@@@$PP@@p@p3@=@@/@@p@@@/@@p@@@/@@p@@@/@@p@p3@K=@@/@@p@@@/@@p@@@/@@p@@@/@@p@p3@=@@/@@p@@@@@$P P@@p@@@@@$P P@@p@@@@@$PP@@n@%n@KrO@ p@nw@/@@n3@Kp?@/@@p@/@@n@ pO@/@@p@nO@ /@@nO@n@p@n@@@/@p@@@w@/@@p@=S@/@p@KtO@@K/@$O@?n@p@@@/@7p@r/@1@@@@n@@@@@@$P<P@p@?@?@@@@@@@@@ $PP@@@@ @@/@ 3@O@@@@g@n@ g@2/@3/@@g@@@/@@c@@(@R@.@p@n@/@@@,@@/@@/@n@/@p@/@&n@/@p@=Kn?@/@n@#@/@/@p@=K/@n@=K/@p@n@@/@/@O@@@J@KtO@<@@@@@@'@@O@@@/@@/@@K/@@=/@/@/@ @O@ @3@w@/@@=/@@=/@@3@/@@@@=/@(@=/@#@3@/@@=/@@3@w@/@@ @@P=S@/@PKPO@@@NPP @(P @@@P/@O@o/@5k/@@}/@3@/@O@@/@&_'@w@/@ O@Uw@/@@/@@=/@O@@3@/@B @3@/@w@/@P/P@ @"@P&/@=(/@&@,3)?&3@%?&3@!?&3@?&3@?&3@?&3@?&3@ ?&3@ ?&3@?&3@?&3@?&3@=&3@(3@/P @*@,@P0/@=S@2/@0@KtO@0@S@2/@2@/P*@!!!!!!!!!!!!!!!p!!n! ? ?!!!`!N!n!  apl_monadic_ symbol_table dlog_datanh_dsinh_dcosh_dtanh_""$dcxp2_'')apl_display_bead_,,1apl_monadic_not_appendage_44;in_place4>Aapl_dyadic_bool_appendage_andDKLnandDOQorDTUnorDXYeqD\]neqD`aapl_reduction_appendage_ddkdividednpapl_error_table_compatibility_errorsx}display_disabledsdomainsinvalid_circular_fcnslengths no_identitysranks zerodivides apl_static_ ws_info_ptrapl_get_value_stack_^`apl_monadic_not_h` apl_dyadic_`apl_reduction_s`apl_outer_product_c`apl_inner_product_`apl_scan_operator_J`complex_binary_op_>&&&!&&&+&3&=&C&N&S&W&[&_&c&m&r&&&&&&&&&&&symbtreeJsS*J[PL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map P)RJjq[%FlHe,F'Hp%FHnz$F0H!F1H4RJjp(FkH#FH>special_ldd>on>apl.1129>apl_monadic_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_ws_info.incl.pl1>special_ldd>on>apl.1129>apl_operator_codes.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1>ldd>include>apl_floor_fcn.incl.pl1pl1info apl_monadic_u+WMx70`_40a86<7|0a <@( i*az<!O4 z<3S4 x <s@PZjkkVj@ |Z|ZZAP+@Z Z+kZP PVjZjZj +++++ X@eU*eU*eU*eU*eU*eU*eU*eU*eU*pobj_map >  apl_monadic_format_ 11/29/83 1639.0re 11/29/83 1612.6 107568 [@8"@(01Z6}<@D* JtPR(X#9^kHd~IloMrcx-YH=Z^Z\5q&$RJhe!PJ-i.yC<>sBNoHK;mn-#8l|4L\cM_s i6, bz+19+0V4?V?L6?#cleanup-1469367938527859385+1469367938527859385-1701411834604692317+1701411834604692317DD@6@HL@DN6#G @$PP@G@uP%@I(@}P%@PPX@@@T@@@V@@@@@NI@L@PP@@r@@j@@l@@I@@@@c@@@@]@HrP@>fv*`@]@fP`@`@@b@PP@e@@@I@V@NNrP@~FVN@zV@xP%@PP@0@@$H$H@r@r@W0@@@@@Z@ Z@N@H@I@rPFL@H@N@I@P@J@ @Z,@6@@@$PPL@J@P@rP$PPL@J@P@rP@j@rP@@l@@~ @P'@.@x@@rP[rP@ I(@jP @@@@INNl@@|@|@N@EI(@jP @@FI |,@;FD@@O[@M@D@N@F@(@^(@ ^@lN@+|@^@N>@|N@@,(@I(@|@jP @@OI~F,@F@[N@F@@|,@4\@@h@ h@N@h,@N@^.@@L(@I(@rP@[@M@F[@M@_@@~@h@h@N@_@h@rPO_@h,@[@ >]@:L@%rP@p@P@P@p@]@%rP@@pI@@p@I@@ @rPOnPO@,@IN@fn@rP _@/P@P(@[@@F@ F@N@ Q@P/OL/OL/O(OOF,@rK@/P@P(@[@@F@ F@N@e K@P/O/O(OOrP @@B@F@~C@M@_@$$C@E@C@|@|@EN@/I@jvF@ @PFF@ I@jK@PONN/NjKONN/NB@H@ j=S@Kj?KP@O@B(@(NM@|.@F@ @PF/O@OOO/@OMH@OKK/OO@F,@@P@M@KK/@I@XP@@NXXP@N/@TP/@TP/@TP@@/@Z;R@@>@R@K@@@@N@N@9N>%R@@@N@@PX@@Z@@\@T@^@V@@"T>@@[@@F@ F@N@ @@POF@ @NF@ @MF,@R(@[@@F@F@N@R@TPH@FJ/@F@ I@b@@>I@@POb@K@OOONNONO9NHH@T~L@b@N@J@@b@@I@@@9N7@@POf@Oh@Oj@H@l@d@@F@ H>@@R.@F,@}rP iP@@P/@[@@F@ F@N@m @PFL@I@N@J@@ F@ @PFL@H@N@p@J@@H@I~@NC@I@p@@POC@H@OOC@H@H@P@OOP@H@I@ F@ NP@@NF@ FI@I@N(NI@NP@@NF@ Ff@Fh@Fj@I@l@d@@OF@ I>@@F,@[@@F@F@N@  @PO(OOF,@[@_@b(@@@ @ @@@@,@[N@@b@L@ _@b@H@c@>]@d@rP@F@|(@I@@H@I@@I@I@@p@L@`d@~b@\N!|(@ |@lN@>F@NJ@p@I@@I@p@p@I@@H@[N@J@I@I@|,@L@>d@~b@:FD@M@N@F@(@^(@^@lN@/|@^@N>@|N@@(@I@I@@H@p@F,@F@[N@F@L@@@|,@L@ \@@h@ h@N@ih,@N@^.@L@@PP@g@@PP@@rPP@c@ @@XPP@c@@PP@c@p@@@d@~H@>p@@>p>@]@@fPip@fP@@p@n@0@rP@`@`@p@p@@I@@@@p@@ @nPOfP@O@,@pN@b@@@OH@@@@>@F*`@@b@zPH@ `@`PP@e@@P%@@~ @P'@.@@@@P%@@~ @P'@.@@@@P%@f@~ @P'@.@@@@P&@"PP@q@tC@~ @P'@.@@@P{@@p@@p~@@{>@q>@N@}z@>@yN@Px@P@z@@ e@@z.@@{.@Pz@q>@yN@Px@P@z@PPq@ e@`@@z.@@{.@@PP@.@PP@.@$P P@@@$P PP@P@@PP@,@$PP@@@P@,@$PP@@@@@P@@@rr@ M1@? @0 .$.@?@N P@{@@|@@r@@r~@@NP@{@@P@{>@@N@Pz@yN@IPx@P@z@PP E@@@@z,@@@{.@@@Pz@yN@6Px@P@z@ E@@z,@@{(@@@P'@ PP@z@@{(@@@|@NF@G@\@rP@~h@h@NG@h@rPO@G@F@G@\,@h.@h@N\(@@@Px@t@P@z@~s@$PPx@t@z@s@|@@~@v@P@Pz@@@@P @v@@PO@O @Pjv?@@@ @@N @@@@t@@@ $PP@@@@@@@t@@@$PP@@@@@(@@@@@@(@@N @<N,@ F@@(@0PPu@>@.@.@@@~@@ FF.@<~@N@@@.@ o@`@>n@>@<~@N@@@.@ o@`(@@<N,@ F@@ @<N,@ F@,@@@ M @<N,@ F@@,@ <~@N@.@ o@`P P@i@ `@<~@N@@@.@ o@` @@.@rP@ (@@@@@t@@@ $PP@@@(@@((@@-M@@(@t@'>@.@.@@@> @~@(~@@ @<~@N@@@.@ o@erP@ @@@@t@@@ $PP@@2@@(@@@(@@('rP@@@@@@@@@:@@:90@@9.iDt@a>@.@.@@@> @'~@>>@ @PP9 @ @uf>@.@.@@@ @~@@ >@ FF.@ @<~@N@@@.@ o@e @n@ P@i@ `@<~@N@@@.@ o@` @@.@  @<~@ N@ @@.@ o@e@ @N@PP@@ ~@@L@% >@P@{>@@N@@ >@Pz>@yN@:@ Px@P@z@ e@@z.@Px@P@z@ @@ e@`@z.@>@@{.@@d@zP e@d.@d@zP @@ e@`d.@@@@P=S@/@P@KPO@@/P@@@PNP"@"(@P".@P".@PR",@PP?@@@@@PP@t@@@ $P P@@W$/@(@JK$/@ @<@$/@@+ @K$/@ @$@?@@$@K/@i"@>>@"@$@",@"@PP@&@PPWPP&@,@.@P4/@4O@(P,@%6@2(@2@6N@4@O2,@2@.PP,@8@5Pz@>yN@jPx@P@z@ E@@z.@@{.@8@>@@@PF@F@#MF,@P@@F>@ N@F@@@$P"P@P@D@P@@F@@F*Pb@@P@P>@!!8@@F8@@F8A88 !F!|!I!H!p !F!|!p!H!I !F!|!H!I!p!]!z!J!b!!R!!R!]!n!]!@!I!]!fe.+0apl_monadic_format_ symbol_tableu apl_system_error_apl_error_table_domain!length$& no_type_bits)-not_within_int_fuzz05rank8: apl_static_ ws_info_ptr=@Ciox_ put_charsFHK apl_output=NQapl_format_util_roundTY[ round_fixedT^asplitTdfT^iapl_get_value_stack_llr}"`apl_dyadic_format_u,`xapl_print_value_}` cleanup.1apl_flush_buffer_F` cleanup.2Sapl_flush_buffer_nl_a` cleanup.3napl_print_newline_}` cleanup.4apl_print_string_` cleanup.5clean_upS$&&#&(&/&7&<&E&M&S&]&c&h&k&tsymbtreeJsS*J@YPL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map T0RJjs`%FlHj%FHnt$FH}#F"H'F#H,F'H$F0H!F1H(FkH>special_ldd>on>apl.1129>apl_monadic_format_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_characters.incl.pl1>ldd>include>apl_list_bead.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info apl_monadic_format_+W|g@((|_53+Z.haz<O4y:@iv<pPVjZZjVkZPZZkP #P ZZ+PPV`ZXV@ZjZj + +P@eU*eU*eU*eU*eT@obj_map |$  apl_monadic_not_appendage_ 11/29/83 1639.0re 11/29/83 1616.2 8532 P@HP@PPPP"@@"M LJ@LLJ@LLJ@LLJ@L@D@AHLJ@LQ"$PP@HPPM> pKL]7BD pKL@HK$P $  apl_monadic_not_appendage_)in_place apl_monadic_not_appendage_  symbol_table LsymbtreeJcS]J3alm   $@4YHPSH4ALM Version 6.6 November 1982 Martinson.SysMaint.m list :7RJju>special_ldd>on>apl.1129>apl_monadic_not_appendage_.alm @  @ obj_map LL4Y  apl_monadic_rho_ 11/29/83 1639.0re 11/29/83 1612.7 30168 4?#DD@6@HL@DN6# @@@$PPp@@%HP%@PP@@BPpP@c@W@V@N@VV@~X@ X@ X@BPO5@L/~X.@V@JP@@ip@%PP%@pBP$@f@PP@@BPpP@c@O@N#W@f@ DPN(@Q(@N@Q@)@JPipN@JP@@@pP@L/P@f@DPb/@=S@\/@f@@\@b@K`O@\@K/@,O@\@@N@N@JP@@ipb/@pP@@@@@N@@L@@@$PP@@%WP%@aU@NP@N@W@@@@W@N@>FPP@@: N@r@Y@Y@rN@HP@F`?@@O=S@d/@OK`O@d@K/@,O@d@@Y@@PNY,@ t@s@ s@@POt@@@s@s,@PN@@N@BPW@v@X@X@vN@@PFX@JP@OX,@BPJPipN@O@aBP@JP@g@@@ $P P@PP@@@@ @@0@JP@c@@@PL@FPL@BPL@LP6S>@pP N@JP@a@@LPa@JP@@L@T@R@BPJP`@`@T@F*D@@@@*D@b@Q@R@LP`@`PP@g@@$P PPP@@@,@@PP@.@PP@.@$PP@@@$PP@@@.@@x@Z@N@Q@ x@Z(@N@>Q@x@W@o@>T@Q>@>S@W3T@Jv*L@Z@@@*L@N@JP@W@@b@P@Pg@x@~@PPF@@@H@@@P@@@U@~@PP@@B@@D@@O@@V@pP@@^/@@@`/@~@@@P@@#M,@pP@@>@ N@@@@$PP@pP@@pP@@@@F*pPb@P@P@!S!J!S!B!!@apl_monadic_rho_ symbol_tableH apl_iota_appendage_apl_rho_appendage_apl_error_table_rank"')length",.domain"13 apl_static_ ws_info_ptr69<apl_get_value_stack_??EP(`apl_monadic_iota_WHT`Kapl_dyadic_rho_ZP`S&&!&+&0&5&>&GsymbtreeJsS*J{PL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapH-RJjwT%FlH^,F'Hi%FHns$F0H|!F1H(FkH>special_ldd>on>apl.1129>apl_monadic_rho_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info apl_monadic_rho_+XWWtx;SpPVjZZjVj+@ PVjZjZjk h@eU*eU*eobj_map [lt:  apl_operator_table_ 11/29/83 1639.0re 11/29/83 1616.9 104688 _M)/ Yqk;eAG}wS5  !"#$%& ' dp eq   f gr h i @j @k @l @m @n @o@@ @ @ @ @ @@ @x0^_`a b0^_`a b0^_`a b0^_`a b0^_`a b0^_`a b0^_`a b0^_`a b0^_`a b0  ^ _ ` a b0  ^ _ ` a b  ^ _ ` a b  ^ _ ` a b  ^ _ ` a b ^_`a b ^_`a b ^_`a b0^_`a b ^_`a b ^_`a b0^_`a b0$0%0%0& ' ' ( ())** + + , ,0-0- . . / /00000101 2 3 450607809:;<0=>?0@0ABC0DEFG H I J K LM NOPQR@S@TUV W X YZ [ \y z{ |!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! ! !!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!!!!!!!!!!! ! ! ! ! !!!!!!!*  apl_operator_table_inner_product_table operator_bead_table#apl_operator_table_& symbol_table  #symbtreeJcS]J=alm   $@4v v4ALM Version 6.6 November 1982 Martinson.SysMaint.m list F0RJjR,F$H])FHh6RJjn>special_ldd>on>apl.1129>apl_operator_table_.alm>ldd>include>apl_operator_bead_bits.incl.alm>ldd>include>apl_character_codes.incl.alm >special_ldd>on>apl.1129>apl_lex_pseudo_chars.incl.alm   @ obj_map :6>>P  apl_parse_ 02/06/85 1136.1re 02/06/85 1135.4 280008 DXk,1 1B[14>HWZ]nx8bl:T^h77D  cc(c              read_back_spacesTT T quitV?T "V6TL$"@#V@T L4continuefinisherroroverflowclear ws?#underflowzerodivideresetwriteprocess_quitresetreadany_otherapl_quit_fixedoverflowsyn_ user_i/oapl_dirty_stop_apl_system_error_program_interruptrecord_quota_overflowDFNNNNNNNNNNNN6#P%@T(@P|@ ^@r`@ b@d@^@h@b@j@l@n@f@$PP@p@a(@$PDPt@qv@p@x@a@z@|@@|~@y@r@P@H(@|P @ @|P@ @R@1RP@N(|P F@@dt#@ >F*D@@a@lxa@ p@@ `@@p@ RP@ N@h@f@@r@r@j RP@\@@@ >>@RP@>@F>[@X@@@N@@@ N@@h@@j@a@l@f@ @ ra@ t@ a@]@  1vt@q@L(@M(@K(@Z@|P@RP@ @Z@VPO(OF@@(@[.@qo@Z@VPF]@ RP@N Z@~VPFNZ@~VPFx@z@ o@Z@VPFa@F?CN2RP MNpRP@ IN@\@RP@h@f@@RP@N@h@f@@yRPR@RP@NPLFh@f@@Z@VPF @VPO@(@VPOOZ.@Z@ N.q@Fh@f@@Z@VPF @VPO@(@Z.@wSZ.@q@qZ@~VPF+Z@Fh@@f@@q@ Z@~VPF@iDZ@~VPF@iDZ@FF@@F@@OO@@@@Z.@IRP@@NNWZ@Fx@Fz@RP@h@f@@RPR@Rn@VPOxPeOz@Oo@:Z@VPF@?@HN|NZ@~F@?@HN|NZ.@[,@@O o@@fNgNZ@VPF@Z@~F@?@HN|NZ.@[,@yq@a@NN@@@@Z.@Z@a@FNi N,lZ@ VPOOh@f@@a@*Z@VPFVPF@F@OOZ.@OZ@VPFh@@f@@Z@~q@@GVPO@jDZ@FF@@F@@Z.@q@Z@T@RP@U@cfT@Z@U@RP@q@}Z@~m@Z@~n@o@an@Z@VPFONZ.@Z@m@~n@o@n@Z@VPFOZ.@xZ@~m@Z@~n@o@8n@Z@VPFONN@@@@Z.@Z@~F@?HN@|N@NN@@@@NN@@@@NZ@~m@Z@~n@o@q@Z@VPFOZ.@Z@@FN Nf)Z@~m@Z@~n@o@Z@VPOO@@@@Z.@&Z@~m@Z@~n@o@Z@VPOO@@@@Z.@Z@~m@Z@~n@o@Z@VPOO@@@@Z.@M@SZ@~m@Z@~n@ o@Z@VPOO@@@@Z.@M@<  o@Z@VPF@)CZ@VPF N  Z@VPF~@O@O @@Z@~@(@~@d@b@$P0P@@@ Z@VPFh@f@@:Z@@VPOOOOOq@Z.@Z@@FN NZ@~F@N?@gNNNNNNNN@@@@Z.@#Nh@@@N+@@h@h@40@@N"@@@@N/@=S@P/@N@K|P@O@ @%N]N@iDN@S@P/@P@Kp/@pO@P@@>@~@u@N?]Nu@NNN@@@@h@f@@Z@VPOO@@@@Z.@RP@N@@@ ^NK@q@M@K@RP@NL@r@ LNoM@@@@@@h@f@@t(@RPR@N8RP,@@N\P@N@f.\P Ox@x@0@@x@x@0@@,@RP@h@f@@]RP@h@f@@VRPR@p@Nm@VPFh@f@@Gm@VPFh@f@@> N m@VPFh@f@@2n@xPVPgFOOo@@$PxP@$PP@@N[@$P~P@@VPF[@$P~P@N[@$PP@m@VPF[@$PP@m@VPF[@$PP@m@VPF[@$P|P@m@VPF[@$PzP@m@VPF[@$PTP@m@VPF[@$PvP@N[@$PrP@@VPF[@$PpP@@VPF[@$PnP@[,@{$PlP@RPR@ [@q$P~P@m@VPF[@h$PtP@m@VPF[@_RPR@$PjP@Z@VPF[@S$PbP@@(@Dg@(@@@@@@@@@@@@@@@@@@@@$PP@WQ$P`P@'$PFP@#|P@@$PRP@X(@$P^P@$PJP@$PLP@$PNP@$PPP@@VPF[@RP@NNNX@#DPV@Z@Vvp@DP@@s@@c@@[@@p@@@@D@K@B@H@@$PP@D(Psg@v@DPV@@s@(@@@@@@@DP@@@v@@@@#@@@@@@@@$PP@N^@@@f@@g@g@@p@$PXP@@R@4@T@Z@Vv@@@s@@c@@[@@@@@@@@@@@$PP@s@@T@@g@@i@@@ `@e@@@@@@@f@@RP@@@@@@@@@@$PPp@@@ @sN@[@b@RP@?N@h@f@@}RPR@|P@TZ@VPF`@@@l@T@@@V@@@s@@c@@b@@@@@@@@}@@@$PP@ v@l@@T@@s@`P@@@i@@ `@`@(@@@@@@@v@@@@[@W@T@@@@M@@$PP@ @Z@VPF[@$PjP@3RP@NN^Z,@[.@Z@[@O(O\P@ @F^@@@ONtO@@@@@OO@,@o@$PZP@Z,@[.@Z@[@VPO\P@ @F^@@$@J@M@@@O@OO@o@O.M[@N8\P@@ >@>@RP>@[@NN.@h@h@0@@@%[@Mh@@@$@M@@?|N@Mh@@$@M@?|N@N VPcOOOO,@o@ @VPOCNZ@O(OON(Z@~VPF?fNZ@VPFo@O@@@@OO@,@o@@@ u@@h@O(Oh@0@GOh@@@N@@T@@@h@@@j@@l@fn@f@$PP@hP@N *^P@@T@(@O@(@@@hP@@c@@@@@@@@@@B@I@@@@E@@$PP@c@hP@h@Z@VPF,@@@N@@VPOhP@@@VPOVPOO O p(@Z@n@~m@o@O(OO@@M,@cOOOo@O?@*jDZ@@(@@?@SNTN ~@d@b@$PP@~@d@b@$PP@@qZ@@VPOOOo@Z@n@6RP@ @@[.@h@[@N^@PO@N@+@@^@@ &hP@@?@dN@O eN@OpNcOcOO2NO@,@o@ q@m@~@m@~VPF wF@xF?3S~@d@b@$PP@po@q(@m@FNAN N NNNh@f@@<\P @m@VPFOh@@c@@N@@@d@Nm@~F@@@@N@h@f@@m@VPF.@VPOhP@`@N=@@N9@@@@@@M@2@@@@@@M@)@@N@&@@N@#@@@@@l@@@@@@ `@`@@@@`@`@@@@`@`@@t@!@N@h@f@@|P@(@m@VPFh@hP@j@f@$PP@|P@@hP@@T@@@,@m@~VPFm@F|P@@ m@Fh@f@@n@hP@VPOOo@~@d@b@$PP@o@t~@d@b@$PP@o@p@m@~Fm@~@ m@VPFNm@~@m@VPFm@VPF Nm@p~@VPFh@@@N@h@p@N@@ J N@@M@@0R{RP@@|P@@ @m@p~@VPF@@@@\@e@\P@,@@@ @@@@@u@u@N@\P Fh@h@C0@@@u@RP@ O@ Pu@RP@ gOu@RP@ Ou,@\P@~@{@>@@u@ u@N@\P Fh@\P@@{~@F@@,@u.@VPh@@ >Rv*@V@RPb@p@N m@~@@X@LNm@~@@:@VP@Od@p@>@N@g@p@ c~@@(@(@(@|P@(@G@HNdP@@@h@~@j@f@$PP@m@p~@VPFh@f@@p@@=|P@@n@@VPOONn@VPOo@\m@~VPFm@F@ m@FF@@N@@@~@d@b@$PP@do@<m@VPF@@m@~VPFm@F@~@d@b@$PP@Ho@ m@VPF@@m@~VPFm@F@~@d@b@$PP@,o@~@d@b@$PP@!o@~@d@b@$PP@o@m@VPF@~@d@b@$PP@o@@@m@~VPF iD~@d@b@$P*P@o@~@d@b@$PP@o@~@d@b@$PP@o@m@~VPFm@F@m@F@@@~@d@b@$PP@o@m@~VPFm@F@@~@d@b@$PP@o@w~@d@b@$PP@o@l~@d@b@$PP@o@a@]~@d@b@$P P@zo@m@FNUNNINh@f@@@m@VPFVPF@OO@n@ONONo@ .~@d@b@$PP@Ko@#Z@RP@~@d@b@$PP@=o@~@d@b@$PP@2o@q(@(@m@F@~@h@@j@f@$P<P@@n@m@VPFONOo@ ~@d@b@$PP@ o@m@~VPFiH~@d@b@$P"P@o@q@m@@FF@?@P ~@d@b@$P$P@!o@p@m@~Fm@~@3>m@VPFiNcm@~@(3]q(@@M^NRPB@BP@N@B@N@@@ON@h@@@j@@l@f@ @ @ @@2K@m@VPF@@@@Z@@@N/@=S@P/@N@K|PO@NP@K/@O@GP@@~BP@@M@M(@L@n@@VPONONo@ ~@d@b@$PP@o@m@VPF@F@F@@@@O iD~@d@b@$P,P@o@em@VPF@F@@@O iD~@d@b@$P,P@io@Jm@VPF@F@F@@@@O iD~@d@b@$P.P@Mo@.m@VPF@F@@@O iD~@d@b@$P.P@2o@~@d@b@$PP@'o@~@d@b@$P(P@o@m@VPF@F@F@@@~@d@b@$PP@o@m@VPF@F@@~@d@b@$PP@o@@M`@`@0@@@l@@@@@l@@@NRP@ @@ >F*@V@b@Z(@(@l@T@`P@@(@@@@@@c@@@@V@@@@v@}@t@z@@$PP@c@RP@1~@d@b@$P&P@o@w~@d@b@$PP@o@@MN.Y@@@Mh@@j@@l@f@ $P6P@Y(@"@MNY@@@Mh@@j@@l@f@ $P6P@Y(@ @~@d@b@$PP@@|P@@q(@n@m@VPFONOo@ $Z@RP@~@d@b@$PP@5o@q(@@MNMh@@pNM@j@M@j@@@@@@0@@$.$.@$sN@@h@f@@@(@hP@@@N@@@@@@@|P@@(@m@VPFh@jPj@f@$PP@|P@@jP@0@@$$@3@,@m@VPFh@f@@n@m@VPFONOo@ ~@d@b@$PP@o@~@d@b@$PP@o@~@d@b@$PP@o@~@d@b@$PP@o@m@VPF@F@F@@@~@d@b@$PP@o@pm@VPF@F@F@@@~@d@b@$PP@wo@W~@d@b@$PP@ko@@m@VPFNONO~@O@O @@m@~F @@m@~FiD(@|P@@(@@G@@@@|P@@@ m@VPF@@@@ m@VPF@@@n@@VPOO@@m@VPFrNp~@O@(@m@~F @@OiD(@|P@@(@@G@L@@@]|P@@@ m@VPF@@@n@@VPOO@@@P@0@$.$.@$@P@P@@?N@@@@/@@@?m@|P/@'@|P/@@@!|P@@@@^@,@@|P@@@@|P@@@|P@ @@|P@@|P/@C@@@PPg@@@@?||P@/@|P@/@|P@,@|P@@P@|P@5@/@|P@5@/@ |P@5@/@|P@/@(@l@@@>>@>@@@@@@$PP@@@ipl@@(@@>F*@@@@*@b@@/@@PP@@Z@~VPF8Z@@FN2@q@@@@@@@u@ u@N@@F@?@@O}Nq@u,@q@Y@@@@@@@@@@ $P6P@Y(@@@X(@Z(@RP(@|P@@ @\@ @@ >F*D@(@t@"RP@N|P@P@@|PP@@|P@Y@@|PY@@i@(@$P@P@@@@@@@@P@DP6@~@G@|PE(@$v@DPV@@(@DP@@@@@F@@@@I@@v@@@@r@@@s@o@@$P:P@I@NXF@DP@@E@)M*|P@@(@@G@@V@@@F@@r@@@@K@Q@@ $PP@|P@@r@v$PhNPdNP @R@@@V@fNPjMM#|P@@(@@G@@V@@@F@@r@@@@@$@@ $P2P@|P@@r@$PhNPdNPD(@F@F@ F@DNPDP@@F@'M@@@@@MF,@@]G@D~PN$PVP@@P@ |PE(@DP~@>F@RP@@@(@(@@>|P@(@DPDP@@@F@G@@~@@$P>P@@@@@@ @r@ @@P@|P@@r@@$PNP ,@DP>@DP F@@@NP@HP@@P@.@@@@D.P@@|PE@F@"@(@(@$P^P@@@@@@@v@@@@ @"@}$@*@y&@v(@@P@4@@@c(@DP>F>RP @@ >F),@a@V@DPV.@/(@DP@2@RP@@4@c@6@/@8@V@:@.@<@L>@S@@JB@PD@0@$PP@c@PPP(P@@RP@ @@ >F*F@b@V@|P@RP@ @@@@P@0@$H$H@@.@@@NPL@J@$PP@.@PP@0@.$@$@@Z@Z@ Z@N&VPFFP@N@@Z@VPT@FNT@O ON OOP@N@@Z.@RP(@ @|P@@@@Z@RP@[@@o@@n@ @q@ @@@RP @q@L(@M(@K(@@RP@Z@@[@@o@ @n@@\@|P g@@V@@ >Rv*D@o@NZ@m@p@ Z@~m@o@Np(@p@@@@$PP@P[@1 @Z@Vvh@RPe@R@RP|P@ g@@(@Z(@@ @@~N @@@P@ @@@V@@@>@@@>U@chPiphP@@@@@PP@@ @@@@@@@e@@@@@@u@ u@N@PP@@FFhP@O@Ou,@ @@@@@@@@@(@@@@@@@hPP@Pg@@@@P@0@$X$X@@@!@ @  @!N@PP@0@@$X$X@X@FN X@OO\@Z@@ ,@@"@\P@(@u@ u@(N@&\P Fh@h@0@@@N@b@`@@u@RP OhP@@ h@h@u@RP@ Oj@f@@*u,@"@*@L@+RP@RP@@r@@t@n@v@p@ @n@q@Z@~VPFZ@FHNn@o@8o@n@2*@0@2@P@0@$z$z@6@P5@N/@u(@ u@6PN@@@FP/@NO@2PP0@N?@K|P3@|/@N@P@K|O@2P@P0@u,@2P@(P0@8@:@PP@@@F@@C@Z@VvC@@ `@`@C,@VvC@[E@C,@@@~ @@~ > @t@> >@.@.@@>A@ A~@>D@C@A@=@@ED@ `@f=D@C.@C@]E@C,@@P  .@C@ F@@.C.@PC@ F@C,@C@~B@V@@@@@@@$P8P@:PP.@$P4P@8@@@.@B@$N@dP@R@Q(@$P>PV@N@X@R@Z@Q@\@^@b@`@d@T@P@ PY@|P@E@ @F@$P^P@z@@F@@@@F@w@T@@h@j@T@l@f@ $P P@@@+`P'@BPB@ Pr@D@@@P@ Pr@$PNPBPB@r@D@@@P@$PBPB@ Pr@D@@@P@@@oB@F@$PBPJ@@@L@F@N@ P@r@P@R@V@T@X@H@P@@H@ @@@@@$P P@4@@@@@$P P@|P@@A(@B(@D(@E(@F(@G(@Y(@H@1`P'@ P|P@G@@@F@@8L@8N@F@P@J@ $P P@@8PP'@\PB@@@P@@N@P@PPPF|P@@(@F@v@@@$PP@|P@@PP@Pv@@PPOJOPPP\P@ OPPPP@PF@N,@N@T@V@P\@\@#M\,@|P@@\>@ N@\@@@$PP@|P@Z@|P@@\@@F*|Pb@VP@PT@AP(@ "PP@n@ P@|P@@ P@P F` @ P@@PP F`@U@ P@p@r@t@>Px@p@z@t@|@@r@~@@@@@v@P@ Pr@p@ter@t@s(@$P@Px@p@z@t@|@s@~@@@}@@v@P@rt@s@o(@$P@Px@t@z@s@|@o@~@v@P@ @ F`@(@PPn@ F`@@PPn@ F`@ P|P@@@@A@@B@@D@}@ F`@m 9t P|P@@@@B@@A@@D@ P@n@ F`@\ @PPn@ F`@7@PPn@ F`@6 @PPn@ F`@)  PH,@A F`@F@x@v@$PP@F@dN@P P+ F`@ P|P@@t@t@x@o@z@r@|@~@@@v@ $PP@P P  F`@N@P P@J8!R!o!n!R!n!o!U!h!!B!!!!h!!!h!m!!h!!!h!!m!![!R!a!]!r apl_parse_  symbol_table# on_data_ get_oncodetimer_manager_ alarm_call reset_alarm_call#( condition_++.cu_ptr_call125iox_ attach_ptr8:=close8@Bcontrol8EG detach_iocb8JMget_line8PS put_chars8VY apl_dyadic_\\_apl_dyadic_format_bbgapl_inner_product_jjo apl_monadic_rrvapl_monadic_format_yy~apl_monadic_not_apl_outer_product_apl_reduction_apl_scan_operator_apl_subscript_a_value_ apl_editor_apl_flush_buffer_nl_apl_print_value_apl_print_string_ apl_scan_apl_subscripted_assignment_ apl_static_ apl_input apl_output user_input8user_io8apl_error_table_not_end_with_valuecant_read_inputpull_system_error pull_assign_system_errorreport_error_system_errordone_line_system_error"(ws_full_no_quota+0improper_niladic_usage39too_much_input<@locked_function_errorCIassign_to_valueLPsuper_dirty_stopSX interrupt[^cant_get_stop_traceafdepthik ws_clearednq ws_loadedtwreturn_from_aplz~execute bad_executebad_evaluated_inputassign_to_labelbad_assignmentrankoperator_subscript_rangecontextimproper_monadic_usageimproper_dyadic_usagedomainvalue error_table_ end_of_info not_closed short_record apl_error_ apl_line_lex_apl_execute_lex_apl_function_lex_apl_function_lex_no_messages_ apl_command_apl_monadic_iota_apl_monadic_rho_  %apl_copy_value_((,apl_dyadic_epsilon_//4 apl_encode_77: apl_decode_==@ apl_ibeam_CCFapl_dyadic_ibeam_IINapl_system_variables_QQWapl_system_functions_ZZ`apl_file_system_cchniladic_functionsckpapl_dyadic_iota_ssx apl_take_{{~ apl_drop_ apl_ravel_ apl_catenate_ apl_laminate_apl_dyadic_rho_apl_domino_operator_apl_compression_apl_expansion_ apl_reverse_ apl_rotate_apl_transpose_ apl_random_ apl_grade_up_apl_grade_down_ apl_quadcall_apl_external_fcn_addr_apl_free_bead_ ws_info_ptrapl_allocate_words_apl_system_error_ apl_get_value_stack_apl_save_command_ + `reattach_user_input1# & first_timer8+ E. second_timerA1 c4apl_default_handler_D8 ; 9&&"&*&0&7&?&D&I&O&U&[&a&i&q&x&&&&&&&&&&&&&&&&&&& &&!&*&2&;&B&K&R&Z&`&h&m&s&y&&&&&&&&&&&&&~&|&z&x&v&t&r&p&n&l&j&'h&.f&6d&<b&B`&H^&P\&YZ&bX&jV&rT&zR&P&N&L&J&H&F&D&B&@&>&<&:&8&6&4&2&0&.&,&*&(&&&$&"symbtreeKMR#KPL/I 6"' ,wMultics PL/I Compiler, Release 28d, of October 4, 1983GJohnson.SysMaint.moptimize listj[jKgq%FlH{$FH!F1H%FHn'FH-F!H'F#H,F'H%F(H%F-H$F0H#F"H(RJ(FkH>spec>on>7086>apl_parse_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_characters.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_function_bead.incl.pl1>ldd>include>apl_lexed_function_bead.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_list_bead.incl.pl1>ldd>include>apl_operator_codes.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info  apl_parse_UxWxC~= iF<OO4O4x#!PP@(@)F<O4x `Sx Z<3x;4@!FMx}  C<+@ ( <@!x  <OPf`@Px[C<-@ ( Ctmx'hx!= &a<Otx@<9@A#x/ hO 4 x|`i<!O ((@ zN<_ *Mx if<!@StxrPk +ZkZZ Z@+Z@kPkPZZZZ @+@Z@+k Z5ZFkVj Zk@kZ Z@+Vj@+Z+Vj|ZZk ZkZP Z |ZPZZkZVj PZVjP VjZPVj+Vjk@+VjZ+VjPZZ +P@eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eU*eTpobj_map 9 9E ~ \V  apl_pendant_function_check_ 11/29/83 1639.0re 11/29/83 1614.5 9360 L?#D6PP%@PB@ @@@ @@N@@@ND@@P@NP@P@@@@P(P@ apl_pendant_function_check_ symbol_table  apl_static_ ws_info_ptr  ` * &symbtreeJsS*JvPL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapD8RJjR%F(H\!F1He%FlHo%FHny'F#H>special_ldd>on>apl.1129>apl_pendant_function_check_.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_operator_bead.incl.pl1pl1info apl_pendant_function_check_B*@_jZZjZV`Z @e obj_map **!L TV  apl_quadcall_ 11/29/83 1643.8re 11/29/83 1615.1 244872 ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ_abcdefghijklmnopqrstuvwxyzT,TTunalTdecTcharbitTT+T.T TTTTTaplV VVT&V?T)bindimT#@VTVd4alignedfloatdecimalbinaryfixedvariableoptionsreturnsentry?#unalignedsize too biginvalid sizecharacter0123456789syntax error not defineddimensionobject too largeinvalid_syntaxinvalid syntax rank exceeds invalid dimensiontoo many dimensionsinvalid routine nameinvalid module nameinvalid entry nameargument rank exceeds numeric data must be alignednumeric data must be binaryinvalid type for return valuemore arguments than parametersmore parameters than arguments^/declaration error: ^a^/^6x^a^/^vx^aparameter has fewer dimensions than argumentparameter type incompatible with argumentparameter has more dimensions than argumentparameter size incompatible with argumentparameter dimension incompatible with argumentDD@6@HL@DN6#  P%@:Pt@:x@ NP@3@ PO@@@#>$FA@@B@@@> F`@O@E@HvHvE@@Hvh@j@H@l@h@$P4P@.@ @.@@3@h@B@H@D@@@$P4P@.@ @.@@ PP@@PP@(@@@@@B@ Ps@FPDv@L@H@H@LN@  PFPFs@s@H,@ PFPBe@FP@f@e@NN f@NI@v,@s@s@I(@v@>f@f@j@F@l@h@ L@ PFPBNs@>f@f@j@G@l@h@ 9@s@G@F@G>@K@K@j@J@l@h@$P<P@J@BP@P PFPBf@N@ipN@ip NN@ip@ipK@Y@iL@s@@v@@F@F*b@FPDv@M@H@p@H@MN@ Pv@H~@FP@FBPH@P@P@OH,@I@  PFP@BPH@@PPO@@z@.@w@@@ @N@dPF@@ @ N@@@@@@@>@>@,@w@E@>F@E@G@>G>@>@F>@F@F@J@H@L@H@@E@F@>F>@Hv*F@@F)f@z@PP'@PPB@B@#MB,@ P@tP@@B>@ N@B@F@D@>P@ PtP@@@@@@B@F*@b@P@P@D@ PE@n@HP7>n>@HPVF@s@@@Dv@U@Q@Q@UN@  Ps@FPOs@Q,@ PFPBn@FP@o@n@NN o@NT@s@s@v,@T(@v@>o@o@r@L@t@p@+@ PFPBNs@>Fo@o@r@P@t@p@@s@P@L@P>@N $P8Pr@Kt@p@@L@P>@o@o@r@x@t@p@f@xP P@PP@g@J@@s@JP@@@v@@@L@@F*z@@b@N@@FPDV@Q@ Q@VN@ PFPDQ~@FP@FQ@JPOQ,@T@ PFP@v@JP@O PFPBo@NY@JP@ips@5@\-@NP^@FP@n@FP @\@@N@J@n@N@5@\U@@J@N@#>$F$N~@K@E@Hv@PL@Q@J@Z@R@ R@ZN@ PN@[@S@S@[N@Q@S@~|@ PN@K>@}@R@~}@|>@LP@0F@.$.@G =^P/OQ,@S,@R,@N_@JP@ipFP@n@FP @1n@r@s@rF@n@NPp@r@D@n@@@E@Hv@PB@@@\@Q@ Q@\N@~ Pr@n@D@>|@Q@~|@n@pPBvr@@@@@ED@ `@`@Q,@wn@E@HvPp@s@r@n@>k@z@r@n@~@ ~@@~@ FzP`@`@~@ FNP`@`@@ @UNHs@5@\-@NP^@@T@E@HvPV@T@]@Q@ Q@]N@ PVPn@F$n@OO n@O =^P/OQ,@ PT@^@Q@R@ R@^N@  PVPF =^P/OR,@Q@ PTN@@JP@ip@JP@ip NCs@5@\-@NP^@@X@E@HvPZ@X@_@Q@Q@_N@ PZPFN Q@Q@O5@^P/NQ,@ PX@`@Q@R@R@`N@  PR@ZPO5@^P/NR,@Q@ PXN@@JP@ip@JP@ipNbs@5@\-@E@Hv@P^@\@a-@Q@Q@5@aM@Q@ P^Pn@Fn@OOn@ONP/OQ,@ P\@b-@Q@R@R@5@bM@R@ P^PFS@OOONP/OR,@ P\@c-@R@S@ S@5@cM@ S@ P^PFNP/OS,@Q@5@ P\M@@JP@ipqR@5@\M@@JP@ipi@JP@ipeNcs@5@\-@NP^@`-@E@HvPb@`@d-@Q@Q@5@dM@ PQ@bPOM Q@O^P/NQ,@ P`@e-@Q@R@R@5@eM@ PR@bPOS@MO R@O^P/NR,@ P`@f-@R@S@S@5@fM@ S@ PS@bPO^P/NS,@Q@5@ P`M@@JP@ip R@5@`M@@JP@ip@JP@ipD@PP'@ PdP P@tPg@@w@D@@@ @@DN@ PdP@FB@@F PtP@g@.@@N Eg@E@H@F@$P@P@@,@@@w@@@@N@~@@dPF@@P@@Q@@@@@R@HP7>R>@HPVF@@0@NJ@@@D@N@@BS@N@@@N@N@@@ N@@@@>N@@@F@ON@ $OT@@OT@@N@#>$F$N~@K@N>@J@#>$FS@S@X@L@Z@V@@N@K>@J@LP`0@Hv(@@BS@N{P@5@\-@@^@@@@^@@@ '@\@@N@J@^@N@5@\U@@J@N@#>$F$N~@K@P@dPOL@N>@J@#>$F^@^@X@L@Z@V@C@@J@@@ @N@7N@@@ @N@@@~_@N@K>@`@@~`@_>@^P^@OM@.@^@LPF0@.@,@,@~^@N@K>@^~@_@N@K>@`@@~`@^>@LP_@f0,@@LPHvN@@@_@@@K@H_@r@P@rF@n@@p@r@D@n@@@D@>@@_@_@X@B@Z@V@@D@>@@$> FBP`@@@@@ @N@D@>_@@~_@@~r@BpPD@@@@Fr@ `@`,@@BPHvVP@dPOQ@ P@@NP@@R@H~FP@@r@n@r@>_@_@X@p@Z@V@@r@n@ P@pP`0`@@Hv(NP@@P@@@u`>@.@.@@_@_@.@@t`>@.@.@@>@N @@O@@~@>@P@T`$.@.@>@ @@F@@~@@@~@@@@N Nt`k.@.@@>@N N Pt`[.@.@@>_@GV@GX@meZ@V@d@@ff@j@_@l@b@ @_@_@X@@Z@V@@@V_@@Va@Pp@Pr@Pt@@v@_@x@a@z@|@~@n@@g@PP@@ `F`@3u@d>@.@.@@a@da~@a@>^@>@`@T_@@^@i@a@ `@` E@|`@@^@P@ e@`d@@ff@_@j@@l@b@@E @u@d>@.@.@@@d~@@>`@>@^@>a@>@@T_@d@`@i@@ `@` E@E^@@`@P@ e@`a@@^@ E@8@@a@P@ e@`@d@@ff@_@j@@l@b@i@ @@PHv NOP@5@\-@@^@@T@P@dPOV@ _@_@X@V@Z@V@G@n=FP@_@n@X@_@Z@@\@V@ $P2P@@;@@@T@@@@N@@K^POO@OOO@VPO,@@VPHvNPP@5@\-@@^@@X@P@dPOZ@ _@_@X@Z@Z@V@@n=FP@_@n@X@_@Z@@\@V@ $P2P@@;@@@X@@@ @N@@K^POO}@OOzO@@ZPN,@@ZPHvkN4P@dPOQ@ P@@NP@@R@H~YP@@5@\-@5@_-@\1@@Q@Q@X@^@Z@V@@$5@-@_@\1@1@@P@^P`0`@@Hv6N1P@5@\-@@^@`-@P@dPOb@ `@@P@P@X@b@Z@V@q@`@-@@ @5@M@ @^PF@bP-O,@@bPHvDR@H,@h@@fl@m(@.@@l@RPm@ Fo  Fo FoB  l@RPm@ Fo.@y@.@t@.@p@l@RPm@ Fo.@e@l@RPm@ Fo.@Z@@@,b,b@p@l@r@v@x@n@@@pP(@"PP@@@ P@Q@VA@@@K(B(PP>L@B@P@PR@@RPT@L@V@X@Z@P\@A@^@`@b@N@BP@$P6PD@F@B@@@@P'@PP P@PP@@PN@,@N@.@@@@PP#P@@@@0@@@ >@T@@i@@@ `@`@ O@ @l@@@@_@@@ @P@P@@NiP@PP9@-@@ t@ >@.@.@@@ ~@@P@@>@>@@T@@i@@@ `@`@ O@m@@@@@@F@ e@`@l@@@@@@F@, @@@@h t@ >@.@.@@@ ~@@>@T@@i@ @@Y@@ `@e@l@@@@@@@ @FPP$@@M(@TFPFPFP<FPFPFPO @&TFPFPFP~<FPFP@POFP@O @.@FPFPFP@<FPFP?FPO@@@@ @N@@~@>@FPO@P@NO@@M@@L@,@@PP'@ Pm@l.@l@~A@Q@A~@l@RPto>@.@.@@@@Q@A~@@@l.@l@~A@Q@A~@l@to.@.@@m@Q@A~@m@l@QN@m@@@@A@P@@P@@PP@@@P@P@P@?@4@@ $PFP@@J0@j$P F@@@@@@@@@@PP@ @ @@@@@DP@@%@@@@@P@P@$P@@@@@P@@@PP@ @ @@@LP@PP%(@(@@@P@P@@@@@@@P @"@P@P$@@P&@(@*@,@.@@$PHP@r@@@PP@P@P@P@@P@P@@P@@@@$PJP@@@@P2@@4@@6@0@ $PNP@PP @@@d@d@@l@m(@.@@l@fPmN@m@8@4C@8@l@RP@@O@m@ N@@::@B@l@D@]H@lJ@@@@l@RPm@ @@o .@@l@RPm@ FoC5.@@mN@m@?@4 @?@l@RP@@O@m@ N:@<@>@:@B@l@D@"H@2J@@@^@l@RPm@ @@o* .@@@@@ * l@RPm@ Fo4.@@l@~?@Q@?~@l@RP@@O@@C@P@E.@E@7HP"@HPRHPHP@iLE@7HP@@"@@@@@(@m@ Fn l.@\@l@RPm@ FoM@(@(@B,@@wN@@@W @ @@N@l@P@T@V@L@@l@@f@?@HP7>?>@FPHPF?@dP@N@@N@L@@FPD>Fv*F@l@RPm@ Fo.@@((@l@RPm@ Fo{:@<@:@B@l@D@uH@J@@@@.@@ Fn |.@@l@RPm@ FoX:@<@:@N@l@P@OT@bV@L@@.@@l@RPm@ Foh}}:@|<@:@B@l@D@3H@FJ@@@r@.@@l@RPm@ Foaa:@`<@:@N@l@P@T@*V@L@V@ @>wN@,@l@@f@?@HP7>?>@FPHPF?@dP@N@_FPD>Fv*F@.@v@w@~N@@@s @ @@N@l@P@T@V@L@@l@RPm@ Fo.@X@l@RPm@ Fo:@<@:@N@l@P@T@V@L@@.@=@l@@fPO@>?@HP7>?>@FPHPFX@X@B@@@@l@RPm@ Fo:@<@:@N@l@P@T@V@L@@.@ @FPD)@NFPB?@NFP@O@#NFP@ O@FP@>O@FPFPFOO@ $FPOX@OX@@O@O(@l@RPm@ Fo?:@<@:@B@l@D@<H@NJ@@@z@@2@~ @F@*  0zu@Zd>@.@.@@9@d9~@9@>8@ >s@T?@-t@8@i@9@ `@`Z E@s@@8@ E@@ N@fPP@?@T@t@V@L@C@K @u@ >@.@.@@t@ t~@t@@_u@Zd>@.@.@@s@ds~@s@>8@t>@9@>u@ >v@T?@w@8@i@s@ `@`Z E@9@@8@t@ e@` u@@9@ E@v@@u@ E@@* B@fPD@?@H@w@J@@@@ @@ P'@F(@R@@T@PP@PP@P0@@@@@P@L(@ Pl@RPm@ Fo Fo .@@ Pl@C@RPm@ Ff|G@G@.@@L,@L@N@@XX@`@ Pl@b@kf@zh@^@@ Pl@RPm@ FoS9PP0@L@TP(MP@|0@@@0^0^@l@l@n@Ar@Ut@j@@L@PP@N@@@,j,j@`@l@b@+f@@h@^@k@l@FL@TPMgto.@.@@>to>@.@.@@>m@ NaX@aZ@n\@X@`@l@b@f@h@^@;@<@@M+L@TPL#v@@P@0@-L@PPN@@@?XX@l@ P@l@n@r@t@j@@TPFL@NO@@0^0^@l@ Pl@n@r@t@j@@.@A@ Pl@RPm@ FoJ@G@0 Pl@RPm@ FoX@Z@X@l@l@n@r@t@j@@.@@ Pl@RPm@ Fo%P@0@PP$@@M@@/,^,^@l@l@n@r@t@j@@N@M@K@.@@ FoZ Fo %P@0@PP$@@M@@,j,j@`@l@b@Vf@[h@^@@N@M@K@.@@ FoaPP]0@@@ ^ ^@l@l@n@r@6t@j@a@L@@@wXX@l@ Pl@n@r@#t@j@N@P@60@@@,^,^@l@ Pl@n@ r@t@j@9@PP$@@M@@,j,j@`@ Pl@b@f@h@^@$@N@M(@K(@F@.@`@ Pl@RPm@ Fo`.@S@ Pl@RPm@ FoX@Z@X@`@l@b@f@h@^@@.@5@ Pl@RPm@ FoX@Z@X@l@l@n@r@t@j@@.@@ Pl@RPm@ FoX@Z@X@`@l@b@zf@h@^@@.@@ Pl@RPm@ FocX@Z@X@l@l@n@\r@nt@j@@ FowPP@|0@PP$@@M@M@@,^,^@l@l@n@Jr@Ot@j@z@N@M@K(@.@@ Pl@RPm@ Fo4 FoE.@@{ Fo Fo5s@@jj@`@l@b@f@h@^@F@b FoMP@)0@PP@@,^,^@l@l@n@r@t@j@*@N@M@K(@.@g@ Pl@RPm@ Fo Fo.@V@+ Fo Fo#@@?jj@`@l@b@f@h@^@@X@Z@X@`@l@b@f@h@^@@ Pl@RPm@ Fo.@@ Pl@RPm@ FoM(@3toV.@.@@>to>@.@.@@>m@ N @@M+M@#v@@X@Z@X@l@l@n@]r@pt@j@@N@Nt$PPP$MN@X@Z@X@`@ Pl@b@Bf@Uh@^@@PPg0@P@c0@M@@@,j,j@`@ P@l@b@4f@9h@^@d@L@PP@N@M@M@N@@,^,^@l@ Pl@n@r@t@j@G@@@~LN@M@@@@OM@@@@NO@@,j,j@`@ Pl@b@f@h@^@(@F@Nt$PPPMN@  X@ Z@X@`@ Pl@b@f@h@^@ @PP0@P@0@M@@@,j,j@`@ P@l@b@f@h@^@@zL@PP@N@M@M@qNo@@f,^,^@l@ Pl@n@r@t@j@@]@@~LN@YM@@@@OM@@@@NO@@G,j,j@`@ Pl@b@f@h@^@@F@<NM@GNX@Z@X@`@ Pl@b@Zf@mh@^@@##N!N@NM@?N{{X@zZ@X@l@ Pl@n@<r@Ot@j@z@NN@.@@ Pl@RPm@ Fo bbX@aZ@X@`@l@b@f@+h@^@V@.@@ Pl@RPm@ Fo Fo K(@.@@% Fo Fo% K@N@NN@@ajj@`@l@b@f@h@^@@.@a@ PFPN@AFPFPK@FPFPL@<FPFPM@FP@Ol@I@m@J@C@l@m@L@hN@NM@B@ N M@B@M@$B@K@H@#>$FH@$B@$$@@L@V@D@D@VN@E.@@D@TPNOO@@@@$PPP$$$O@X@Z@X@`@ P@l@b@hf@h@^@@L@D~@>E@ PFPOD@TPNOD@H@@ME@LH@.@@D,@P@|0@F@GL@@PP@$O@@@,j,j@`@ P@l@b@,f@Kh@^@v@I@ Pl@J@m@@@P'@PP>@>PP@P'@ Pw@X@R@ R@XN@+~N@R@ PdP@FT@@N@r@ PHP7>r>@HPVF@@V@V@#0@CVPTP@g@ @@N @@.@6VPTP@g@ PFPBr@NWVP@@5@\-@@@^@FP@s@FP@\@@N@J@s@N@5@\U@@J@N@#>$F$N~@K@N@Hv@PL@O@J@Y@P@ P@YN@ PN@Z@Q@Q@ZN@O@Q@~t@ PN@K>@u@P@~u@t>@LP@0F@.$.@G =^P/OO,@Q,@P,@NKFP@r@VPs@@@rF@n@@@p@FP.s@q@*r@D@n@@@N@Hv@PB@@@[@O@ O@[N@y~ Pr@s@D@>t@O@~t@s@pPBvr@@@@@ED@ `@`@O,@aN@p@H0@Zr@n@ H@P`0`@QNHVP@@5@\-@@@^@@T@N@Hv@PV@T@\@O@O@\N@ PVPs@F$s@OO s@O =^P/OO,@ PT@]@O@P@ P@]N@  PVPF =^P/OP,@O@ PTN@@VP@ip @VP@ipNEVP@@5@\-@@@^@@X@N@Hv@PZ@X@^@O@ O@^N@ PZPFN O@O@O5@^P/NO,@ PX@_@O@P@P@_N@  PP@ZPO5@^P/NP,@O@ PXN@@VP@ip@VP@ipN[VP@@5@\-@@@^@N@^@H0@s@$5@u-@5@\1@u1@@H@P`0`@\@`-@O@ O@5@`M@O@ P^Pt@Ft@OOO,@ P\@a-@O@P@P@5@aM@t-@ P@ P^PFS@OOP,@O@5@ P\M@@VP@ipqt@\M@@VP@ipj@VP@ipfNdVP@@5@\-@@@^@`-@N@Hv@Pb@`@b-@O@O@5@bM@ PO@bPOM O@O^P/NO,@ P`@c-@O@P@P@5@cM@ PP@bPOS@MO P@O^P/NP,@ P`@d-@P@Q@Q@5@dM@ Q@ PQ@bPO^P/NQ,@O@5@ P`M@@VP@ip P@5@`M@@VP@ip@VP@ipR,@@4@PPFN $P6Pz@|@x@S@FN $P6Pz@|@x@E@PPFd@@$@MAw@>@@z@d@|@x@@dPipdP@@PPF@@@(@O@>@@@ >@@ dPFF>@>,@N@@P@PgO>@@>@@PPF>@>,@N@w@dP@<@@$@@M $P6Pz@|@x@@<P@R@<P@@Q@w@?@:@ :@?N@'dPF<@@@@ $P6Pz@k|@x@@@<N@@@@ $P6Pz@Z|@x@@:,@4@!V!2!Z! !*!h!233=<! f !!al*,)(+2 $$ apl_quadcall_ symbol_table  decimal_exp_cu_ generate_callapl_error_table_domain %' result_size *- apl_static_ ws_info_ptr036apl_allocate_words_99>apl_get_value_stack_AAGapl_free_bead_JJNioa_nnlQSThcs_fs_get_path_nameWY^fs_get_seg_ptrWaeinitiateWhk make_entryWnq search_paths_find_dirtx{convert_status_code_~~sys_info max_seg_size#`apl_push_stack_ncollect_garbageOdeclaration_erroroerrorget_next_tokenprocess_parameter_dcl| round_to_even update_byname_arguments  ,2R* &&&)&/&8&@&I&P&V&`&g&m&s&}&&symbtreeJsS*JPL/I 6"' *7,4Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapd*RJo(FkHy$FH+FH%FlH!F1H%FHn$F0H,F'H#F"H'F#H%F-H$RXbJ CF)H^>special_ldd>on>apl.1129>apl_quadcall_.pl1>ldd>include>apl_push_stack_fcn.incl.pl1>ldd>include>apl_characters.incl.pl1>ldd>include>apl_external_function.incl.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_list_bead.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>arg_descriptor.incl.pl1>ldd>include>arg_list.incl.pl1pl1info apl_quadcall_e Axz<Oe)O'<_S <OY<O5Jn<O4!p8PZjkk_jPVj+@ VkZkZFk++XV@V`ZXV@V`ZXV@C9UYUYUYUYUYobj_map , , R * N7  apl_random_ 11/29/83 1639.0re 11/29/83 1616.1 33192 #>43f?#DD@6@HL@DN6##9P%@PX@P@P@C@C@@@@@E@@PD@SNz@ D@@|@@@N@N@@=S@R/@@KXPO@R@,RO@R@@M@E@@O|@=S@R/@@KO@R@}@N@@P@C@XP@@D@XP@M@NN@jM@DNN@fN@NFMN@`yN9N@O@M@H@O@$$[[[#>$FI@O@@P`0J(@ J@MN@OB@XP>@L@@P6F@F0@G@J@L@5@/OJ,@O@@P`0N@O@M@H@eJ(@ J@MN@)B@XP>@5@P/@K(@K@JN@G@FPO@K,@G@J@P@/OJ,@nN@H@C"~/@N@y@G@@XP@@@~@@y@@@@@$PP@J(@ J@NN@RN@$$J@[O@G@J@FP/@J@B>@F/OP@/NJ,@:=S@T/@@KO@M@5@O@P@C@@@D@@M@H@J(@J@MN@V@XP?@P/@K(@ K@JN@G@FPO@K,@G@J@P@/OJ,@M@H@G@F*XP@b@@@8@@H@@@Z@H@@Z@>>@>I@zPFg@F@C@@>`@`@Z@>@F*Gb@G@@@~@G@@@+Gc@@@G@@@G@E@H@`@`@F@C@G@E@C@@@J(@C@J@N@E@@@F=S@T/@@@@OKXPO@9T@@/OJ,@C@@ipJ(@ C@J@N@~@#E@@FT/@&BOS@@O@/E@J@B@XP@>@5@/O @ip6E@J@V@XP@?@/OJ,@C@P@P@@@P.@PP@.@$P P@@@.@.@ P@@\@XP@ @@ @@O@M@@@@B@\@b@O@B@h@V/@V@@@h@H@ @@B@H@(@@H@G@V@V@T3@S@V/@b@j@Z@H@@Z@>>@>I@E!PFg@F@P@P@F@@@ip@@M@@@@@@@Gc@G@@@@G@@@*Gb@@@G@@@j@p@r@Px@x@#Mx,@XP@@x>@ N@x@@@$PP@XP@v@XP@@x@@F*XPb@rP@Pp@!I!!I!z!I!@ apl_random_  symbol_table9 apl_iota_appendage_apl_error_table_domainrank"$ apl_static_ ws_info_ptr'*-apl_get_value_stack_006< &`&&!&&&/&8symbtreeJsS*JiPL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapH(RJjR(FkH\%FlHf!F1Ho,F'Hz%FHn$F0H>special_ldd>on>apl.1129>apl_random_.pl1>ldd>include>apl_push_stack_fcn.incl.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1pl1info apl_random_<Ay;pPk +k PVjZjP@eU*eTobj_map =  apl_read_password_ 11/29/83 1639.0re 11/29/83 1616.2 19080 yyxetaiosqwertyuioplkjkgfdsazxcvbnmV T LH4TTVV?#* user_i/oapl_input_wgxwgxwgxwgx986986986986xwxwxwxwxwxwTypePasswordread_back_inputapl password:91P%@94P%@x@~@y@@z@@@@@|@ P@Ai`AiP @@ A DiDEi`EiPA@@(@@@~@@@@@|@ $P P@y@Nx@@AML@h@h@[$j@h@[$k@l@l@ N @0Fj.$.@Cl@ O@tl,@A@B@C@ @@ D @@ G @@} J Di` GiP JiH MiDu@v@N@w@P@ Qi`A@@(@A@@~@@@@@|@ $P P@V@ee|@dd~@m@@J@@@|@@@@@@7@4@1@.@@$PP@7|@t_~@A@@(@@*@|@@@@@@@@@@@@@@@@@@@@$P P@@@Nl@l@ FO@Dl,@l@@N@ @@l~@PP @@o@@PP @@@Ai`A@@(@@@~@@@@@|@ $P P@@@@@@m@@@@@@@@@@@$PP@@ apl_read_password_ symbol_table1  user_info_tty_dataios_ write_ptr read#%order(*read_password_4<`-71D`\&&"&'&,symbtreeJsS*J9JPL/I 6"' *<bIR[_IIMultics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map0/RJj>special_ldd>on>apl.1129>apl_read_password_.pl1pl1info Dapl_read_password_A <9@<=4]xPVjZZjZ ZZZjD@eU*eobj_map \\8b  apl_reduction_appendage_ 11/29/83 1639.0re 11/29/83 1617.1 16344 PP PPFP~PPYJIA$9=BFPV\ciu J*w~?JJ9JKJ=3JJB=OJWJJFOJJJPOJJJVMOJfJ^M^}KOJp Jj}KJjj@?K?K?K?KSw@KKKKKKKKS~@3K3K3K3KS=@OK@WKOKWKOKWKOKWKS@OK@KOKKOKKOKKS@OK@KOKKOKKOKKSM@OKfOKfOKfOKfSM@OK OK OK OK S}K}K}K}K@B :P$PPP@$P#  apl_reduction_appendage_divide apl_reduction_appendage_ symbol_table symbtreeJcS]J<alm   $@4zUpsU4ALM Version 6.6 November 1982 Martinson.SysMaint.m list >5RJjL!*\E>special_ldd>on>apl.1129>apl_reduction_appendage_.alm >ldd>include>stack_frame.incl.alm       AA@    @ @ @  A @   @ obj_map 38@@z  apl_reverse_ 11/29/83 1639.0re 11/29/83 1616.4 19080 4DD@6@HL@DN6#2P%@ P^@P@P@@@@@B@@@ @D@@@E@@@F@@G@E@G@NGN@G@@OH@@J@L@0E@`@>N@D@F@>N.@F@>N.@@PJPipF@JP@@E@@@ $@Pm@@$m@`0`@E@@OL@D@@m@+L@@c@JPP@Pg@F@N@@BPL/P@F@@R@G@O@O@EN@R@O@JPOR@O,@R@H@S@R~@T@H@>FR@U@S@a@V(@ V@FN@:R>@Q@R@b@W(@W@UN@/T@W~@P@V@X@X@QN@$D@W>@BvZ/@X@P>@BvL/Z@L/~W>@\(@BP @@F\n@X@P>@n@LP E@F@ F@@\@X,@b@W.@a@V.@@P@@d@f@Pl@l@#Ml,@^P@@l>@ N@l@r@p@$P P@^P@j@^P@@l@@F*^Pb@fP@Pd@!N!J apl_reverse_ symbol_table2 apl_error_table_operator_subscript_range apl_static_ ws_info_ptr #&apl_get_value_stack_))/5`&&(&1symbtreeJsS*JK PL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapL)RJjW%FlHa!F1Hj,F'Hu%FHn$F0H'F#H(FkH>special_ldd>on>apl.1129>apl_reverse_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info apl_reverse_f|AyPZjk@Zk 8@eU*pobj_map 6<DJ  apl_rho_appendage_ 11/29/83 1639.0re 11/29/83 1617.2 7272 PPP@@@@@)@@@@@@N`p@$P@M@@@@@@M@)e@`@=@(M@@m@@@)e@`$P  apl_rho_appendage_apl_rho_appendage_  symbol_table *symbtreeJcS]J_alm   $@4bSX[S4ALM Version 6.6 November 1982 Martinson.SysMaint.m list >/RJjJ$F/H>special_ldd>on>apl.1129>apl_rho_appendage_.alm >ldd>include>apl_value_bead.incl.almh @ obj_map ***T\\b  apl_rotate_ 11/29/83 1639.0re 11/29/83 1616.7 29664 4DD@6@HL@DN6#@P%@Pp@P@P@@@@B@@P@H@@J@@ @N@@F@@O@@P@FN@@P@@NQ(@"F@~@N@Q@R@ R@PN@ @PFR@HP@NOR,@P@>R@R@FN@ @PFR@HP@NOR,@@P @T@pP@V/@F@P@HP@OX@X@P@P@N@>\@\@@L@lLPpP@g@b@HP^@JP`@PP@@v@PpP@c@rF@r@>\@N@O@>\.@O@\>@>\@@ @Pa@@@m@@@@>>@>n@n(@\@nN@n@@]3pP@L@F@^P@O`@N@@@@i`@P@FN@ N@X@>\@X@\@EPP@@@P@\@. @P@DPBP`@`@B@LPpP@g@HP^Pip`P^Pa@O@@F@@ $HP@@$@`0`b(@^PP@Pg@c@P@R@ R@FN@c@R@HPOc@R,@F@ P@HPOO@FOd@d(@d@c@s@e(@ e@dN@X@f@g(@g@cN@T@e>@Q@Bv@h@e>@Q@Bv=S@j/@BKVO@j@K/@,O@j@@h@X@@h@b@zb@P@FN@N@f@g>@JP@FZ@)f@g>@JvZ@#N@l(@ l@XN@c@f>@g>@l@ZPJP E@F@l,@l(@l@XN@ l@c@f>@g>@JvZ/l,@X@h~@~t@R(@ R@tN@N@c@f>@g>@@R@h>@@`PZP E@F@ c@f>@g>@R@h>@Zv`/R,@S@ S@XN@N@c@f>@g>@@S@R~@@`PZP E@F@ c@f>@g>@S@R~@Zv`/S,@g,@]s@e.@T@$PPPP@@ $P PPP@@ P@PP@,@@P@@v@x@P~@~@#M~,@pP@@~>@ N@~@@@$PP@pP@|@pP@@~@@F*pPb@xP@Pv@!\!D!!^!\!Z apl_rotate_  symbol_table@ apl_error_table_domainranklength!operator_subscript_range$+ apl_static_ ws_info_ptr.14apl_get_value_stack_77=C `"&&&#&-&6&?symbtreeJsS*JuePL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapH(RJjR(FkH\%FlHf!F1Ho,F'Hz%FHn$F0H>special_ldd>on>apl.1129>apl_rotate_.pl1>ldd>include>apl_push_stack_fcn.incl.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1pl1info apl_rotate_|A{PO   Pk + Zk@Zk \@eU*eU*obj_map ""Dfnz,  apl_save_command_ 11/29/83 1639.0re 11/29/83 1617.3 91008  <W`h TT TT LT<@L$T#TTaplVVdTdTV 4V#V?6?#^a>^acontinueclear wscleanupsaved ^asaved ^a ^areturn_conversion_errornot saved, this ws is ^arecord_quota_overflownot saved, not enough quotanot saved, need rw access on entry.can't save ^a (^d record^[^;s^]); need ^d more record^[^;s^]554yP&@"PP@@P@@4P@P(PP@ F`@@@@@dd @@`@dP F`  @F@d@d @@ @@@@   @@` F@d@ @"@$P@&@@(@P@*@m,@j.@g0@$@ P@$PPPP@@4@0@6@@8@@:@[@<@Q>@N@@PB@OD@OF@2@"P@[@ P @F@dd F@dJ[@$$PNP!1@=H@[@4@@6@H@8@0@:@@<@+>@ @@B@D@ F@2@P@[@PP@,@ @@$P0P@,P`*.@(@Z(@Q(@H(@a@a@%@ @P'@@@ @P'@.@@@.@$PP@A@@@@P @@@A@ A@N@P @F@ @)N#'@@@A,@@@D@ D@N@ ,PF@ @@@D,@P@ @@@B(@@P @@ @NB,@@@NH@&@X@>@@B@@.PO@O@O@@@@@@D@D@N@@F @@@D,@N@ @@@@@@@@>@@N(@@>@@  @>F>@>@@(@B@@.PO@O@O@@@@@C@@@rB@@.PO@@D@ D@N@ @ F @@@D,@@@@C@@E@ E@N@/(@P@FN@O@ O@@@@OOO @@@]O @@@SE,@@@@N@@@@@Q@H@^OF(@Z@@G(@ G@N@^F>FF.@G,@Z@F.@Y(@Z@@G(@ G@N@@J(@@&@G@(@@*@F,@J@.@[@0@$@$P*P@G@J@F0@@L@[@4@@6@L@8@0@:@@<@>@@@B@D@F@2@$PP@@(@J@O4@Z@6@@8@@:@[@<@>@|@@B@|D@}F@2@$P$P@[@#@@L@tN@Z@R@@T@@V@L@X@N@Z@[@\@[^@]`@Sb@Zd@f@Yh@P@$P(P@[@H@TN@[@4@@6@N@8@0@:@@<@B>@7@@4B@5D@7F@2@$PP@@ @M@@Z$$$$P@4@$@6@"8@:@2@P@@6Y.@G,@I@@@0Z(@J@K(@Z@l@J@n@@p@J@r@K@t@S@v@K@x@[@z@|@~@@@@@@@j@ $P&P@[@[(@S@J@K(@S@U@Z>.@.@>K@K~@T@ @@`ZZY@K.@J@K~@L@FN@0@@<2<F@NJ@K@L~@J@F@L~@NJ@@$P@l@2@n@@p@F@r@K@t@J@v@@x@z@|@~@@@@@j@P@M@@@@PZ@P@@@@@@@@P@@@@@ @@@ @@@ @@@ /@@@/@ @@@@@@@@/@@@@@&@@@(@$@@PP@@@@H 9 @@@  @@@ @ @@@d d@@@d@d@@M@ M@N@,PF@O&@J@(@$@@XJ@@M@,PFM@PON @@@@@@N@@@D@ D@N@@F&@P@F(@$@@LD,@y@@@@@@@@@ `@`@ @@&@@(@$@@8g@@@@@@@@@@ `@`@@@&@@(@$@@%@@&@P@@(@$@@J@@@@@@N@@@O@O@N@>@FP@FF&@@F(@$@@O,@.P@+@@`@`@$P@!@@ `@`@@P@> F`@I(@ I@PN@@OO@I@E0@I,@M,@QB@@V@V@N@.PF@O&@@(@$@@@@@@@@V@.PF@@@NN@)@@@@@@D@D@N@@D@O&@P@F(@@$@@@D@F&@@P@O(@$@@D,@@@6ip@@jL@@6ip@@jL@ @6ip@ @@@@ @@@@@ @W@@ `@`@@@N@"@@@@@@D@D@N@ @ F&@P@F(@$@@ND,@@@&@P@@(@$@@BV@.PF&@@(@$@@ @@@@@@@@@R@ R@N@6PFPOU@(@N@O@O@ OOO@@ O O&@O(@$@@@POPOOOR,@V,@)@\@P@Z@^O$@J@@&@Z@(@@*@J@,@[@.@$@$P,P@.@k@PP@ F`@  F`@&@ @\@4@$@6@2@$PP@$P@4@@6@$@8@P@:@<@y>@v@@B@2@P@@a @\@4@$@6@2@$PP@$P@4@@6@$@8@j:@V<@U>@2@ P@@@@$$P@4@$@6@W8@B:@2@P@.@@$PPPP@PP'@ P@@@M@ PM@@N@,PFA@@@B@A@,PO@@M,@.@$PP@ P,@F@D@$P2P@ P@F@D@$P.P@@@@@P@P@@@@@@@@ipP@@@>>@H@>6@iL@@@@@@I@@@@@@@@OP@O@,@N@P@@@@Oc@@@@@@  @@@@@*b@@@@@@@@@@Q>@$PNP!Q@H@^OZ@@G(@G@N@^F@>@$PNPG,@Z@>Z@G@^(FQ@H@^OG@^NQ@G@H@@b@@@Q@F*b@@@Q.@@@@@@P@0@$.$.@$@N@@@@@@@@@ @@@@ >>@@@*E@@@@N>@@@N7@@P@>>@@@@@@>@@@ @@@>@@@@@,,@@@@,PN@N@N@@@$PP@@ P@@@P@0@$.$.@$ @ @@@@@@@P@@@@@@P@>@@@@@$@@MP@#>$F@@@P@>@@@@>@.@8@ @,,@@ @@,PN@N@N@@@ @@P@0@$.$.@$@$6@V@GA.a@P@0@.$@$ @@@P@0@$.$.@$@1N(P@@@@@ $PP@@ P@@@P@@@!!!!!!!apl_save_command_ symbol_table  error_table_noentryapl_error_table_ cant_save_ws $sys_info max_seg_size'*.com_err_114ioa_ ioa_stream79<apl_create_save_frame_??Eapl_date_time_HHLapl_destroy_save_frame_OOUapl_system_error_XX]apl_translate_pathname_``fhcs_fs_get_path_nameikp quota_getisvstatus_iy{ msf_manager_get_ptr~adjust~close~apl_segment_manager_getfree apl_static_ ws_info_ptr}`record_quota_overflow.15 cleanup.2D cleaner_upper6apl_output_ &&&&0&6&>&G&N&W&_&h&r&x&}&&&&&&symbtreeJsS*JPL/I 6"' *G $;D  Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize maph.RJjt%FlH~!F1H%FHn%F-H$F0H#F"H'FH-F!H$FH'F#H%F(H&F.H$F)H"F*H>special_ldd>on>apl.1129>apl_save_command_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_list_bead.incl.pl1>ldd>include>apl_function_bead.incl.pl1>ldd>include>apl_lexed_function_bead.incl.pl1>ldd>include>apl_group_bead.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_symbol_table.incl.pl1>ldd>include>apl_save_frame.incl.pl1>ldd>include>apl_saved_ws.incl.pl1pl1info apl_save_command_nB _<3OxOi:<7O'. <I4 <@3: ( n<Ot<@)PVjZZjZVkkPVjZ _jP+@ #P+UXV@PV`ZZjCUYUYUYUYUYUYobj_map V6^G  apl_segment_manager_ 11/29/83 1639.0re 11/29/83 1617.5 29088 #TTLV$V?V4?#.apl_seg_return_conversion_error rP%@F@ )@@~D@ XPJ@H@^P@F@@@@ F@@@@0@gC(@@@;CG@N@H@P@R@T@L@bP@i@ @@@H @@  @@@L @@@CR V@$P*@Z@L@\@G@^@V@`@@@b@E@d@f@h@j@l@n@p@X@`P@ @@@0@$PVPJ@H@^P@F@@@@E@$PTPJ@H@^P@F@@{@@$P@@PD@ gOD@O0)F@j@@P@P@P%@F(@PPPr@Bb@@@D(@D@N.$P FBN@(D@O0)V(@@@N@V@P@E@R@L@ fP@E@D@$P O\PJ@H@^P@F@@0@@F@@*@@D,@$PZPJ@H@^P@F@@@@P&@"PP@t@F(@$P F@*nPPt@ `F@*@.@@$PPPt@ @@`@*PPt@ @@`@*F@@@@P%@F(@$P@C)@D(@D@N$P F6ND@ O@@1 O@@N@E@P@L@dP@D,@F@@@@TP&@"PP@t@F(@PP$Pt@ `@@*@@PF@@@@8+0+1 apl_segment_manager_ symbol_tableh  apl_error_table_temp_seg_already_existscant_create_seg!%wsfull_out_of_segs(-attempt_to_free_not_temp07cant_truncate_seg:?apl_system_error_BBGhcs_make_segJLO unique_chars_RRV delentry_segJY] truncate_segJ`dgetr@g apl_segment_manager_$getwhk freer@u apl_segment_manager_$freewz set_temp_dir@ !apl_segment_manager_$set_temp_dir reset+@ apl_segment_manager_$reset+ get_dir_and_countX@ &apl_segment_manager_$get_dir_and_countX wThL+000 & &'&/&9&A&I&Q&X&_&fsymbtreeJsS*JG PL/I 6"' *=Jaw}JJMultics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map01RJj>special_ldd>on>apl.1129>apl_segment_manager_.pl1pl1info Eapl_segment_manager_\A @dxK>(x+S > |#|@O B _g92@<A_jZZkZ #PZVjZQ+PUXVBk V`ZV`ZRk CUYUYUYobj_map ww4h<L  apl_si_command_ 11/29/83 1639.0re 11/29/83 1617.7 22824 ctiolxpppwrl itVVTVXVT ?#^va[^d] ^a @$PP@@KP%@G(@ SP%@G@.@$PP@F(@P @B@B@0@BP@NF@NNt@D@@I@F@*K@ Ki`@^a@@@L@@J@@@@@@I@@K@@@@@@@@@@$P P@J@T@J@i@@ `@`L@@@$PP@ @G@IDP@@H@H@N@ADP F@@@@}0@ @@V@@@@@@$PP@@?@O@Z@@$PP@H,@N A@O@@$PP@ N 4@C@@$PP@F(@.@$PP@BPB@_.@$PP@.@$P P@@@@DP@@BP@N@@ @N@ `@`#@P @@N@@@FDP@N@@OBPN@ @@@@N@ `@`@,@(@@@apl_si_command_ symbol_tableK apl_create_save_frame_apl_destroy_save_frame_ ioa_rsnnl#%'apl_print_string_**/apl_print_newline_227apl_flush_buffer_::? apl_static_ ws_info_ptrBEHS"`apl_siv_command_VK+`N&&"&)&1&9&A&JsymbtreeJsS*J]PL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map T,RJj_%FlHi%FHns%F-H}-F!H%F(H!F1H$FH'F#H$F)H>special_ldd>on>apl.1129>apl_si_command_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>apl_lexed_function_bead.incl.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_characters.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_save_frame.incl.pl1pl1info apl_si_command__x?  n<@@ VPZjkVj Z @kh@eU*eU*e@obj_map Wv~n  apl_static_ 11/29/83 1639.0re 11/29/83 1617.3 6876 5.028  apl_static_ version_number immediate_input_prompt ws_info_ptr% "user_tty+ ( apl_output1%. apl_input+4 symbol_table % +1?#?#?# symbtreeJcS]J+alm   $@4QDGKD4ALM Version 6.6 November 1982 Martinson.SysMaint.m list :(RJj>special_ldd>on>apl.1129>apl_static_.alm@@ obj_map HJRbQ  apl_storage_manager_ 11/29/83 1639.0re 11/29/83 1618.6 105552 Zh(TTTT TV6T%T L$4?#D6balancingapl_trace_get stack seg ^dstorage clearedapl_dirty_stop_copy value ^p ^d ^palloc words ^d ^pfree(^d) ^d (^o) ^pref ct error: ^d ^d ^p; calling debug @$P:Pz@@0P%@ O0P%@PP$P@@]0P%@zP@P@P@P@@@@@@A@@1$P@&@e_@@@((@@@@@@A@@@@@@@~@@y@@P@.@$PP@$P"P@@P@@@@@P@NK@V@@@\@@^@@@@T@V@@ $PP@\@@N@$P$P@@P@]@zP @^@O\@ \@N@N@]@NzP @\@@@^@O]@\@@@@ ]@]@@\@$P$P@@P@zP .@@@ @N@@@@@@@@@@@@@@@@t@@~@^@^@~N@j@@F@@@^,@`@]@@@@@@@@^@ ^@N@@@ FgN ^@ O@@ O@@@^,@@@@@^@ ^@N@ @@@F@@@^,@@@@'@F@^@ ^@N@@@ @F@@@^,@r0P%@zP@P@P@P@@@PA@zPB@@ @X@@@6@R@@^@ ^@XN @@@^@P$@M@P^,@@^(@ ^@RN@^,@$P&P@@P@^@P6T@PP@]FN$P&P@@P@@PP\Ox@@@Z@6A>@N@Z@6@b(@S@[(@b@b@xPOZ@O@iLA@YO@ip@bN@b@@S@O@ZM@IHZ@6A>@@@6N@:Z@O@iLO6A@H@>6O@ipc@bN@%xPF@F6@@6?@@Z@6O@@b@O@iLc@N6@O6?@H@>6O@ipS@QS@ab@b@N@ $P P@@P@S@PO6@@6?@@Z@6O@+@A@H@>6O@ip=c@bN@Z@6A@@c@xPO@O@O6@b@N6?@H@>6N@ipS@ S@b@>b@N@lW;O@cN@ SO@cN@xPFc@Oc@c@xP(O$P@&||@e_@@@@@@@@S@@A@@@@@@Y@R@V@V@@M@@P@$P@ @@@A@@@P@T@A@PP[.OzP@@ H_@@X@PP?OO,Ob@@,OA@.OzP@B(@@G@7@@[@zP@@  A@@NPP,@.@PP,@.@S@[@$P@@e_@@g@@@@@@@@P@zP@ @V@P@ PxP@@>H@>@F@D(@C@B(@C@ PxP@N@ @FB,@B@BOC@B@BFC@B.@D,@C@@OD@F~@(OC@>C@D@>FPD@FP(OC(@D@CN@@(@ @@FA@@~@FB@C,@@@B.@C,@B@F~ PC@xP@MB@FA@F~A@@@C@ PxP@@zP@ A@@N PP@,@@ PV@@?@@@D@@.@ PP@,@@ PV@@?@@@D@@.@@Br0P%@zP@P@P@PA@f@zP@ @X@A@F@A@~@A.@A@$P NP(P@@P@zPB@`(@a(@A@@NPP@Z@T@@\@e@PP@[@T@@]@e@T@~@]FN$P8P@@P@T@PP\Fx@PP@[FAN@jb@B(@b@xPN@ FB,@B@BOb@B@IBFb@B.@b@O6A~@g@:@O@A*@b@N@@@@@A@F)@@OiLg@YxPOipA.@A@@Nb@PP\@b@PP]@qc@bN@lc@bN@xPFb@Ob@b@xP(Ob@>b@@A>@$P NP @@@F*@b@g(@A@.@`@a@g(@A@@Nh@h@^@ ^@NPP@]FhN@@[OgN@g@^@U@^,@U@TN@g@AN@U@T@e@A@@NT@PPZ@\(@]T@PP[@](@XA@@N T@PP]Oo@n@ T@PP]Oo@(n@Y@T@\eFx@$P P[Oo@>@F*j@@6 NP*P@@P@Yb@lPxgPn@xP@@o@@@@(@@(@0P%@rzP@P@zP@@ @X@PP@q@@@>A@f@@>A@f(@$P0P@@P@PP@@|@>A.@@@T@A@PP[.OzP@B(@@G@@@@@A@Y@iLzP@@ _@@X@PP?OO,OA@.O`@.Oa@.Of@$P@@e_@@@@@@@A@@@@@@@@@@P@$P@ @@@A@@@P@@@PP@@@P@P@Na@q@#@@P@ `@`@@@P@P@Na@@@@@@*b@@@q@@@P@`@`@@$P@@%@e_@@@@@@@@PP@A@@@@@m@f@r@j@b@@P@$P@ @@@A@@@P@@@P@P@ip@@@@ $@@$@`0`@@@@@PzP@@ PP,@@X@?@@@ 0P%@al@@@$P P@lPP@zP@g@PP@PP@Yc@A@^@@^@N A@A@^@A@PPO^,@@0P%@7zP@P@^@^@N%PP@]FNN @\O@@@@$PP@NN @\O@@@@@@$PP@^,@zP@@@@@$PP@zP@@@@$PP@V$P:P@0P%@zP@P@$P@@e_@@@@@@@@@@P@$P@.@P@zPB@^@^@NPP@]FN@\O@@\O@]O \O@@@@$PP@@PP](O^,@PP@PP@Yg@@Y@@@Y@@@(@@@@@@@@ $PP@@PPZ(@[(@^@'0P%@zP@P@P@(P}(@zP@@@b@T@  @@T@N%PP@]FN$P P@[~OP@.P}@@@@\NO zP@@@P.P}@$P P[~OP@.PT,@@20P%@A ;0P%@8zP@P@$P@@e_@@@@@@@P@P@@@@@ P@PP,@P@P$P NP2P@@P@zPB@@@@@b@^@@ @^@N PP@]FN@\O@N@ ^,@$P4P@@P@^@zP@6@$P P~@PP@[O^@>d@^@ ^@N!PP]FN^@PP\Fl@zP@g@PP]O(@(@l@@@@@@@ $PP@0^,@d@^@ ^@N PP]FN]Ol@@@$P P@lPzP@g@^@PP\gF]O^@T@ ^,@$P6P@@P@@zPB(@G@e@@@@N(@P@N@@xPN@N@FN@>@@FPP@@@N(@P>@N@@xPN@N@FN@@@FPP@@@P@0@$.$.@$@N@@@@@@@.@.@@0@.$$@@N@@@$P<P@@@@_@ _@N@ A@PPNO@_,@@@p(@T@ T@NPP@]FN@\Ol@@@]OT@p@T,@p@$P,P@@P@p@T@l@@@$P P@T@lPPP@\gF@@lP?68@@@@ @XN@P6 T@PjLlP?Pip@P,@@(@@N@,@$P.P @@P@@!c!O!b!cY apl_storage_manager_ symbol_table  sys_info max_seg_sizeapl_segment_manager_get#$free')apl_get_symbol_,,0apl_system_error_338check_storage_manager_allocate;AD;'Gclear;JLdebugOOQioa_ ioa_streamTVYhcs_ truncate_seg\^bapl_error_table_bead_already_freeejoinvalid_free_beaderwuninterned_symbolezbead_not_known_to_aplewsfull_alloc_too_bigewsfull_out_of_mapsewsfull_out_of_segsehash_table_fulle no_type_bitsewsfull_on_stackenon_existent_stackewsfull_no_stack_segsetables_inconsistente apl_static_ ws_info_ptrapl_free_bead_H` trace_storage_managerR` `` apl_free_words_v` apl_allocate_words_` apl_copy_value_ ` apl_initialize_storage_` apl_dispose_of_storage_ ` apl_clear_storage_'O` apl_get_storage_usage_2`! apl_get_next_value_stack_seg_;'`* apl_get_value_stack_>2`5  >&&&&+&2&:&F&I&N&S&[&d&q&y&&&&&&&&&&&&&symbtreeJsS*JPL/I 6"' *G8DMultics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map \1RJji-F,Hu%FlH!F1H&F.H%FHn$F0H'F#H%F-H'FH-F!H$FH>special_ldd>on>apl.1129>apl_storage_manager_.pl1>ldd>include>apl_storage_system_data.incl.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_symbol_table.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>apl_function_bead.incl.pl1>ldd>include>apl_lexed_function_bead.incl.pl1>ldd>include>apl_group_bead.incl.pl1pl1info apl_storage_manager_I5_BAh@)z(xS+: O*t F<s 0P izFOB hx|9@i<&>kz|=OA OtAh W|5@AS<O-O2t<O _jZZk #P+Vj+E@ @ZZ PVj+Z+VjVj @ZUPk  + ++ +k k Zk +k NC9UYUYUYUYUYUYUYUYUPobj_map ?> Gh  apl_subscript_a_value_ 11/29/83 1639.0re 11/29/83 1618.9 41184 4?#DD@6@HL@DN6# @$PPr@@XP%@PPB@P@D@@@F@@N@3G@wBP @J@&jrP@5@T/@@V/@BP@@X@F@HP(FM(@M@LN@J@ M@Z@Xvd/M@dPZ@XP F@E@M,@@$PPPP@@@$P PPP@@@$PPPP@@@$PPPP@@@$PPPP@@@PP@.@PP@,@$PP@@@bP%@PP@P@F?NF:NOrP @@@ @ONR@@@@@@N@.@@@e@@@@@@@$P P@RP@,@RP@@P@P@POP@P@PNn@Op@FD@@F@@N@G@pP @J@nP @J@nP @@pP @@pPpPpPB@inP@N@(@3h(@F@u@M@ M@uN@(HPF@h,@Fh@nP@NOkM@DP@FP@@@v@\@\@vN@h,@h@nPO\@PP@NNNS\,@M,@@@rP@5@T/@@V/@nP@@X@pP@d@F@HP(FA(@M(@M@LN@J@ Z@A@Xvd/Z@dPA@XP F@E@@@A.@M,@pP.@@x@K(@L@N@F@M@M@N:N@HPOOM@DP@FP@P@0@@ M@BPNOOL@L@K,@O@@OL@L@@@OM@BPNO@@@O@@(O@@K.@(ON@ON@M.@x@~@J@L@>G@L@>G@K@t@>G.@!K@fPOd@J@@@kd@fP@g@BP@ipL@@@K@@@h(@F@@M@M@N@#HPF@h,@Fh@fP@OM@DP@FP@@@@\@ \@N@ h,@PPFh@fP@O\,@M,@~@@Z(@[@F@\@\@NE[@ HP,FFNO@O[(@\@HPF@F~@OZ@Z@'FFFT@^/@@O^@@b@^@=S@`/@^@KVO@;`@K/@,O@4`@@b@0NO.OZ@Z@\.@@@DPj@@@M@ M@N@ DPFP@@P@0@@DP@Oj@.@@N g@@@@$PP@M,@jPrP@g@@@]8fPjPipfP@@jP@L@@K@@@M@ M@N@fPFM@jP@OM,@K@jPOl@J@@@kl@L@dP`@`@dPL@ `@`@jPg@P@P@c@@@@P@@#M,@rP@@>@ N@@@@$PP@rP@@rP@@@@F*rPb@P@P@!G!j!G!f!G!H apl_subscript_a_value_ symbol_tableX  apl_free_bead_apl_copy_value_apl_error_table_index!&(length!+-value!02assign_to_value!59domain!<>rank!AC apl_static_ ws_info_ptrFILapl_get_value_stack_OOUb"` apl_subscripted_assignment_eX`[ && &*&/&4&;&@&E&N&WsymbtreeJsS*J01PL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map \3RJji%FlHs!F1H|%F(H%FHn'F#H%F-H-F!H,F'H$F0H#F"H(FkH>special_ldd>on>apl.1129>apl_subscript_a_value_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>apl_lexed_function_bead.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_list_bead.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info apl_subscript_a_value_+z(x3 _4]x_jZZjZ_j@ZZPVj k @eU*eU*eU*ePobj_map fJRfl  apl_system_functions_ 11/29/83 1639.0re 11/29/83 1619.3 77616 s=W#X6T(L4xxxxxxxx?#apl_quit_active_function_errorDD@6@HL@DN6#1F`P%@,P@P@P@Z@Z@@@[@@?@@\@@@@@N[@@@^/@*@`@ @ @P'@@P1@@@@@@@@$P P@(@/@@`@ =w@^/@PP@@Z@P@(@@>b@v(Pcg@c@P@P@c@\@@ip@@@(@@@d@@@@+d@@c@^@/@@@@@@Np@@i@j@k(@Nl@im@@JN@c@@@ _@@]p(@q(@r(@m@@r@@N@@@@r~@r@Te@ .@.@>s@pN@p@q,@r.@p.@q@p@i@PP@@Z@P@@@yc@q@@p@@r(@t(@t@qN@%m@@@@r~@r@Te@ .@.@>s@t@p@@s@~r@@@dP@@@@Ep@@@F@ `@`@s@r.@t,@<@:i(@PP@@Z@P@@;c@(@(@@@\@@@@@NH@@i@UZ@@j@u(@Z@u@N@ j@k@u@^@d/u,@PP@@@Z@P@bPhg@h@c@@@ip@@@@@@@@@`@`@@@@Of@@@@)f@@a@i@dP`@`@h@PP@@@@@j@k(@X@Pz@|N z@@@@N@{@@|@}(@~(@(@@@@@Nv(@Z@v@N@([@@F=S@/@@OKPO@@K/@$O@@@@N}@ N~@N@v,@P@P@z@3NZ@P@@@Z@P@@(@(@@@P @@@@ @N@9P @Fm@ m@N/z@N m@{@|@@T`@.@.@>@m@@N@@@@}@l@@@~@ e@@ @^m@@m@,@@N7@@i@z@NPP@@ @@Z@P@P@@(c@@@@@r(@z@NP@P@|@i@>b@ei@{@fP `@`@fP{g@P@@@@\@@@@@N@@i@!Z@@j@u(@Z@u@N@j@k@u@^@d/u,@@@j@k(@ @@@@N@@@@@@@@@$6@ @~@@(@(@@N@I@@@@ @ [@>@ FF`.@@>@@.@@@>@>F@@@@$PP@P@@@ `@`@P@@$6@ @~@@@[@@@@@@E@ f@`>@ F@@>.@,@@i@>>@@@n@@@$PP@n@ ip@(@e@e@i@@@@ `@`@P@@@T@(@@ @@@@F@@@o@@@@@@@@@@@@@@@ @@@$PP@@ @P>@5@^/@@\@Fn@o@@o@@@m@m@@N@n@@!@@@ >@@@@@$PP@@2m@@@.@@@@@@$PP@m@n@@m@@i@P@P@Z@P@@i@N(@@c@i@@m@dPi@@ `@`@@P@^/@B@\@*P@@ P@@@@@@N@@i@>b@G[@dPi@ `@`@P@ $P(PP@P@@P@P@?FN@@@i@@@@@@ $P P@i(@Df@@@$PP@E@@P'@ P@@$P@@0@i@T@(@i@i@@dP `@`@@@@fP@@@@@ @@@@@@@$P"P@ @(@fPi@dPP@g@@@@@@@@@A@@@ $PP@u@Ad>@.@.@@@d~@i@@7@@i@dPfP@@ `@`@f@@@$PP@dPi@ `@@Adc@i@@@@PP@.@$P&PPP@@@,@@m@.@@m@@ @$PP@@@@P@i@>@@>>@b@uEPcg@c@P@P@c@b@@F*Pb@@@ip@@@i@@@@>@@F*@@b@d@@@@i@@@>>@>b@GPcg@c@P@P@c@@@ipi@@@@@@@@>@F*d@@@@*d@@b@@@@P@@#M,@P@@>@ N@@"@ @$P.P@P@@P@@@@F*Pb@P@P@@&l@0^/@ m@@N&@.^/@@@@&@^/@@@@^/@ @@ ^/@^/@X@@k@j>@)@T(@[@k@>*@+e@@.@*@0@w@2@x@4@y@6@+@8@(@:@<@>@@@B@D@,@$PP@y@Nl@@k@j>@+@T(@[@w@x>@*@)(@F@Ge@@.@*@0@)@2@F@4@y@6@G@8@(@:@<@>@@@B@D@,@$PP@y@l@@x@T(@[@x@i@.@w@ `@eG(@m@0@G@2@(@4@6@8@,@ $PP@ @l(@@@@N,@m@@N@ @ m@r@dP@@ e@`@r.@@@ql@^/@;m@@jNJ@q^/@3@@@L@q^/@+@@@m@@@.@@@@P@N@$PP@m@K@S^/@@@ @V@R@X@T@$PP@R@I^/@F^/@@@n@.@@n@\@Z@$PP@@!b!!b!!b!d!b!f!b!!!b! apl_system_functions_ symbol_table  convert_status_code_cu_cptimer_manager_sleep!%'apl_free_bead_**.apl_get_next_value_stack_seg_119apl_segment_manager_get<BCfree<FH apl_scan_KKNapl_get_symbol_QQUapl_pendant_function_check_XX_apl_allocate_words_bbgapl_function_lex_no_messages_jjrapl_system_error_uuzevaluate_active_string} error_table_badcallapl_error_table_domainexec_restrictedno_sv apl_static_ ws_info_ptrapl_get_value_stack_I` apl_quit_.1t active_function_error.2 0&& &)&0&;&E&J&P&W&a&i&t&|&&&&&&&symbtreeJsS*J{PL/I 6"' *G#:DMultics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize maph2RJju(FkH%FlH!F1H%FHn,F'H'F#H$F0H'FH-F!H%F(H$FH&F.H%F-H,<GA>special_ldd>on>apl.1129>apl_system_functions_.pl1>ldd>include>apl_push_stack_fcn.incl.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_function_bead.incl.pl1>ldd>include>apl_lexed_function_bead.incl.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_characters.incl.pl1>ldd>include>apl_symbol_table.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>cp_active_string_types.incl.pl1pl1info  apl_system_functions_alAx3%Sx hxkh F<MO xGhi<}Ot_jZZjZPVjuZFkVjPkVk:@Z+@ Z+UXV@ZjV`Z@eU*eU*eU*eU*eU*eU*eTobj_map 0G`  apl_system_variables_ 11/29/83 1639.0re 11/29/83 1619.6 56664 3,9F@!.Pww]!LA36 BITPAIRED TYPEPAIREDARDS TN300 Absentee 1030 TELERAY11 ASCII TELETYPE TEK4013 CORR2741 2741 1050 3270-DAF 3270 (UU@ #T4Absentee?#get_device_typeget_keying_timeDD@6@HL@DN6#  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ @$PP@@v| P%@PP@@?@jNxNNqNolP@@/@O@@]@O@Z@@P/@@P@C@;C@NMP@5@/@@P@@@F@8P@F@HP`@`@@@>@F*J@@b@PP@e@@PP@@@)@N&P@@@.@@@ P@@@@$P P@PP@@@P@@@$PP@@P@C@C@NNP@@P@C@rC@NNP@@P@C@eC@P@@N@P@5@J/P@ =wJP/@@P@ =wJP@/@@@T@@$PP@@@@@B@@@@@@@P@B@T@T@ =zwJP/@@P@@/@A@@@O@@@P/@@P@C@@ =cw@C@}(@c@P@@O@@P@@Q@@R@@@@@@@$P P@R@ =Ew@C@_R@ ==w@C@WO@O@T@@$PP@@@@@B@@2@@.@+@@P@B@-T@T@ =w@C@2N(@Z(@[@[@N4P @\@\@0@$\P@N[@NN,@Z@@5@J/Z,@NN [@NN,@Z@J/Z,@@\@[@N@HPip[,@@P @\@\@0@\P@N@C@NNC(@@\@C(@5P@d@O@@Q@C@N@@HPip%Q@5@J/PO@5@JP/@P@5@/@V@5@/@W@5@/@X@5@ /@Y@5@ /@@@@^@@$PP@@@@@B@@@@@@@P@B@ @@^ C@ C@N  @FG ^ C@$C@(@@@C@@@$PP@{+@/@~^C@uN@@N@>@@>>@F@uPHP@J@@HP@ipHP@@@g@P@P@c@N@ `@g@C@@@$PP@C@C@GPE@i@@,@(@$PP@@@@@h@@@@@P@PE(@h@~N@N(@@N@>@@>>@F@)@HPipN@HP@@@@@N@N@@@>@F*J@@b@N@ `@`iPP@e@@@f@C@5@@/@@f@g(@N@@@J/P@PP@.@$PP@@@PP@.@$PP@@@$PPPP@@@ P%@fPP@@L@@@N@@@@@D/@ @@@=S@D/@@@KP@O@D@K/@,O@D@@C@NN @@@(@@@@O@@P@ @Q@ @R@@@@@@@$P P@lQ.@R@ =iw@X@m[R?@ =cw@Y@X@FV@@@X.@X@<FW@<@@X.@@@PP@@@@@@D/@ @@=S@D/@@@KP@O@sD@K/@HO@lD@@C@@@PP@@@Na@@@@/@@@g@@N@@@>>@>F@G"HPP@Pg@f@ipN@@g@@@>F*J@@@*J@b@@@@f@g@N@HP@@@@P@@#M,@P@@>@ N@@@@$P P@P@@P@@@@F*Pb@P@P@!F!H apl_system_variables_ symbol_table|  apl_copy_value_apl_free_bead_decode_clock_value_!!&iox_control)+-get_line)03 system_info_users6:<apl_get_storage_usage_??Eapl_error_table_bad_assign_to_system_varHMTdomainHWYunknown_system_varH\a apl_static_ apl_inputdgj ws_info_ptrdmpapl_get_value_stack_ssy` apl_ibeam_|` "&& &(&/&5&>&G&V&[&c&l&r&{symbtreeJsS*JyPL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map P2RJj]%FlHg!F1Hp%FHnz$F0H,F'H'F#H%F(H(FkH>special_ldd>on>apl.1129>apl_system_variables_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_parse_frame.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info apl_system_variables_+8!z^<O}xCi<aOMP x__jZZjZPZP PVkZZZV`Zk @eU*eU*eU*eU*eobj_map "4  apl_translate_pathname_ 11/29/83 1639.0re 11/29/83 1619.7 49536 TaplTVV TTV VV!T TV#4V?.sv.aplsv.aplcf.aplapl ?#continue.apl>^a.sv.apl>^a.cf.apl0123456789continue.sv.apl>apl>library_^d^a>udd>^a>apl_directories>^d^a8u0P&@ "PP@@P@@P@@K(@L(@M(@U8~0P&@ "PP@@P@@P@@K@L(@M(@980P&@ "PP@@P@@P@@K(@L(@M@80P&@ "PP@@P@@P@@K(@L@M(@pPPP@t`@.@.@@>P@M@(FTj .@.@>P@~@@~@@T@@i@@P@ `@oQ@@O@@@@6@@@ $PHP@ @Q@$P@[[Q@P@~@@~@P@PPto.@.@@>P>@~R@QN@UK@(~@@~@@T@@pl@(@@i@@R@ `@n@@S@@@@@@@@@@$P2P@) @~@@~@@T@@pl@(@@i@@R@ `@n@@S@@@@@@@@@@$P2P@ @N(@  @@S!N@P@ `@E@@B@@@@@$P6P@O@N"@@@@\@@@@B@@O@@S@@@@@@@@@$P2P@ @@a@@@\@@@@O@@S@@g@n@d@k@e@@$P2P@N@\@@@@P P@X@@V@@ $P@P@\@@@@@@P P@D@@7@@@@$P:P@P P@@P@ `@@@@@P@@@ P@"PP@!@ @@ $P@P@PP@ `@@@@@@ K@v@@Ajpp@@AjpP@@@@@@@@ P@"PP@@@@@@$P>P@P P@ F@ /E@@B@@@@@$P6P@@@@@$P8P@u@E>@.@.@@@~@@>i@@ `@`E E@ @@`  @kM@  F@  @@@$P4P@]L@[P@t`@.@.@@>O$P F@@(@@@@@@@@@@@@ P@@@w@q@|@@<P@h@@@@@@@@$P@@@@P@ P@U@c@U@]@@[@@FP@P P@@@$P4P@@@@@PP@ P@A@5@?@<@@$PBP@P P$PJNPP90@ P@@DP@0PPP@ `@@@P@ `@@ @sv.aplcf.apl apl_translate_pathname_ symbol_tableu  ioa_rsnnl get_wdir_ user_info_whoami #%homedir (*expand_pathname_--2hcs_fs_get_path_name57< add_suffix-?Babsolute_pathname_EEJ msf_manager_openMQScloseMVX search_paths_find_dir[_b cv_dec_check_eei error_table_noentrylpr~=` file_system_pathnameuX`x allow_version_one~t` use_search_paths` 2L* &&&'&,&4&>&D&L&U&Z&d&k&tsymbtreeJsS*J(,kPL/I 6"' *=zK^pwKKMultics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map04RJj>special_ldd>on>apl.1129>apl_translate_pathname_.pl1pl1info Eapl_translate_pathname_DB!_ |O"4xi<]O 4MxK> <O O6_jZZjZ@kVj+@+ZkVkZk+k k k C9UYUYUYUYobj_map L*zT  apl_transpose_ 11/29/83 1639.0re 11/29/83 1620.0 28944 4?#DD@6@HL@DN6#?P%@Pj@P@P@@@@@ @D@@@B@@@E@jP@F/@@H@@PJ@J@0@O@u@ @N@@L@@Nr@EN@s^/@Z(@Z@EN@ ^@LOL^/@Z,@H~@w@^@@w@O@`@em@ m@bPOm@m,@ON@m@m@bPOm@m,@ON@d@E@~Z@ Z@<N@Lv@e@Lv=S@f/@LKFO@f@Kx/@,xO@f@@e@H~@e.@e@ bPw@FSNd@w@Od@w@.OOZ@@P@NN@NOd@@Nd@Z.@h(@h@ON@bv7Nh,@P@h(@h@ON@ P@bPOP@h,@D@P@>`@P@>`@O@l@>`.@ O@RPOT@D@@w@kT@RP@g@@P@ipP@@@O@@@h(@ h@ON@ bPFh@RP@Oh,@P@Am@ m@bP(Fm@m,@ON@\(@ [(@h(@h@ON@ bPFO[@[@h,@D@ \@TP[@BP F@E@\@[@BvT/O@i@i.@i@bP,Fw@Fi@RP@NOw@(N\,@PP@@@PjP@c@ @@JPjP@c@bPjP@c@hO@l@>`@VPRP`@`@O@OX@D@@w@+X@c@D@TPP@ `@`@P@TP`@`@P@P@g@@@E@N2E@O@`@d4d@Z(@ Z@ON@E@Z~@[@Z@d@b[@@PNbP@Od@Nd@Z,@PP@(@$PPPP@@  P@P@ P@P@@ P@P@@PP@,@@n@p@Pv@v@#Mv,@jP@@v>@ N@v@|@z@$PP@jP@t@jP@@v@@F*jPb@pP@Pn@!`!V!`!R!`!bapl_transpose_ symbol_table? apl_error_table_domainrankcompatibility_error %length(* apl_static_ ws_info_ptr-03apl_get_value_stack_66<B `&&&'&,&5&>symbtreeJsS*JJPL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize mapL+RJjW%FlHa!F1Hj%FHnt'F#H~$F0H,F'H(FkH>special_ldd>on>apl.1129>apl_transpose_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_operator_bead.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_operators_argument.incl.pl1>ldd>include>apl_push_stack_fcn.incl.pl1pl1info apl_transpose_A{C0 PZjk+kP+@Zk \@eU*eU*obj_map CDLX  apl_v1_copy_command_ 11/29/83 1639.0re 11/29/83 1620.3 78048  "#$%&@^`{}6VGXTTLVT V VT T 4#V?N?#saved ^aws lockedws not foundapl_output_not copied: V6:P&@ "PP@@P@@P@@(@@,@@(O@,@N$P"P@P@P@ F`J@@@@@@@@@@@$PP@$PPP P@@P@F@@p@@@@@ P@"P@P@@@@@@P@P P(@@@@@@@@@@~@@A@@@$P P@@o0@P?6@P$PP@@P@P@>FPP@ `F@@@@]]@\@RR@d@@@@@:@4@@$PP@@(@>>@F@@>>@>;F@@@@@@6>@>N$PP@@P@.@$PP@P @@@@@@F@P@ PPP~@(@ @N@PFC@ C@>C@@@@@@P@/@@@@@@ P@ @@@@@}@@P@@V@@@@@@@@@@@@@@ @P@C@,@@E@ E@N@y"PP@@@@@@@E@~@ FPP@@Tf@ .@.@D@,N@D@T@D@i@@@ `@e@@@@@@@@ @@0@D@T@"PP@@@@@@@E@~@ F@D@i@@@PP `@e@@@@@( @D@T@"PP@@@@@@@E@~@ F@D@i@@@PP `@e@@@@@@@@?@6@@ [@ @E,@@FF@E@^a@@@@@@@$@@@@ $PP@P@>>>F@y@@@@@$P P@@@ @a@@@@@y@@@@@@ $PP@@@@$PP@.@$PP@@P(@"PP@[@\(@P@P`@H@b@\@d@Pf@h@j@^@ P@H@@RN P@PP6@@l@ P@P`@"P@Pd@^@`@@@`@^@@3PP@P@@.N@@@@@`@L@b@^@;@LP@ P@B@@@@@@I@@B@>@x@@I@@B@>@x@@I@@B@>@x@@I@@B@>@x@@@>@x.@@x@`@@@@b@^@$P P@H@ P@@@@@@@I@ip@B@@@@@F@@@l@@@\@)@@a@R@J@J@RN@  P@@LP@FJ@OJ,@LP@J(@ J@ PBN@>\@LP@@>$\>@6FJ@.@/J@&@/J,@@i@@N `p`@+@P P@B@ `@`  @J(@J@ PBN@J@>]@LP@@>]>@F5@@/J,@J(@J@ PBN@{J@>]@LP@@>]>@FF@POOJ,@i0N2N@@@@@`@ P@b@^@z@ PP@ @B@>>x@x@`@@@b@^@$P P@H@ P@@@@@@@ ipL@@@@@@@@@@@P@ @`@L@b@^@R@ PP@ @PP@P@@0N@@@@ 1N@@@@@@@@@@B@@@LPP @ `@`@@@@(@C@@ @D@G@ D@NC@LPTo .@.@>E@ P@@@G@ npo@G.@C>@>C@D@E~@~D@ P@@G@~@T\@](@@p@@r@B@t@]@v@ P@@x@\@z@?|@C~@J@F@n@$PP@IN@@@F@@@`@P@b@^@@PP@ F,@@`@P@b@^@@F>@ P@x@@x@`@@@@b@^@$P P@H@ P@@@@@@@ipF@@P@PP@`@P@b@^@@F@S@J@J@SN@PP@V\@](@@`@H@b@]@d@\@f@h@j@^@ $PP@ P@@F@J~@H@OP@P;PP@V\@@`@N@b@\@f@h@^@!@N@0@PP@V\@@`@\@d@^@k@PP@V\@]@@p@N@r@]@t@\@x@z@|@n@ @PP@`@P@b@^@<@J,@[@>]@T\@]@i@P[@ `@` E@`@\@d@^@/@ @H@@N@T@V@P@0@$.$.@$Z@Z@@.@@@NZ@@@$PP@T@`P'@PPZP@ P@P@>>>FD@E@D@EN@F@3E>@FF@$G@ PP@@>>>H@>$ >G>@G@F@I@H@>I>@F@I@G@@0F.$.@ I@-@@PNP F@>E@F@~D@F@$I@ PP@@>>>>$>I>@@0F .$.@?@@F$@@~G@H@@L@G@N@H@P@B@R@~@T@A@V@J@$P P@B@0@'@BP?6@@ PO@@O@P@@>>>>$H@ >I>@@0F.$.@6G@PP@X@H@$>I>@@0F.$.@6X>@G~@@P@PP(@"PP@B@P@P @@`@@@ P@P@@@@PFA@ A@A@F@ P@H@D@*@ PP@@BN@@@A@PP@@@|PP@@@F@@H@D@@  PP@@ @@F@@H@D@@@@PP@ZPP@`P(@"PP@@@ P@@@@ `@$S@@@@>@@PN@!HHB@GD@^aA@B@H@A@J@ P@L@%N@P@R@F@ $PP@ P@ `@$@@@A@@A~@A@@~@AN@A@@@@.@ o@$@@@@>@N@ PP@P~@@N@@@@.@ o@`@!H  !'()*+,-./0123456789:;<=>?ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]_abcdefghijklmnopqrstuvwxyz|~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~* apl_v1_copy_command_ symbol_table  apl_error_table_ cant_load_wsapl_allocate_words_$apl_date_time_''+apl_free_bead_..2apl_function_lex_55:apl_system_error_==Bapl_translate_pathname_allow_version_oneEKPapl_create_save_frame_SSYapl_destroy_save_frame_update_\\dapl_get_symbol_ggkioa_ ioa_streamnps msf_manager_closevz|get_ptrv apl_static_ ws_info_ptr@` copy= copy_expand copy_symgett not_copied $&&&&-&4&<&D&R&[&f&m&u&~&&symbtreeJsS*JzPL/I 6"' *Multics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map P1RJj]%FlHg!F1Hp$F)Hy%FHn%F-H$F0H$FH'FH>special_ldd>on>apl.1129>apl_v1_copy_command_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1>ldd>include>apl_save_frame.incl.pl1>ldd>include>apl_bead_format.incl.pl1>ldd>include>apl_symbol_bead.incl.pl1>ldd>include>apl_value_bead.incl.pl1>ldd>include>apl_group_bead.incl.pl1>ldd>include>apl_function_bead.incl.pl1pl1info apl_v1_copy_command_xB!|AO)Z<@)zy(_ ]xy iZ< @i|_O[s_jZZkJ@ Z |Z+@ @ZZk+XV@Zj +@eU*eU*eU*eU*eT`obj_map ^$fl  apl_wsid_command_ 11/29/83 1639.0re 11/29/83 1620.3 9648 TTdTV V?was ^ais ^a #`P&@"PP@B@P@@PP F`@1D@@H@D@J@@@L@N@P@R@F@ P@D@@H@D@J@@@L@N@P@R@F@ P@@PP@PB@ @@`d@apl_wsid_command_ symbol_table# ioa_ ioa_stream apl_static_ ws_info_ptr & `Mapl_output_ &&"symbtreeJsS*JPL/I 6"' *WxdjquddMultics PL/I Compiler, Release 28d, of October 4, 1983Martinson.SysMaint.moptimize map8.RJjD%FlHN!F1H>special_ldd>on>apl.1129>apl_wsid_command_.pl1>ldd>include>apl_number_data.incl.pl1>ldd>include>apl_ws_info.incl.pl1pl1info _apl_wsid_command_A 0PVjZZjVj .CU@obj_map MM't|x