bcpl_arithmetic_ 04/22/82 1623.4re 04/22/82 1519.5 30924 MaxRq@bIdII@@IMIIIIQ@I@MinRq@bIdII@@IMIIIIQ@I@AbsIq@bIdII@@IIIIQ@I@AbsRq@bIdII@@IMIKI8IIIQ@I@MinIq@bIdII@@IMIIIIQ@I@MaxIq@bIdII@@INIII$IQ@I@RandomIq@bIdII@@@ I`II IPIJ@@  @@@ @@@ IQ@I@RandomRq@bIdII@@кII I P II PIIuI8IIIQ@I@ Logarithmq@bIdII@@I}8IKMIIM M1I1I=I8II1I1I1Iu=I6$}I}II}II@}@I PII}(18I>III=8II}uI8I1I1I= 8II1I=8I uI =I1I=I8IIIQ@I@s7Ujb Exponentialq@bIdII@@IM ILM>IFMC9 BKMI2;KMI,u1I8III PIII PII}I8I"}I 8I1I1I =I 8II1I=8IuI =I8II1uI=8I$~I=I$IQ@I@']W>2`9W1 SquareRootq@bIdII@@IF$}II$}}III$~II$18I>III1=1I18II IuI=I18II>IINI$IQ@I@(,jIpowerIq@bIdII@@IIIIIIIIII IIIIQ@I@RpowerRq@bIdII@@I Iƺ II1I 8I% IQ@I@RpowerIq@bIdII@@IIuI8IIIII1I8II1I8II IIIIQ@I@+bcpl_arithmetic_RpowerRRpowerIIpowerI Logarithm Exponential SquareRootRandomRRandomIAbsRAbsIMinRMaxRMinIMaxI symbol_table..1+@+4.@ +71@ +:4@+=75@+@:@+C=@+F@@+IC@@+LF,@+OI@+RL@!+UOX@#+XRm@%+U'+bcpl_machine_code_RtoIc[`ItoRh[e RawClockTimeo[jB &b&g&nsymbtreeHAHbcpl %* >~~~-'GMH٠7GHgBCPL version 3.5, March 1982Holmstedt.SysMaint.amap 6180 >spec>on>04/22/82>bcpl_arithmetic_.bcpl >ldd>include>head.incl.bcpl ?B>*>Vk !"$CMNOP QRS1.>5A6D7F8L9P:R;X=\>a?i@~A&'()*+,VWXYZ[\^j kl`$a&b-c.d4e7f=hրYe,<O-<@@S#obj_map BBqQ  bcpl_command_lib_ 04/22/82 1623.4re 04/22/82 1521.5 66276 Pl1NumbArgsq@bIdII@@@`I&P@@@ $IQ@I@ Pl1Descriptorq@bIdII@@@bI&PIIK III@@MI=II=I II >II&P@@@IIII II#III~$yIuIqImIiIeIa_IM/݀M M MM M݀ M߀ MMրM € MMŀMMMM MM MMMM MM  M MMMMMM I I# @@I @@I@@IQ@I@ Pl1ArgPtrq@bIdII@@@ eI&P II>III I&P IQ@I@ Pl1ArgStringq@bIdII@@$P NII IӺ II I IINIIII I III(II I"P I II I P IQ@I@?Pl1ReturnStringq@bIdII@@6II.I8I6II8Iº6II @=@M@III8IP6IINIIII8II9II:IP6II@E* I`I I`I%@8II9I :IP6I8II9IP:IP66IP8I>II:I@IIII@KIMF I>I F~NIIILIIIQ@I@ MainCondition_q@bIdII@@IeI@eI&PII@@ I I>I>I&PI INIIIII I I IINIJI=IIMIIIIaIIIIII@K@@IQ@I@unclaimed_signal SetHandlerq@bIdII@@I II> I  IPI> II IP bII> IPI IPIL@IMII@N)@IJI@a@~@ @I)@IQ@I@Complainq@bIdI8I@@$P II> I  I~uIaF I> I INi I&@IgI%@CLI@T.I.I IICMI@T/I/I"II@CNI@@T0I0I$IICJI@T1I1I&II@CKI@@T2I2I(IICLI@T3I3I*IICMI@T4I4I,I!@@P IP@IP eI  I I I@N@@ "PIQ@I@cleanupL$ OptionParseq@bIdI+I@@ I`II `I IIIIIP-NI>I IIII@INI  IIIIIIP$ II IIII@JIPINIINI=IIMIbIII>IIII>IPIIoNIOMaIII>IIIIIP_NI>IIII>IPIIII>IPIIlNILM8IdNIDM1II IIIII>IPIIII|cIII PIyIIIIP$^MnMoMINMOM P&@IIIIKIIILII I P&@IIIIII III@@NP&@III II IPI&@ IItI  IIIIIIIII@II@@III@NIQ@I@newConcatenateArgsq@bIdII@@IIIbIINIII(I P*IIIIII?I=IIIIIIII1IIIIIIIbIII PI>IINII$IQ@I@ GetNextCommandArgq@bIdII@@(N@ (@II I I(@=(@IQ@I@ P@@@"P8bcpl_command_lib_ConcatenateArgsGetNextCommandArg OptionParseComplain RevertHandler SetHandlerPl1ReturnString Pl1ArgString Pl1Descriptor Pl1ArgPtr Pl1NumbArgs symbol_table MainCondition;;>8@8A;@ 8D>@8GA@8JD@8MG@8PJI@8SM@"8VP@&8YS@*8\V@-8_Y08\_48bcpl_conversions_ ConvertStoNkbg error_table_badopttmq bcpl_strings_ Concatenate~vzCompareStringsvSubstrvbcpl_machine_code_Subchcom_err_ITSactive_fnc_err_noargm MakePl1StringvLengthv SetLengthvMoveBitsNumbArgsBCPLaddr(((&j&s&}&&&&&&&&&&&&&symbtreeHAH bcpl %* >-(G^H١7GHgBCPL version 3.5, March 1982Holmstedt.SysMaint.amap 6180 >spec>on>04/22/82>bcpl_command_lib_.bcpl>ldd>include>head.incl.bcpl ?( (!-"3#7$?%L&P(V*X+[,^-a.b/e0f1i2j3m4n5q6r7u8v9; >@A"B(C-D9EDGRHUIXJ]KbLkMnNsOxPQSTUVYZ[\]^lmnopqrstvx,.689MNOUZzi{k|p}u~}abcdefghij  npu| #79PRV^ceiosz| xk-i II oIIo~I~pIpIFIsIoIFIs=IrIFIr=IqIqIFI IIKoIFItIpIFIt>IsIFIs>IrIqIFIr>IIIՁ INI҄I=I IIL MA ~0 II@>MIIN I~ I IIIQ@I@ ConvertNtoSq@bIdII@@I IeI2Pr I INI IM II III -I@JIIIItIIIKu`IIvIIwIrr>IIII@ItIIuI0PrIIQ@I@ ConvertFtoSq@bIdII@@IIbI2PvNIIM IIK8I-ILmIIMMIIMI@M mI>mII@u8II@M mI~mII@18IIMIxI.PvnInIxI,PvoIIo}I8InIxIII@MyaI zI{IvoIIo>I>IIo~II.II@NINIpIIqII@18II=IIxI.Pv F0=IIJpI>pIpIqNImI!I=IEII@KmI I=ImImI-IILmIxIIIMybI zI{Iv>IIII@IxIIyI0PvIIQ@I@83f RemoveEscapesq@bIdII@@IIaITIaIII(I*PII(PIIIIII&PII'NI"MINIIIII&PNII>II~IIIII,~NIII@@IIII0PIIIIIIII$PIIIII&PII*NIMII>IIIII&PIO      }{yI=IIIII&P*NINIrII"IMI!III>I&PI0NII7MI0~I@@II>II>IIN݄I?I=IbMoM ̀tMvMrMsMfMkMnMcMdMNMSMTMVMOMRMDMFMKMBMCMII>IIIIJI>IINI8II@@IIII0PIIIIIIII$PI$IQ@I@ InsertEscapesq@bIdII@@I`I6I`IIII(I*PII(P5II5II/,~NIII@IIII0PII5IIIIII$PIIIII&PII>IIIIKntbfvrdkIoIKMeeM3ހrMۀyM ؀|MՀ}MӀ~MрzM΀vMʀwMȀtMńĀlM oMpMmMiMjMgMXM_M bMcM`M\M]MZMRM UMVMSMOMPMMM~1M1{>MxEM uHMrIMpoFMmlBMiCMgf@Mdcb8M _;M\=(M:)M8O&M54KM D!M-"MC*M> M&? M2 M.1 M&#M%2II>I*II@LI>IIIIMIoNIIII@NeIII9>III>IINIЄII@@IIII0PII5IIIIII$PIIQ@I@ ConvertStoNq@bIdI'I@@2PN II`IIIII"PI@II I I I&@I I IIJ NI}I I III  I=I@E IIK I> I INI =I I IMII@L I I-N I+M  I-N II=IIIM I I$M'INI$I=IE I2 NI I9M I0~I IxN IXMI P&@I=III@N I+ I0} I I IMI  IA~ > I  NI IMI II >I II N  II,PI I@1=I 8II>IIIJ IINIԄ I I IIMI I I.MI N P&@ I} III=III@K IIMI0 NI I9M I@1 8I I0~I,PII@1=I8II uI =I 8IINIH IeM IENBIII=IIIL I I-M I+N  I-MII>IIIM I I  >I0~II>III@N IINI0 MI I9NIII@IIIPI I1I 8I I IK 8IINI P&@ IIQ@I@InitializeZoneInfoq@bIdII@@PIIII $ }IIIaNI IzMAa~I >III >I$ ~NIU c@ @@| c@b @t c@p c@@W @e c@a c@@LY c@ @@O c@AIcIIcIIIIPIIPIIIPIIIIIPPcIPII @I @I @I@I"M MǀMŀMMM MMIQ@I@CST CDT EST EDT MST PST PDT MDT PDTPSTMDTMSTCDTCSTEDTESTFormDateq@bIdII@@IcI @> 2P NIIIIIIIR . I@cL&I ~@IIIIID  @ IMI ~@IN@I~@INNI~@IIIII,  @ I@JIQ@I@GMTModq@bIdII@@IIFIIFI=IIIFI$IQ@I@ StoreDateq@bIdII@@I~0I1I׺.>II~IIIIFIII0I1Iƺ.IIFI eII>I I@MFI>II F II=0I1I. II~IFm>IIF>I III I~K I`I`I`I`I`I`I`II`I'`I`I `I"`I%`I&`I!`I$`I`I#`Iu`Iq`II`I I>I@ IILI@M II@N I>IJ IIKIL II@MIFI@NI I@F}II >I~Ia>FI@~@II >I~Ia>FI@~@II>I~I)I)I(I(>II@@I>I~I)I)I(I(>IILIQ@I@MarchFebruary;Zx0Nm"A`~4Rq (Gf;YxAugustJanuary SeptemberJuneNovemberOctoberJulyMayAprilDecemberSundayTuesdayThursdayFriday WednesdaySaturdayMonday SetTimeZone'qY@bIdII@@I`IPNEIII PIII/@III PIIPIIIP @II @IPIII PIII  @III PIIPIIIP @II @IPIQ@I@ P@@@"P$ set_time_zonebcpl_conversions_FormDate ConvertStoN RemoveEscapes InsertEscapes ConvertFtoS ConvertNtoS symbol_table'*'*$@$-'-0*@ *3-@*60b@*93@*<6@*?9`@*< *bcpl_command_lib_ Pl1ArgStringLBG Pl1NumbArgsRBNbcpl_machine_code_ TimeToSeconds^TYsys_infotime_correction_constantk`c bcpl_strings_ CopyStringumqbcpl_filesys_lib_Allocatew| LengthInWordsmMakeBcplStringm time_zone`bcpl_arithmetic_RpowerI error_table_bad_conversion UnpackstringT ConcatenatemSubchTLengthm SetLengthmItoRTRtoIT PackstringTNumbArgsT 44&K&Q&]&j&t&&&&&&&&&&&&&&&symbtreeHAH #bcpl %* >QQyQ-(G_H١7GHgBCPL version 3.5, March 1982Holmstedt.SysMaint.amap 6180 >spec>on>04/22/82>bcpl_conversions_.bcpl>ldd>include>head.incl.bcpl ?  ', @#C$R%W'\)i*m+p,s-u.z0|1~245679:;<>?@ABDEFG H IJKLM,O.P1Q5R7S:T@VNXQYWZ^kmqv} \_ilr|_`abcdefghikm|| !9=CHKOUZ`djmoqtxy|      */49fGgIjLkVlipjqortuuvzwz{|TUVX YZ[^ _$a/b8cBN])i*s+|,-.35876<:>?@BCDFG HJI$K1LGx h/ :NOӃ4]x xK ):V<'Oӌt}xI`IILIBPJ=IILII>MI@PJIILII>MI@PJFIILIIMINI@PJHI)JIHILI)VI=INI$XIIPI!ZIFIRI\I&@TI^I!@@>PJIP@IILIIMIINIJIQ@I@  L$4 JoinPathnameq@bIdII@@IIIII SplitPathnameq@bIdII@@IcII@IBP>9IAI@I9IAI8P>>N69I~@IAI6P>:II@IIAIBI:ICI4P>9INI:cI:I@IIAIBI2P>I@IIAI9I=BI CI4P>I@IIAI BI2P>9=I9I9IMI@IIAIBI2P>@cIIAI BI2P>IQ@I@ FindSegmentq@bIdI-I@@IcI4IcIIDIIEIIFIB3I>IcIbBIIDIcPIIFI^RI @HI1TI3IJI-VIILI)XI&@NI$ZI!@@0PBIP@I3IN.P&@&@=26BIIDI9RIIFI4TI @HI.VI @JIXI @LIZIINI\I&@PI^I!@@,PBIP@I&@&@*NP&@IDI(PB$$IQ@I@  TT T SetBitCountq@bIdII@@IaII$>~$FIIIII@P  I5 I IIIIII&@II!@@&P IP@IIIII@P  I I IIIIII&@II!@@$P IP@IIQ@I@ GetPathnameq@bIdI%I@@IeIIeI>IeIIDIIEI@PB=IfBI=IDIfNIIFIPIIHI]RIIJITI&@LITVI!@@"PBIP@IIDIIEIIFINBIQ@I@ Terminateq@bIdII@@IeII II I@P I II I(I&@I"I!@@ P IP@IIQ@I@ MakeSegmentq@bIdI)I@@IaI4IaI>IaIIDIIEIIFI:BBIIDIPIIFIRI @HITI@JIVIILIXI&@NIZI!@@PBIP@IIDI(PB=I&@ =IN=IDIE(IB=I$IQ@I@ MakeTempSegq@bIdI*I@@P@NAcIIcIII?IP<9II>I ?I%@@IAeI9IBI CeIIDI:P<IQ@I@. .temp_seg_Allocateq@bIdII@@IeIIINIIF=IIV II IIIII&@II!@@P IP@II I(P IQ@I@ NewvecInitq@bIdII@@IIINI>IINI-@I=+@I=I,@ @*@IQ@I@Newvecq@bIdII@@I=IIIII III=II-@@KIII@I-@@LI 1I@IN#+@II +=@+@+@,M@ I I@@IL @> @ @ I aI+@+@>P,@c@@IQ@I@NewvecwFreevecq@bIdII@@I@EaII@@IIMI II-@NI@II-@@JIQ@I@ NewvecCleanupq@bIdII@@ *@=*@*@I`I*@ M@IQ@I@Findadrq@bIdI=I@@I`I I`II`II `IPN/II$IPIIII"I~II6PIIIIIIII4P IIIII>II4PII III`II`@@~@@@IIIII@PIIII"IICKI@T,I,I$IICLI@T-I-I&III}(I&@ Iw*I!@@PIP@I&@II(PIQ@I@ GetCpuUsageq@bIdII@@IaI1II I I!@@ PIP@IIMIQ@I@Abcpl_filesys_lib_ GetCpuUsageFindadr NewvecCleanupFreevecNewvec NewvecInitAllocate DeleteTempSeg MakeTempSeg GetPathname Terminate SetBitCount MakeSegment FindSegment SplitPathname JoinPathnameExpandPathname symbol_tableDDGA@AJDo@ AMGR@ APJ'@ASM@AVP@AYSl@A\V@A_Y@Ab\@"Ae_ @%Ahb@(AkeN@+Anh@.Aqk@1Atnc@5Awq@9At=Avirtual_cpu_time_zzhcs_make_ptr bcpl_strings_IndexChsys_info max_seg_sizeassign_linkagebcpl_conversions_ ConvertNtoS delentry_file get_pdir_bcpl_machine_code_NumbArgsmake_segterminate_nonamefs_get_path_name set_bc_seg truncate_segBCPLaddr error_table_segknowninitiatedirseg status_minf  MakePl1String Substrbcpl_arithmetic_MinISubch$! Concatenate*&MakeBcplString1, expand_path_833ITS<:LengthA> DD &&&&&&&&&&&&&&&&&&&&&&&#&)&0&7&;&@symbtreeHAH 4bcpl %* >-(GaH١ 7GHgBCPL version 3.5, March 1982Holmstedt.SysMaint.amap 6180 >spec>on>04/22/82>bcpl_filesys_lib_.bcpl>ldd>include>head.incl.bcpl ?2 3456N8_:l;t<{=}>?ABCDEFGHJKNOPQ RASFTJUoVvWcdefgmnopqi)j+kJZW[]\e]^_`tuvwxy{|}~<HJiuw~  $047<@EN[\_lx| UiZF7g&L0L6gL+q>special_ldd>install>MR12.0-1206>bcpl_machine_code_.alm >special_ldd>install>MR12.0-1206>stack_header.incl.alm @@  D@ *eobj_map @@z|  bcpl_stream_io_ 04/22/82 1623.4re 04/22/82 1523.3 119772 ConsoleWriteq@bIdII@@I`IIJ II I^P I II II @III@II!@@\P IP@II@@IQ@I@4 StreamReadq@bIdI*I@@IKIaII@LIII^P ID IIMCNI@T&I&IIIII @IIIJI II@KI"I&@I$I!@@ZP IP@II@L IMI@J@@I@IQ@I@LH  MsfGetsegq@bIdI)I@@IbI IbIIK0N# $ II@MIII^PI؟IIIt IIIm"I II/$IIIh&IIIa(I&@I"*I!@@XPIP@I&@&@VNP&@IITPIII@NIIJIIQ@I@L$LMsfOpenq@bIdI!I@@IeI:IeI>IeIIJIIKIILIRPH2HIIJI0RIILI)TIINIVI&@PIXI!@@PPHIP@I&@ &@NNP IK0M&@IJITPHI@LIQ@I@T T MsfNextSegq@bIdII@@IM0II@NIIIJINGIcII>II?ILP<&@<I>II?I<&@3IM I>II@ ?IJP<I@K>ILI>II@M?II@bI<I&@I@INI FINI>I?(IJP<I@JIQ@I@ StreamWriteq@bIdI*I@@I`IIKIII^P Iȟ II@L@CMI@@T&I&IIIIXI @IQII@@IL IIIH"I&@I$I!@@HP IP@II@IQ@I@ ConsoleReadq@bIdII@@ @ @@@ @I I`IINIII^P I IIIIIJI IIKII!@@FP IP@II@@IQ@I@Openq@bIdI+I@@IIIII0 I&@INj IM4@) IDP I I@`L> IM INIDP IJ I@K I@L7 I`M I@@@@N@ @- IDP I > I@J  I@Kc IcLd IM INdIDP I@J I@K I`L I @ @@ @ @ I I IDP I I@ @BP II I@M I@N IJ IKI IL̞ I@M I@N IJ I@IN~ IMIȞI @bI @ I IKNI I I I@@I@@ II I@ I IIF >IDP II IILI IMI>IIN I I@N I = I IM I IN I I@J IcK I ILq I@bMI IN_II@CJI@@TIIIIINIIIJIIIFI&@II!@@@PIP@I0IM I I IN>PIIaI I aILIaIKII IaKINIIIIPKII I0N(I&>PNI" IJ IIII&@ I) II>PIIFIIKIaI I>PIIFII I0M I I@@>P IKI I@L I IM IIQ@I@T   user_output user_input Flushinputq@bIdII@@IN0II@JIIN'IMIN!%IIKCL I@TIII&@ II!@@*PIP@II@I@MIQ@I@ StreamLengthq@bIdII@@INIQ@I@ StreamOffsetq@bIdII@@I@J>PI>@IQ@I@ StreamPointerq@bIdII@@IKIQ@I@ ResetStreamq@bIdII@@BP NI&@I@L0IIMII@NIINIMIN4>P II FII>P II FIIIJIIMKIIIIIaI IINI FI@LIN III= I I IJP II@IQ@I@Writeoutq@bIdII@@I@@ IMIIIN@IQ@I@Closeq@bIdI%I@@IBP,~III@J I I@K0!I IL"I!IN  I@M I@ I.I,!IM IN#I  I.I, I@J#I IK$I @$I@@#I$IL$I @k IM&I I@@ %I!IN&I.I%I/IJP, IN &I.I(P,"IM&I.I(P,:(I'eI I@J.I'I/I^P,!IN o,I'I.I8I IK0I:I%I2II&@6I@I!@@&P,IP@IN,I'I.I0I!@@$P,IP@I!"IMMMMlMz#I#I I@L#I>#I#IN @ I@ I @I=IIMIBIQ@I@LWriteSq@bIdII@@BPNII @III"PIIIEI@@IIM~IIINIIIINII IIII >II I PI@@>II@I>III~IIIIIźIIIIPI@NJ IKIIIQ@I@WriteNq@bIdII@@BPNII @IIbIIIIIPIIIIIIQ@I@Formatq@bIdICI@@8I6bII0II1bI6I2I$ F3I/.I0I6I1I\.IQ@I@ FormatStringq@bIdII@@I:II;bII I I II@LiIjII>IItIIuIPr I0 NI I9MiI  >I0~iI I.NI=IItIIuIPr I0 NI I9MjI  >I0~jIjItIȞuIPrjIiItIȞuIPriI I^N  I= I^ IIMV ItII@@uIjIvIIwIqrkIIN`IkItI"PrlImIlInIkItImIuIPrNlI~lImI>mImInNIlI=mIiInI  I= I  IIJmI=mImInMI II@ItI IuIPrItIIuIIvI IwIkIxIPr II>IINI+ I II@@ItI IuIPrItIIuIIvI IwIPrIQ@I@ ProcessItemq@bIdII@@IcIItI"PrNIIItIIuIPrItIuIIvIwcIPrItI"PrNIII ItIduIvcII wIIxIrItIduIvcII wIIxIIyIrIIc@@IIImI ImIIJI  Im=ImImIMII@@ItIIuIPrIbItIIuI vIIwIPrIVI IItIIuIvIIwIPrIFItIIuIvIIwIPrI:IIItIIuIIvIPrI,I@IILItIIuIPrInM sMCwMoM̀pM\cMdMfMπaM1bMzIIQ@I@falsetrue ^o|^o(^2.2d)^o|^o .bcpl_stream_io_ FormatStringFormatWriteNWriteSClose StreamLength StreamOffset StreamPointer ResetStream FlushinputWriteoutOpen symbol_table114.N@.71)@ .:4@ .=7@.@:@.C=@.F@@.IC2@.LFF@.OI@".RL@%.UOD@(.R*.bcpl_conversions_ ConvertFtoSaX] bcpl_strings_ CopyStringkcgbcpl_arithmetic_MinIumr Concatenate{cwbcpl_machine_code_ Packstring} SetLengthc ConvertNtoSXSubch}MoveBits}Lengthc msf_manager_closeadjustbcpl_filesys_lib_ Terminateios_ resetread MakeSegment error_table_zero_length_segdirseg FindSegmentfind_include_file_initiate_count JoinPathname get_wdir_ MakePl1StringcExpandPathnamesys_info max_seg_size get_at_entry_NumbArgs}Allocate#read_ptr)%write.+ SetBitCount40 GetPathname:6noentry?<openDA SplitPathnameKFBCPLaddrQ}MsegknownWSget_ptr\Yreada^ write_ptrgcITSk}in`` &`&j&t&z&&&&&&&&&&&&&&&&&&&&&&&"&(&-&3&9&>&C&J&P&V&[&`&f&jsymbtreeHAH zbcpl %* >ggg-&GhH١7GHgBCPL version 3.5, March 1982Holmstedt.SysMaint.amap 6180 >spec>on>04/22/82>bcpl_stream_io_.bcpl >ldd>include>head.incl.bcpl ?m' .9EIK /<KW\bfjlru{~ ;B:M{V|X}^~`es   /36;>GSwz| (.2CFMPV^alu%&'()=<.;B,O-U.W/e0n1t2z34579#$?ABCEFGHJLMNOQ RSUXY&Z*[.\6^8_@`bboeghilmnoqrstuvwxyz{} '24@JWety17:DGMYacflz #$)12:]UUx#> <OӁ}x $>~$FIQ@I@ SetLengthq@bIdII@@I@$}IIII@@I >II$>~$FII~I} II I$F= I}IIJI@EIIQ@I@ EqualStringq@bIdII@@INIIII ~I IIKIINLI>IINI$IQ@I@CompareStringsq@bIdII@@IIIIźNoIISIIINIIIIIIIP IJIIIIP IIIIIP I I NI5a MI IzN Ia}A= Ia MI IzN Ia}A= I I MI  I NI$(IIIIIPIIII IP NIII>II NIIMI INI$IIQ@I@ CopyStringq@bIdII@@IIIIII II IPIQ@I@ CharToStringq@bIdII@@ III I I IIaI$~IIII P I II F Iк I >II$NIQ@I@ StringToCharq@bIdII@@IIIIII~ IIIIIP I @@II>IINII$IQ@I@ Concatenateq@bIdII@@I,IS*IINII,II-Ik* I P*~!I& II@J$I$I,I:*%II%>INII~I%II,II >-I$I.I/I%I 0I P*I%>II I> I I!NIلI,II-ID*IQ@I@Substrq@bIdII@@II ~I>I P NINIIIIIIIIIII} I I >II I P IIII  IQ@I@IndexChq@bIdII@@I Iź II I F IIIIIP >IQ@I@Indexq@bIdII@@IIIIJIIIPIII~I>II5II F>III~IIIIP I I'I >I>I II IIII >I~IPII II IP NI  I> I I NIIIMIʄIQ@I@ LastNonBlankq@bIdII@@IFI@~@III~II aI$ ~ IIII I I P I NI=-IMI IF~I@F(MI~III~II cI$ ~ IIII I I P I NI=II$IQ@I@ Padq@bIdII@@IFI@~@IIFI@~@IIINII=IIIIIP~I IIII IIcI(III P IFȝIFI>IINIIMIINIIII IIeI(II~I I PIQ@I@ MakePl1Stringq@bIdII@@I IIINIIII I (II I II I PINI I II II II$IQ@I@MakeBcplStringq@bIdII@@I II I II I II I (II I PI II IrIQ@I@7 bcpl_strings_MakeBcplString MakePl1StringIndexIndexChSubstr Concatenate CharToString StringToChar CopyStringCompareStrings EqualString LengthInWords SetLengthLength symbol_table::=7@7@:n@ 7C=T@7F@4@7IC@7LF@7OIB@7RLu@7UO$@ 7XR@#7[Ul@'7^X@*7a[2@.7d^@17a37bcpl_machine_code_ScanCharpglNumbArgsvgrMoveBits|gxMoveg~Subchgbcpl_arithmetic_MinI&o&u&{&&&symbtreeHAH i~bcpl %* =-$GiH١6GHgBCPL version 3.5, March 1982Holmstedt.SysMaint.amap 6180 >spec>on>04/22/82>bcpl_strings_.bcpl>ldd>include>head.incl.bcpl >f/;FJObhu z!"$&'()*+,-./12!5-6>=K>R?_@q8~9:;DFGHIJKLMORSTUV'W1ZR\]]b^f_m`tavbwcdefghik{|}~ no)p+q.r1sFuGvLwRyjw|+ iš