IMD 1.18: 21/11/2016 15:37:26 fortran-86/88 software package 1 of 2 114433-001 rel 2.2 sd 1981,82  11443300142 1<666666666666666666666666666666666666666666666666666666666666666666666666666y{0!0 N #0 NON-SYSTEM DISK, TRY ANOTHER        ISISDIRISISMAPISIST0ISISLABPROG1AFTN\PROG1BFTNS PROG1CFTNPROG2FTN PROG3FTN PROG4FTN PROG5FTN4 FORT8686   20 STOP END   C C THIS EXAMPLE OF DIRECT ACCESS, UNFORMATTED I/O WRITES THE DIGITS 1 THRU C 10 INTO A FILE 'LIST' ON DRIVE 1. IT THEN READS TWO DIFFERENT SECTIONS C OF THAT FILE (DIGITS 5 THROUGH 10 AND DIGITS 3 THROUGH 7) AND PRINTS C THEM OUT TO THE CONSOLE. C PROGRAM PROG1A OPEN (1,FILE=':F1:LIST',ACCESS='DIRECT',RECL=2) DO 120 I=1,10 WRITE (1,REC=I) I 120 CONTINUE DO 140 K=5,10 READ (1,REC=K) I C C SEQUENTIAL, FORMATTED I/O TO THE CONSOLE. C WRITE (6,130) I 130 FORMAT (I2) 140 CONTINUE DO 160 J=3,7 READ (1,REC=J) I C C SEQUENTIAL, FORMATTED I/O TO THE CONSOLE. C WRITE (6,150) I 150 FORMAT (I2) 160 CONTINUE END   C C THIS EXAMPLE OF SEQUENTIAL ACCESS, FORMATED I/O AT THE CONSOLE ASKS FOR C INPUT OF A PERSON'S NAME (A20 FORMAT) AND SOCIAL SECURITY NUMBER (I9 FORMAT) C FROM THE CONSOLE AND THEN PRINTS OUT THAT INFORMATION ON THE CONSOLE. C PROGRAM PROG1B CHARACTER*20 NAME INTEGER*4 SSNUM C C 5 WRITE(6,10) 10 FORMAT('What is your name?'/,5x,'enter using A20 format ',$) READ(5,20,ERR=70)NAME 20 FORMAT(A20) WRITE(6,50) 50 FORMAT('What is your social security number?'/,5x,'enter as nnnnnnnnn ', &$) READ(5,60,ERR=70)SSNUM 60 FORMAT(I9) GOTO 90 70 WRITE(6,80) 80 FORMAT('Incorrect input...please enter again'//) GOTO 5 90 CONTINUE WRITE(6,100)NAME,SSNUM 100 FORMAT('Name is: ',A20,/,'Social Security Number is: ',I9) END C C THIS EXAMPLE OF LIST DIRECTED I/O READS AND WRITES USING THE DEFAULT C FORMAT OF THE CONSOLE. AN INPUT OF 'X' FOR THE FIRST INPUT WILL C TERMINATE THE PROGRAM. C PROGRAM PROG1C CHARACTER*1 ANS1 CHARACTER*6 ANS2 10 WRITE(6,*) 'INPUT 1 CHARACTER - AN INPUT OF ''X'' WILL TERMINATE', & ' THE PROGRAM' READ(5,*) ANS1 IF (ANS1.EQ.'X') GO TO 20 WRITE(6,*) 'THE CHARACTER YOU CHOSE IS: ', ANS1 WRITE(6,*) 'INPUT 6 CHARACTERS' READ(5,*) ANS2 WRITE(6,*) 'THE NEW CHARACTERS ARE: ', ANS2 WRITE(6,*) 'NOW INPUT BOTH CHARACTERS. REMEMBER TO USE A DELIMITER', & ' BETWEEN EACH CHARACTER ( IE., COMMA, SPACE, or RETURN)' READ(5,*) ANS1,ANS2 WRITE(6,*) 'YOUR TWO INPUTS ARE ', ANS1,', ',ANS2 GO TO 10  RUPT ROUTINE(TIMER) RELOADS THE COUNT REGISTER(CNTREG) WITH 10 C MILLISECONDS, SO THAT AN INTERRUPT IS GENERATED EVERY 10 MILL      * ******************************************************************************* * * This program illustrates the use of the TEMPREAL data type for * intermediate results of double-precision arithmetic. While TEMPREAL * precision is default for intermediate results within expressions, * the TEMPREAL data type allows treatment of larger blocks of statements *  (such as loops, or even whole subprograms) as "expressions", under * programmer control. * * The operator is prompted for two real values between 0.0 and 4.0, * a starting value and a multiplicative factor, which are used to fill a * 500-element array with double-precision values and compute an exact * double-precision sum. The percentage of each element is then computed, * and totalled. The result, which should be 100%, is printed. * * For comparison purposes, the identical computation is done using a * double-precision intermediate variable, and the amount of error in- * troduced by the loss of precision is printed. * ******************************************************************************* * PROGRAM PROG2 DOUBLE PRECISION RARRAY,RTOTAL,RESULT,DPRES TEMPREAL TMPRES COMMON RTOTAL, RARRAY(500)  CALL GETDAT DPRES = 0.0 TMPRES = 0.0 DO 10, I = 1,500 DPRES = DPRES + RARRAY(I)/RTOTAL  TMPRES = TMPRES + RARRAY(I)/RTOTAL 10 CONTINUE RESULT = TMPRES PRINT 100, RESULT, DPRES 100 FORMAT ('RESULT = ', E26.20E2, ', D-P RESULT = ', E26.20E2) RESULT = DPRES - RESULT PRINT 200, RESULT 200 FORMAT ('DIFFERENCE = ', E13.5E4) END SUBROUTINE GETDAT DOUBLE PRECISION RARRAY,RTOTAL,RVALUE,FACTOR  TEMPREAL TMPTOT COMMON RTOTAL, RARRAY(500) TMPTOT = 0.0 PRINT 100 100 FORMAT('ENTER STARTING VALUE BETWEEN 0.00 AND 4.00 IN F4.2 FORMAT') READ 200, RVALUE 200 FORMAT(F4.2) PRINT 300 300 FORMAT('ENTER MULTIPLICATIVE FACTOR BETWEEN 0.00 AND 4.00 IN F4.2 FORMAT') READ 200, FACTOR DO 10, I = 1, 500 RARRAY(I) = RVALUE TMPTOT = TMPTOT + RVALUE RVALUE = RVALUE * FACTOR 10 CONTINUE RTOTAL = TMPTOT  END C C THIS PROGRAM INITIALIZES AN 8253 INTERVAL TIMER ON AN iSBC 86/12A C BOARD TO INTERRUPT THE HOST PROCESSOR EVERY 10 MILLISECONDS.FIRST C THE PROGRAM INITIALIZES THE TIMER AT CONTROL PORT(CONTPT) WITH THE C CONTROL WORD(CONTWD) WHICH IS 030H. THIS SELECTS COUNTER 0, READ/LOAD C LOW ORDER BYTE THEN HIGH ORDER BYTE, INTERRUPT ON TERMINAL COUNT, AND C ACCEPTS COUNT IN BINARY. THE PROGRAM NEXT LOADS THE COUNTER VALUE C WITH 10 MILLISECONDS. (THE iSBC 86/12A CLOCK RATE IS 1.23MHZ). THE C INTER y' WHEN ASKED TO CONTINUE WILL TERMINATE C THE PROGRAM. C PROGRAM GEO REAL*4 HEIGHT,WIDTH,ANSW,AREA CHARISECONDS. C PROGRAM PROG3 INTEGER*1 CONTPT,CONTWD,CNTLOW,CNTHI,CNTREG EXTERNAL TIMER CALL SETINT (6,TIMER) CONTPT = #0D6H CONTWD = #030H CALL OUTPUT (CONTPT,CONTWD) CNTREG = #0D0H CNTLOW = #0CH CNTHI = #030H C C LOAD THE LOW ORDER COUNTER BYTE. C CALL OUTPUT (CNTREG,CNTLOW) C C LOAD THE HIGH ORDER COUNTER BYTE. C CALL OUTPUT (CNTREG,CNTHI) C C ALWAYS TRUE TEST TO CONTINUE INTERRUPTS FOREVER. C 5 IF (1.NE.1) GO TO 10 GO TO 5 10 END C C THIS SUBROUTINE SERVICES INTERRUPT 6 WHEN IT OCCURS, AND RELOADS C THE COUNTER VALUE WITH 10 MILLISECONDS. TO MAKE THE PROGRAM MORE C USEFUL, ADD CODE TO TAKE ACTION BEFORE STARTING THE NEXT INTERVAL C $INTERRUPT SUBROUTINE TIMER INTEGER*1 CNTREG,CNTLOW,CNTHI CNTREG = #0D0H CNTLOW = #0CH CNTHI = #030H CALL OUTPUT (CNTREG,CNTLOW) CALL OUTPUT (CNTREG,CNTHI)  RETURN END     * ******************************************************************************* * * This program illustrates the use of the REENTRANT control to write * a recursive procedure in FORTRAN-86. It solves the "towers of Hanoi" * problem, which is described as follows: * * There are three pegs, labelled "A", "B", and "C". Peg A has a stack of * disks (number provided by the operator) on it; Pegs B and C have none. * Each disk is of a different size, and they are ordered on Peg A by size, * starting with the largest on the bottom. The disks can be moved one at * a time to any other peg as long as no disk is placed on top of another * disk which is smaller in size. * * How can these disks be transferred from Peg A to Peg B? * * * NOTE: Due to the recursive nature of this procedure, it may be necessary * to increase the 8086 stack size for large numbers of disks. See * the iAPX 86,88 Family Utilities User's Guide for more information. * ******************************************************************************* * PROGRAM PROG4 WRITE(6,100) 100 FORMAT('How many disks are to be moved from peg A to peg B: ',$) READ(5,200)NUM 200 FORMAT(I5) CALL HANOI('A','B','C',NUM) END $REENTRANT SUBROUTINE HANOI(FROM,TO,BUFF,NUM) CHARACTER*1 FROM,TO,BUFF IF(NUM .EQ. 0) RETURN CALL HANOI(FROM,BUFF,TO,NUM-1) WRITE(6,100)FROM,TO 100 FORMAT('Move a disk from peg ',A,' to peg ',A) CALL HANOI(BUFF,TO,FROM,NUM-1) END C C THIS IS AN EXAMPLE OF A PROGRAM MAKING USE OF A SUBPROGRAM. THE C PARTICULAR SUBPROGRAM IN USE IS A FUNCTION WHICH CALCULATES THE AREA C OF A RECTANGLE. ALL I/O IS THROUGH THE CONSOLE (WITH INPUT USING F10.5 C FORMAT). AN INPUT OF 'Y' OR ' PPP6r PPP]U>r u P$]R]U PPh >t6h PPP#>t]ACTER*1 MORE EXTERNAL AREA C C INPUT THE DATA C 5 WRITE(6,10) READ(5,20)HEIGHT WRITE(6,30)  READ(5,20)WIDTH C C INVOKE THE AREA FUNCTION C ANSW=AREA(HEIGHT,WIDTH) C C OUTPUT THE AREA AND CONTINUE C  WRITE(6,40)ANSW WRITE(6,50) READ(5,60) MORE IF(MORE.EQ.'Y'.OR.MORE.EQ.'y') GOTO 5 C C FORMAT STATEMENTS C 10 FORMAT(//'Enter the height of the rectangle ',$) 20 FORMAT(F10.5) 30 FORMAT('Enter the width of the rectangle ',$) 40 FORMAT('The area of the rectangle is ',F10.5) 50 FORMAT('Continue with another input? (Y or N) ',$) 60  FORMAT(A1) END C C FUNCTION TO CALCULATE THE AREA OF THE RECTANGLE C REAL FUNCTION AREA(X,Y) REAL*4 X,Y AREA=X*Y RETURN END                n#FORT86!@ܖuROOTSTACKMEMORYCODEDATACONSTDGROUPCGROUP??SEGOV0OV1UTSCODELQ_PLM86_LIB_CODEOV2OV3OV5OV6 ??OGROUP00d W        ǘ X       5K5K  .L .L Ҙ 0Pk0 ܘ EE [ R R B5B  RpcR  ee 4 ::2 F F ~)f~)O  VV 2 2M 2(Q2 'c'c   Z47Z4  Ϙ  s D D3 0!d!0!ٚ (XX  !Tee v ROOT}v OV0%v OV11v OV2q' v OV3nv OV5!3Mv OV6֯p@ PLM86 V2.308/23/83 t 3r U졢 ; v > v!Z Z wƇ& Z u]U>u  ]/]U젩؊& s7Ŀ" WPs؋ X ' a [ X a]UPPP>tMw<r> t!@uou]U > sR]U> t!t PP> t  > t 6 ]UF\ F\ Њ] ɵ& @]UF\ F] ȴ\ &H]UF\ F] ȴP\ ^&"@u@]U6P ]U6P ]U6P ]U6Pz ]U6Pc ]U6PL ]U6P5 ]U6P ]U6P ]Ub b w؋xrvb u_P>PGPe&>P&PGPD&PPGP#&]Uj]Ujr]U 1P1Y+ȋ]U` &?u]øPGP>P&PGP&Pw&iPGPPS 6<B` ]U:]U~t^^FFN]U^vN F]U^~N ]U젧s P]r&uU6PPw6h PPP6h PPPr =t)P |>u,6S3Se t6P5>uÃáPN g m Uv^SvP>t]Uv^SvP>t]]Uv^SP>t<]UvP,>t ]UvdPPX>tdrvvPPW>t]U PP>t]U^SP>t]UvP>ts]U6t!:Fu@C6@ƃѠ ^"ط ^"ط P]Uv r P:PP PPw>t Pi"Pb P: P46h lP6*r =t PlP6]U k]U>@r. PvY6U]U츮 PP#c㉇n >t]Uv vvvP>t]U^S^SP>t]U^SP>t]U^?$uF^SP8>t]U;v@؊Fk]U^8r0u]UF tHFF^]U ~v0^~u 8FwF~v^F;vN%Тs.*:wؠu>t;FN1ڊ F1F u뾂~u3s9v ˈƇ0*Ȉs^ ˷]U~ta^ tG0*ʈ vʀ Av_PF:w`PF&N뙡]U^? uNF]UkPP>t"k P P65 6 P Pw PqkvlWPc]U졜 @F;r u 9 v9 rIHPLvQ@+P v PPF;r u s]U졖 @ PP P0@  ㍇P6r Q+P6r  PP s&6r 6r 6r  PPW ]Us ؊F]U^F>t^7F]U~t^60N]U졬 GG.GFG.0]U6p P6]U@r   @ ; v s AG0]xU]U6U]U PP>t +كSKƇ _ +كƇ  Ƈ ]U졞 H +Ȉ8"sQ P P"P#P P]UF$Ft]U6h P PYv v v^S5] U^S]U0Frw21ؠv P]^rXPDXPZXP UUUrUF^]UFH#ێû$']Z[&Gt&GA;v&&G&G&G&G &G 3ɆȆQK[UNAأFF]Զ;~ ~)PPM=u +؆)tV\3D u rD^$3ۇ\Xttt:sʈ@;~á uB u++؀r6\Dø[ x;uSVK^\3DV^[u uDøP&+W;~SC[&&GY&G&OÆģG3HԆ6SRPP>uá36PPP>ua>uPS[X6S3S t;6P 824OV0OV1OV2OV3OV4OV5OV6 5???$*** FORTRAN COMPILATION TERMINATED: 0123456789ABCDEF:CO::WORK: NEAs lrTDU$v󥭫v<0s:uNNVYQ2*ϑNJ*v5:s1<v VF^F<vH*و^w;*F.:u0@<v VNF^F<vH*~K^~2^*tAWVV^*_v 0΋Q*Ǒ&%&Y~+tؑF+ЫF髋WJ]͋2ɋы<-v+"XUWQ3/Q3ʯY뫃 CCY؋_ t@ ]E u òF+FxJ?F2FRXñ2CU8D0A"r M GG:AKuѓ@W/} sM  _uU2SVv+v"Fu:+=CvCv3v۱ ~ ĪF^[]_W_W _W_W_W _W _W _W_W_W _W _W _W _W _W _W_W _W_W _WFrFORTRAN-86 COMPILER V2.2&Copyright 1981,1982 Intel Corporation 830 "b s4`'e"a!F F  A  `'e"" a!a&A `'e"F `'e" a!A `'e" a!a!-a 'a!`'e"# a!a&!A @`'eR STATEMENT  IN 0123456789ABCDEFBXXXXXQXDXXXXXH r=s+h l !%p !t x |  U UUU$U,U4UrR1rt<xrtrv r"A  ir^#12345678H@@000000@@ABCDEF6B!?2CA7Q@aq8BGC rfr3 r *r5 %NO MESSAGE FOR FATAL CONDITION A-000HrC 5r r 0Nrz r 0SYSTEM ERROR SEEN BY DICTIONARY HANDLER: PHASE 0DICTIONARY HANDLER HAS TOO MANY ENTRIES: PHASE 0DICTIONARY HANDLER OUT OF DISK SPACE : PHASE 0DICTIONARY HANDLER BAD OBJECT ACCESS : PHASE DICTIONARY SPILLING TO DISK... *r9xr3L F153 MAX PAGELENGTH IS 255F154 MIN PAGELENGTH IS 5F155 MAX PAGEWIDTH IS 132F156 MIN PAGEWIDTH IS 60 ENDF151 END STATEMENT MISSINGF162 TOO MANY CHARACTERS IN STATEMENTF163 NON DIGIT IN STATEMENT-LABEL FIELDF152 END STATEMENT IN INCLUDE FILE IGNOREDF164 FIRST LINE OF A STATEMENT IS A CONTINUATION LINEF165 MORE THAN 19 CONTINUATION LINES NOT SUPPORTEDF166 LABEL PRESENT ON CONTINUATION LINE -- LINE IGNOREDSTART OF LINEF167 INVALID CHARACTER(S) IN SOURCE AT OR AFTER F162 A LINE AT OR AFTER THIS STATEMENT IS TOO LONGCOMPILER INVOKED BY::F1:F86ERR.TMPF191 SOURCE FILENAME MISSING%F192 UNKNOWN CONTROL IN COMMAND TAILUNKNOWN CONTROL IN SOURCE SAVE STACK OVERFLOW_DIGIT BIGGER THAN BASE` BAD NUMERALaINVALID CELL POINTERbINVALID MASK POINTERcCONTROL STACK UNDERFLOW???F119 THIS STATEMENT IS TOO COMPLEXF158 THIS STATEMENT IS TOO COMPLEXF159 ATTEMPT TO DIVIDE BY 0F160 OVERFLOW IN CONSTANT DIVISIONF158 THIS STATEMENT IS TOO COMPLEXa$b +`'b NCb a7a"e# `'a&!a&5a#b hC`'e"C `'e"a&a&ka&oa&a&9a&sC ,`(`'e"@e"a&a&ya&{a&a&1a&a&a&a&Ia a&a& a&a&a&a&a&a&a&a&a&a&a&C P`'e" a&{a&uA @ `'e"F @ `'a!e& A `(`'e" a!a&A `'e"F `'e"! a!a&A `'e"F `'e" a&A b 4`'e"(a e%,a!`'F a!e%+b 4`'b NCb a7a&a&a&a"`'e" A `'e" A `'e" A `'e" A `'e"$ `'e"% F A b 4`'e" a!A @`'e" a!F @`'e" a&e& b 4`'a"e& b 4b 4`'e" a&)a!b 4g A `'e"a!F `'e" a!A `'e" a!a&CA `'e"F `'e" a!a!Ue%,a!`'Jb NCb a7a&aa&ga"m`'e" A  `'e" A  `'e" A  `'e" a!b 5`'e" a A `'a"b 4b C`'e" a!e& a&A  A `'e"F  `'e" a&a A `'a"b 4`'e"a!F `'e" a!a!b!7a!`'e" a!b 4g `'e" a!b 4g `'e" a&a A `'a  #=`)a!9c%,D }`'a&Aa"c#=`'c"(`)a!9a$Uc",D }a!a! D j`'c",a"9`'c"(a!ga ua! D }`'a&}a"a o`"F @`'e",a!-`'_b NCb a7a&?a&Ga&Oa&Wa&_a"g`'e" F A `'e" F A `'e" F A `'e" F A `'e" F A `'e" F A @`'e" a!b 44A `'e" a!b 4`'e" a!a&A `'e"F `'.e"(b NCa!`'?e"(`'e")`'e"C t`'e& e" `' (F002 INCORRECTLY PLACED PRIMARY CONTROL#F003 UNIMPLEMENTED GENERAL CONTROL#F004 UNIMPLEMENTED PRIMARY CONTROL'F005 INITIAL CONTROL CANNOT BE CHANGEDEND OF CONTROL RIGHT PARENSEGMENT TYPE NAMESTRING IN PARENS LEFT PARENAN IGNORABLE CONTROLVALID STORAGE SIZE`)a [ a! B a!a b ^`'`)a&a& a&a&a&a&Ca&a&5a&ea&-a&a&Qa&a&%a&]`(`'c"Aa&O`(`'c"Ba&a&`(`'c"Ca&a&a&a&a&a&`(`'c"Da&}a&a&a&m`(`'c"Ea&a&a&a&a&a&a&a&`(`'c"Fa&`(`'c"Ga&`(`'c"Ia&[a&ma&a&%a&a&`(`'c"La&`(`'c"Oa&`(`'c"Pa&a&a&a&`(`'c"Ra&a&ua&a&`(`'c"Sa&a&a&`(`'c"Ta&`(`'c"Wa& `(`'d"4E ?a"`'d";E Ca"`'d"?E 8a"`'d"NE 7a"`'d"UE Ba"`'d"\E 6a"`'d"eE Ga"`'d"mE @a"`'a a&a"`'d"ua!q a!D `'a!c%,D &`'a"a `'d#uc ,`'j`)a"q a Aa `'d"~E a!q a!D `'d"a!q a D %`'d"a!q a D .`'Uc"(c&)a! c%,a! `'ua&a&q c"*E `'d"`)a!q a! D `'d"E (`'d"a!/c%,D `'`)a!Ya a! a!Ac%,a! D }`'`)a"Qa I`'c"-a!QD `'B b"]=E `'a&ka&qa&wa&}a&a&a&a"`'d"E ?`'d"E C`'d"E 8`'d"E 7`'d"E B`'d"E 6`'d"E G`'d"E @`'c"*a!D {`'a&c a&a"`'d"E `'d"a!q c%,D `'d"a!q c%,D )`'d"a ;D `'d" a!q D `'d"a!c%,D `'`)c"(a!c%,a! D }`'d"a!%c%,D `'d"(a!a$ D `' b#=`)a -a `'b#=c ,`)a!3a `'a!%a%D }`'c",c#/`'`)a!q a A`'a&3E `'9c"/a ;a! `'a&q E `'c"(a!Mc%,a! D `'Q`)a&ga"%a W`'c":a&aa!%D `'a"gD `'c"*E `'d".a!a$wD `'a&c",a!`'^`)a"a a!D }`'c",a"a$D }`'c",a"`'ka&a"c#=`'c"(`)a!a$D }a! a!a! D j`'za! `)a!a a! `'c",a!c%,D }`'a&a!`'`)a"a&`'c"*a!D `'d"2a! a!c%,a! D `'`)a"q a! a!%D }`'d";b&=a! c%,D #`'a&3a"q `'d"?a!`'a&a&#a"-`'a"[ D `'a"Ac ,a!%D `'a"q a 5D `'a&Aa";`'c",a!A`'c"(`)a![ c%,a! D }`'d"Ca![ a! a!q D `'c"Fa!a&ua&}D a!i`'a&oa"!`'a#5a"`'d"Ib"=D `'a"[ a! a![ a! a![ D `'d"Na!a! D `'d"TE `'d"XE `'c"Oa![ c ,a!D `'d"]E `'d"ea D $`'d"ia D `'a&a&E `'B a"k E `'d"na!q a D `'c"(c&)a"c%,a! `'d"ra!D !`'d"xB b$=E D `'d"a!D `'<a&'a"`'d"a!'D '`'d"a"D `'a!a !`'c",a!-`'Va"[a -`'xb   COMMON SPECIFICATIONCOMMON BLOCK NAMESLASH ARRAY BOUNDS DATA ELEMENTDATA REFERENCEDATA CONSTANTSCOMMADO SPECIFICATIONDAT'c",a"`'c",a!}c%,`'`)a&7a&1a&Ma&=a&Ea"U`'d"C E `'d"a! a!a a! D `'a&a"`'c",a!c%,`'`)a&1a&Ea&]a&ea&ma&ua&}a&a&a"U`'d"a! a!a a! D `'a&a"`'c",a!c%,`'`)a&1a&Ea&ea"U`'d"a! D `'d"a! D `'d"a! D "`'#a&a"`'c"(a!a a! `'8a&'a"`'c",a!'c%,`'P`)a&1a&Ea                                                "U`'d"a!`'d"a!`'d"a"D 9`'d"a"D :`'d"a"D D`'d"a"D A`'d"a"D ;`'d"a"D F`'d"a"D 3`'d"a"D =`'d"a"D E`'d" a"D 4`'d"a"D 5`'c"=a![ `'c"=a!%`'c"=a!%`'c"=a!`'`)a"D H`'f`)a"D <`'a&[ a"`'a&a"%c#=`'c"*E `'a"q c"=a!%a!a `'`c",a!%`'`)a&a&a&a&a&Ua"q `'c"(a!%a! `'a&a&a!`'d"`)a!%a! D `'c"*a![ `'a&`)a!%D `'c#(a!%`'2`)a"Ga$-`'a&3a"=`'d"a!Gd%D o`'d"a!Gd%D `'`)a"Ya O`'d"&a!Yd%&D `'`)a"ka a`'d"+a!kd%+D f`'a&qa"{`'d"1`)a!{D `'`)a"a$`'a&a&a&a&a&a"`'d"7a D ~`'d"<a D z`'d"Aa D n`'d"Fa D `'d"Ka D t`'d"Pa D s`'a!D `'`)a"a$`'a&a&a" `'c"+a! D `'c"-a! D `'a&a&a"`'c"+a! c%+D e`'c"-a! D `'d"Ua! d%UD g`'`)a"7a$`'a&a")`'a"#a!7a%#D `'c"*c#*`'a"1a!7D l`'c"/c#/`'`)a"Ga ?`'d"Xa!7D `'a&a&Ua&ua&a&a"`'`)c"(a"a&aa"k`'c",a!a! D i`'c":a!a! D w`'c"(`)a!%a! `'(`)a"q a a `'c"(a&c#:a c#:a$a! D `'c"(a!c":a!a! D `'c")D `'c",a"`')a&%E `'B a"E `'d&[d"b`'B b"`'B a"k E `'B a"k E `'Ab"=b$=`'PB b"]=b$}=E `'c&+c"-`'c":`'c")`'c"(`'Kc"/`'c",`'c"=`'d"j`'d"I`'b"<`' 0F006 PARSING TERMINATED BEFORE END OF STATEMENTNTEGEREALOUBLEPRECISIONOMPLEXOGICALHARACTEREMPREALNTERVALFUNCTIONUNCTION UBROUTINENTRY%VAL(NDMPLICITINTEGERREALDOUBLEPRECISIONCOMPLEXLOGICAL CHARACTERTEMPREALINTERVAL(*)XTERNALNTRINSICLOCKDATAROGRAM QUIVALENCEIMENSIONOMMONATAARAMETERAVEOTOSSIGNTHENLSEIFLSENDIFONTINUETOPAUSEALLETURNFORMATEADRITERINTNQUIREF007 UNSUPPORTED STATEMENTPENLOSEACKSPACENDFILEEWINDUNIT=FMT=ENDERRRECIOSTATFILESTATUSACCESSFORMRECLBLANKCARRIAGE.EQV..NEQV..OR..AND..NOT..LT..LE..EQ..NE..GT..GE.//**.TRUE..FALSE.TOLABELSTART OF STATEMENT ANY STATEMENT REFERENCEANY EXPRESSIONDECIMAL DIGITSNAMEDUMMY PARAMETER LIST TYPED ITEMDUMMY PARAMETER RIGHT PARENIMPLICIT ELEMENTDATA TYPE KEYWORD LEFT PARENIMPLICIT LETTERLETTER ANY LENGTHEXPRESSION IN PARENSEQUIVALENCE LISTNAME OR ARRAY DECLARATORONE  `'e*)a&a,D )`'b Kb ba&'a&/A A b <`'e"e"C `'a#5C `'e#@a"e&e"@`'e"A  a Ma a a A ANY CONSTANTPARAMETER DEFINITION EQUAL SYMBOL SAVE ELEMENTVALID GOTO FORM LABEL LIST TO KEYWORDEXECUTABLE STATEMENT THEN KEYWORDEXPRESSION OR NULLCONTROL OR FORMAT IO LISTCONTROL IO LISTFORMAT IDENTIFIERIO LISTIO LIST ELEMENTREFERENCE OR EXPRESSIONUNIT FORMAT OR RW KEYWORD RW KEYWORDUNIT IDENTIFIERUNIT OR OPEN KEYWORD OPEN KEYWORDUNIT OR CLOSE KEYWORD CLOSE KEYWORDUNIT OR CONTROL LISTUNIT OR CONTROL KEYWORDCONTROL KEYWORDANOTHER EXPRESSIONSIGNED NUMERIC CONSTANTLOGICAL DISJUNCT LOGICAL TERMLOGICAL FACTORLOGICAL PRIMARY EXPRESSIONTERMFACTORCHARACTER CONSTANT PARTA QUOTEEXPONENT VALUE`)a b ^F025 CONSTANT EXPRESSIONS OF THIS DATA TYPE ARE NOT SUPPORTED)F026 NAME CAN NOT BE A SYMBOLIC CONSTANT/F027 DUPLICATE DEFINITION OF SYMBOLIC CONSTANT7F028 RIGHT SIDE OF CONSTANT EXPRESSION IS NOT CONSTANT0F029 DUPLICATE DEFINITI  E TT  PAGELENGTH PL  PAGEWIDTH PW DO66 DO77 STORAGE SR OB CANNOT BE AN INTRINSIC PROCEDUREF033 UNSUPPORTED STATEMENT4F114 DUMMY ARGUMENTS ILLEGAL IN INTERRUPT PROCEDURE8F*** FOUR DUMMY ARGUMENTS NEEDED IN EXCEPTION PROCEDURE5F115 ONLY SUBROUTINES AND FUNCTIONS CAN BE REENTRANT.F116 INTERRUPT PROCEDURE MUST BE A SUBROUTINE.F*** EXCEPTION PROCEDURE MUST BE A SUBROUTINE$F034 ALTERNATE RETURN NOT SUPPORTED&F035 NAME IS ALREADY A DUMMY ARGUMENT%F036 NAME CANNOT BE A DUMMY ARGUMENT'F037 LABEL MISSING ON FORMAT STATEMENT6F038 STATEMENT-FUNCTION DUMMY ARGUMENT MUST BE A NAME1F039 NAME ILLEGAL AS STATEMENT-FUNCTION ARGUMENT4F040 DUPLICATE DUMMY ARGUMENT OF STATEMENT FUNCTION=F041 STATEMENT-FUNCTION DUMMY ARGUMENT CANNOT BE SUBSCRIPTEDF042 ILLEGAL ASSIGNMENT TARGET'F043 ILLEGAL USE OF NAME AS A FUNCTION)F044 ILLEGAL USE OF NAME AS A SUBROUTINE+F125 UNSUPPORTED DATA TYPE -- REAL ASSUMED2F045 LENGTH EXPRESSION IS NOT AN INTEGER CONSTANT F046 EXPRESSION IS NOT CONSTANT'F047 EXPRESSION IS NOT OF TYPE INTEGER#F048 ILLEGAL OPERATOR OR CONSTRUCTTOO MANY INCLUDE LEVELSEND OF LINE NEEDED NEAR END OF LINE IN SOME CONTROL F001 NEEDED NEAR NEEDED NEAR F168 CONTROL NEARCANNOT BE NEGATEDF158 THIS STATEMENT IS TOO COMPLEXF158 THIS STATEMENT IS TOO COMPLEXF170 ZERO-LENGTH HOLLERITH STRING ILLEGALF171 STATEMENT ENDS BEFORE END OF HOLLERITH STRINGF169 HOLLERITH STRING LONGER THAN 255 -- TRUNCATED ON RIGHTLSTOBJ :F1:ABUS1.TMP :F1:MBUS1.TMP PAGE F174 UNKNOWN CONTROL IN SOURCE PROGRAM NEAR F173 INTERRUPT NUMBER MUST BE BETWEEN 0 AND 255 - LOW BYTE USED     @CODE @CONST @DATA @STACK @TEMP1 @PARAM @TEMP2 @TEMP3 @CODE2 @SFSTK @DISPL @$$$$ @MAIN @BLOCKDATA@JUNK?0000V11LSML0SML0 SML0SMM0SMM00000USLIRCN@     123=F271 CONSTANT CONTAINS AN ILLEGAL CHARACTER -- BLANK ASSUMEDCF272 INTEGER CONSTANT WON'T FIT IN FOUR BYTES -- TRUNCATED ON LEFT?F273 LABEL IS GREATER THAN 99999 -- RIGHTMOST DIGITS TRUNCATED+F274 NULL STRING IS ILLEGAL -- ' ' ASSUMED9F275 QUOTED STRING LONGER THAN 255 -- TRUNCATED ON RIGHT*F122 DUPLICATE TYPE SPECIFICATION IGNOREDF276 LABEL OF ZERO IS ILLEGAL:F277 NAME LONGER THAN 31 CHARACTERS -- TRUNCATED ON RIGHT 6F278 DIGIT STRING OF MORE THAN FIVE DIGITS IS ILLEGAL ;F279 INCOMPATIBLE LENGTHS FOR SYMBOLIC AND ACTUAL CONSTANTg6F280 IMPLICIT RANGE INVALID -- ONLY FIRST LETTER USEDh'F281 INCOMPATIBLE DATA TYPE AND LENGTHi+F282 LETTER ALREADY GIVEN AN IMPLICIT TYPEj2F283 SUBPROGRAM NAME IS ALREADY A SUBPROGRAM NAMEk.F284 SUBPROGRAM NAME IS ALREADY A COMMON NAMEl.F285 COMMON NAME IS ALREADY A SUBPROGRAM NAMEmF286 LENGTH CANNOT BE STARn-F287 EXPLICIT LENGTH ILLEGAL -- DEFAULT USEDo6F288 NAME CANNOT BE CHARACTER*(*) -- CHARACTER*1 USEDpCF289 THE TYPE OF THIS INTRINSIC FUNCTION IS CHANGED TO ITS DEFAULTq6F290 LENGTH SPECIFICATION EXCEEDS 64K -- DEFAULT USEDILLEGAL COMPACT TYPEILLEGAL LENGTHILLEGAL READABLE TYPE???LIST LI CODE CO SUBTITLE ST EJECT  EJ INCLUDE IC FREEFORM FF PRINT PR XREF XR TITL              JECT OJ ERRORLIMIT EL OPTIMIZE OT __COMBINE__ INTERRUPT IT REENTRANT RE  EXCEPTION EX IGNORE IN DATA CONST STACK  INTEGER*1  INTEGER*2  INTEGER*4  LOGICAL*1  LOGICAL*2  LOGICAL*4 SYMBOLS SB DEBUG DB TYPE !TY  !OVERLAP "OL " __SYNTAX__ #__STX__ #ROM $RAM % 22"0!"#123AB CQRRabbqqq 01-10.1.0123456789ABCDEFr r r >r ~!r !r# !@Rr  &:work:r9 F'rS ' SSSSSSSSMMMMMMSSSSSSSSSSSSRRRRRRRRIIIIIIRRRRRRRRRRRRr  J(ApAZSQRT BPBZDSQRT QPQZCSQRT ApA[EXP BPB[DEXP QPQ[CEXP `\LOG APA\ALOG BPB\DLOG QPQ\CLOG `LOG10 APAALOG10BPBDLOG10ApA]SIN BPB]DSIN QPQ]CSIN ApA^COS BPB^DCOS QPQ^CCOS ApATAN BPBDTAN ApAASIN BPBDASIN ApAACOS BPBDACOS ApAATAN BPBDATAN ApASINH BPBDSINH ApACOSH BPBDCOSH ApATANH BPBDTANH ApAATAN2 BPBDATAN2BPADPROD 0p0_MOD APA_AMOD BPB_DMOD 0p0bRMD 0P0bIRMD BPBbDRMD ApA`SIGN 0P0`ISIGN BPB`DSIGN ApAaDIM 0P0aIDIM BPBaDDIM `YMAX 0@0YMAX0 0@AYMAX1 A@0YAMAX0 A@AYAMAX1 B@BYDMAX1 `XMIN 0@0XMIN0 0@AXMIN1 A@0XAMIN0 A@AXAMIN1 B@BXDMIN1 1@TICHAR 2PULEN !@~LLT !@zLLE !@sLGE !@tLGT 2PINDEX @0SCHAR ApAIABS 0P0IIABS BPBIDABS APQICABS ApAAINT BPBDINT ApAANINT BPBDNINT 0pAdNINT 0PBdIDNINTApA1RINT 0pA2IRINT APB1DRINT 0PB2IDRINTAPQAIMAG BPRDAIMAGAPQCONJG BPRDCONJGAPaLEFT BPbDLEFT APaRIGHT BPbDRIGHTApaDIST ApaWIDTH ApaSIGNUM0`INT 1`INT1 2`INT2 3`INT4 0@AIFIX 0@BIDINT A`REAL A@0FLOAT A@BSNGL B`DBLE C`TREAL Q`CMPLX R`DCMPLXa`INTVL b`DINTVL1/INPUT 2/INW 10OUTPUT20OUTW OSTSW87LLDCW87MSTCW87PENI87 QDISI87VSAV87 WRST87 JSETX87KRSTX87RINIT87GETX87DSABLESETINTENABLE r  z/(U>r% /NO MESSAGE FOR CONDITION A-000HFr:K U6h ; P: P6h PP]U6n zc#]Ut&t&t $<t&t&t& u "":u& t& t&]U$ tA =vP P@ > sP; P@ * tC =vPT P@[ ]Ã> m$um|k|;rkww|uݰwCwcCw]U Pk P P@c]U͌rrsΌ]U>ct]]Uk;]U졔 @ ; vsG뿖.qk^kk.q.q .q.q6r WP]U>uPPP P @PP6] ]U>cu =cPP P~؊G ]U -]Uk]U ]UόkЌ Ќό*ȵk;wP]àk6όyόUt]UkƇl >munmPa]UFH6l FPPk6d FPP\& ]U͌sR>m$t{ t]Uьk:ьr8>w.v&P P0]ÊьkwwьuwƇ]UwM؊k t ukw(P P0MwƇ wu]Uww Ƈ w]Uk u6ww]UZkD ]U @t]Á 6l PP6d !PP ݀ @w & & O]U͌s  @tM w tl8 uj `wƇ:w͌s<>cu Ό+lC7͌+P!P@. ]t]U͌rr 6P1!:]À>u3Pg!) t*>s8P!Pf0']/]U6lBl*ts8>l$u* uq:t0t>l&u.&&&&&]]F] ]Uk u>u P!99sk t>t +PlPd]U]Uӌs@;rn^$ .v'((((8'''('k]àr@Ƈk 1 t;vm*sk u ww8Jru>cuiFs`$])UPt >wt]UP ~>t!$u@s >r uWsg>wtv ]U젝so~tiԌF:Ԍr,9.qv.qK^Ԍ.q.qԌuɠ< t.qC.q :t <(t.q.qH ]U젮 P P P;ڠ P PP*c6n P]UfP> uPk6klP! P6klP w> t\]Uz x ,q,q w wf"   8 98- -͌ $*]U p6h  PC"PLsW"P<ۣp 6p P ]U 6n 96l 6d ~ڋ K + > ]UdtrΌΌs.]Uߌ]U ]U *q Xߌ] ڌ ڌ]ڌ]U _.9/9797979K9^9v9999999::-:@:S:f:: . w wjOڌ Gs]Ë6 ܌S~ 8^ɡ  ؠገG]U> wr#P#P  ^]UH .,,,,--ڌ4 GЋڌ # w wJڌ'ڌ'ތ]U .:-D-M-\-o-y- G= Gڌ4 w w!ڌ$ڌ$ O ڌތ]U ?uP. ]Ë ?u  WW]Ë u P $>u#P&$Pf,]Uy 6֌fG. ތ]U6 MV ֌6 . ތ]U- 6֌. ތ]U ֌6 ތ]U  6֌ތ]U <w ֌:tތ]uތ]U6 | PAPeܠs* ?u G.2 ?u G.3Fs]Uߌ ?.z01000000111111111111111111111111111E1N1Z1p1u1z11111Tu   w,  w հPތơ، ،9,qv  G#PI$PAy]Ë WC w86 t PEތ!R, ߌs]Ë _.122222222222222222222222222222222222 2,282H2%33T2\22222ތrKf ]àތsv:ތs.ތs2~ތs ތs⡈ ڋ uތs t| q  ތs| OQOZ| ;v\Aތs: GȴPGY| ; v %6    Vތ، 'ތs،  ،w 6  .، )U u ;ws ]U ]U 4:Ft]U^ ꌂ>t$^60r ꌣ հ]U졚  +w;wH]àw]Uw ]U K + > w ]Uww8]Uww ]U젔<ws ؠ.u]U]U졘 +  O;s]UwP6w P'Ջ Gތ]U>crP_PO]. 6n c ,ww O6n Pp]U ;wr P_P]Ë 쌡w+â;v쌠 t:s Qg]U wN  0@Pְ P_Pv]U젝s 6 P_> u P_6wwPBְPP8ְP_P.֠s6h #PPָP]UP_PՋ ?au suB?: ?cuwհ P_ ?duw 0@Pհ P`Pk]UZgt_:wuRFCw;rZg6:wu(u׋ KZgj$ 땰]U>wu > u)]À>wNu>wOu.wP:t6t.؄ju$&P`PP"`Pf]Uތ>w1u ]À>w2u ]À>w0tތ]U _.+8S8X8X8X8\8d8p8|8888888888888 ]ڌ Gڌ> Gڌj Gڌ]Ë Gڌ]ڌFڌ>ڌ@ڌ .ڌ&ڌ ڌ!ڌ ؋>>t.&Gp&Ol&>s0tl.pPBP!. _ڌ Gڌ{ _ڌ Gڌw _ڌ$ _ڌ$ O:ڌ G뿻ڌ G묻ڌ G ڌ G pڌ G] ڌ G J!ڌ G!7ڌ G$ ڌ G ڌ G"u@ڌ G:t@ތ]U _.::::: Gȱ؍ aP]Ë G֌]U졈 + 1 wPތ]U졄 ; t:9 r& O;Lu Gތ]ތ]Uތ]U>v؍2ތ]U 8GwAތsG]U GGތ]U졈  9 ww#P3`PF  G HG]UF ]U졈  9 ww #PV`P9q GG]U졄 ; u + v}Pތ]U uSe 6 GDތ]Uk u]U s+ތ]U*Py`P'             ]U3P`PΰP`]U~ wB8]U l$ b* )A]U졊 ~ vRPa ]U G+G@6d PP76d PP(6d  _P6ތ]Un6d }ތ]UT͌6t []U4  ]U6n ^PPģ=sƇ^]U=s ;w]ð]Uc؋$6 L"D 6  G+HG c O$O" ]U6n c؍P+ă>t |]Uc㋇n PP=6n Pc$"&]U>8 u  88PaPƸ8PTģr PP]Uc^]U> u    PaP]U젂s ãd aPãd &aPãt 6d Pn6t Pdát l ]U졚 ;t򤸄+ ) )  KƇ >  ]U  ! bʋ 4a ]UkPŢkPkPv< tkP<k]UwPĢ6wwP]U젝sP]ð-P?aP6wwP]U v @PlaPɋ Gތ]U^P£ZWWP˸P8#:Q&fee:fwظ>eu G Gt+h\㋇6ʡ ee wG؍ah GGG e6 D>PaƼeu P>PZPBh]U$pu p>"u,>pu$b>pu *b5b"P6q ȴjhh;jwF &G&G*Țs&G.kP1P &G\w>u*"h6 tƚPQ PA,6rtPn>turl.pPBP!qss&6stP8u&G&G&G&G <0uqn&G on&G ]U6lPUs 6lB6lP؀L t iP0P7"~ƇL-fʒ~u]U G$ Oh0]UPv< w#fN㉏ʒu֋FSP PSX]UFSP PS^X]U}u}t E;Eu)=uDt DDD=uDD]ø+GGGGUEEDDDD tLtdȡdȡdщDT&ȡ&ѣ]UD DuDDD]U> 6 EDED]U> 6 E+DDEDD]U> 6 Ed؋Ed؋EdӉDT]U> 6 DtE EuR]U> 6 D DuDD]Êe&2d&EtDtuEDED >t1TTr;rw;r+DuDttD Dt|2>y]U G& G]Uj]U  t&G P\P\㋇>6&>&D\&D&DP> }hPDP^ sD!&6D&GDD&GGG&G  GGG]U =]U  t&Gi P\Po㋇>6&>&D\&D&DP> }hPDP-;qPPE  GGqGG]U >u#>u >!u"l ]U츢Ph]U츨PP<8ttqT6P uB> u@ Ѓ>u@"RQ6 Y"s66]ðhP0Pf]U>6u ]ðmP0P]A]U6  ؋OGD P]U wP " w G]U G wP  wP ;vP6 GG  G]U66x  G]UP$(赲&Gu &G&G&G$<0u&G&G&G&G &芲&6 D&G˲&G ]U G;PGPPj GG]UFxF&G]U  ]U6h P >t\P㋇&&&G&G \&O&GQ6 thPGP˳&s&G$.lP1P&G 5(hP]U2  ]U-21@@Pj GO&G&GDšÚ:Ús&ĚĚ<wmO&H66(h(P P7H&Sb^&DuA\P臣6\&4z4Ph6$PGPbP6zP6ƚ#P0hP ]U ?u GHG  ?u֚A ?u֚B ?u֚C >\u Ϛj\Ϛh6$КҚʚP(Ԛ O֚W֚9u֚ ;Ԛu֚֚ GԚG]U G訮 G&G]U GGG]U GGw P衭s wP菭r&7ؚP6ؚ  6&DG襭 ?u.ۚۚ<w&Hۚu( < ?u"G;uG]Ë G; uG]Ë ?u 6&DG]Ë GG]U6 46h-h GGGhP P*贬(&G裬&G0]U G&Gܚ G&?uP6ܚ>&ܚ&G&G;ܚu&G6Pϫ]á. P2P]Uޚޚ<v+؊9wޚߊޚƇ0ޚ]U>u>s3]Á>s2]1>u]U>u>v3]Ã>v2]1>u]À>u]À>u]À>u]U>vJ]]U~v@F؍j>w;FtGu܋G]U G,G<V ,$$;<wh t >, ,$u G$,I<,+ȉ\v P0P]U G$G<h6$8+th6$8-u $& }$;<w <$s! u2}s P@Po]U G@$h6$8 u$!h6$0, 8'u$$,֋ G$,I<,+ȉ\uP0Pv$<h ]Á>\vP0PT$<]UF^<vF"䚴;v^䚴j^G]U㋇ t؍Gvxs]Ëװ]U ?uGHGR㋇&>t8 GvxzsF&2Gt&]U]U$]UzA]U GV GXzV]U<+$@\ GG GG"&u G]U GGG G]Uv1 F<@r~Zv^@|b蚂>uP0PM ]Uh6 tꚋ\I횢욠:wuݠ :w(]U~wJ<w"F؋u }3]U적s >w>v}]U저so]]Uh6$8#uS\$6<0f Hu&>Du<]Uh6$0 < tJ\0:r<9w*A:r U;,u0th6$6,,$뾋 G$,+ȉ\uP0P h6,0\#>\vh6$8@tP0Pl \$\H G]U9\v#h6$8@tN w\P0P# ]U㋇> > t#Gvxs]&]U`>tb g g k j g a ca% b ,`'h b -h b .`'b ~Te"b Xg `'e*a a&a&`'e"a a `'e*a&a a GP]Uh6$z8]Uz!]Uv&;\uL\ tOh6 tvOH:w&:t]uڰ]U\ tKh6 tI:wu :w(]Uh6$8 u$]Uh6<8 u<]UvvsF؋@b P0P0]U~v FP0P^b]Ut:t GP6v]U G$,G<$;<w%h tQh6,,$ҋ G$,+ȉ\HG]U?tG:FtGߡ]Uw؊k:Nuku߰]UP <wء&^^ uV]U>ts]&]U젎^`bdf]U <w$؋^ ͵` uՠet}]Uş&O]UP~&G&G藟&^&G]UPXў&G&G]&$&G]U&G:bu>u/&G;\uk&G"G\GbzȢ:w&:t]uڰ]U졬v8]U6P裪]U조v[8]U6Pq]U졮v)8]U6P?  ]U존v8]U졺v8]U6 P]U졼v8]Uv8]U>t㋇l^]U젮: r P[Fl]U  Ɉ:wLJ&u堏 Ȣ:wLJ>u wQ.kW؍rPJuܸPPLP5PPfP&P2PP4PPʒP6hh6k GGG k GPPPǝ GGC GPPP蟝P P2P荝P P8P{P P>Pi GG GGG GGG G hP]UR"]U졶vU8]U b N:tDu-<"ط>k?^"ط>k@" G@ 믋 G]U~0u.vvP蛤耥]UBPJDP=FP0HBCD&3F& H&&"B]UFLu@tbvIHu]U  2:6n 6l ]URsk|s(z]UQt]U ]U .: + Qt]U졊  ;z s]ø#P1P]U졄 Nts]Ë6 NtS~ 8^NtGSt G ;Ntv.Nts]Ë6 NtS~ 8^Stɡ  ؠStG]U>   ^]U.u  Lt4 GЋLt # w wLt'Lt'Pt]UT. !! G= GLt4 w w!Lt$Lt$ O LtPt]U ?uP1. ]Ë ?u  WW]Ë Utu PV1>Utu#Pr1P]U6Htfm0. Pt]U6 MHt6 0. Pt]U6Ht/. Pt]UHt6 Pt]Uq 6HtPt]UPVtVt<w Ht:tPt]VtuPt]U6 | PAPRts* uv 66P]Ubu$|u<t<u\bu"s bu"~s"  t""bu t +%+%+%+%+%+%+%+%+%+%+%$$$$$ %%%%%#%(%Tu  w wa հPPtơJt Jt90:v  G#P1Py]Ë WC w6 t P1Pt!R, Qts]Ë _.D%&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&%%%%%%&&%%&R&&&PtrK]àPtsv:Pts.Pts2~Pts Pts⡈ ڋ uPts t| q  Pts| OQOZ| ;v\APts: GȴPGY| ; v %6    VPtJt 'PtRtsJt  Jtw 6  .Jt )UDDZ&7itP4ڋlt?u >itt& &G:itt>itu&u]á.P2P:]UPt>vѶ;rPt]À؍2]U]U _.'''''( Gȱ/ *HP]Ë G GȱFuHt]U _.0(F((S(S(((W(e(s((( Lt]ð]Ë GLt]Ë GLt]Ë GLt]ðFP]UPvht]U졈  9\tuD>`tu^tDDZt~`t^tףDDD>`tu^tD\tDDZt 4`t^tףDD\tDDZt 6l DP6Zt*]UDDD6l DPP]U GDqr]Ë GdtOft u$ u DbtAdtDDbt.ftdtףDDDbt 6l DP6btz]Ult_VuGOףLuNu]U졀 Jult؋GD]U w捌<ltGȲJuًGD]U GPu\u]U 6 \ GD\u]U>Hu r7P1PyPt]áHu@Hu؍ntFu]UHuHHu؍ntFu]U\uNu Luu]ø-P1PNߡD.D ]U G؋pt6 LrtD]Ult;Juslt؋GD]U-P 2Pދ G.B߸\u]UNu Luu]Ã.LuNu]hr ULuNu;u;vmFuG+GOO+O ֋XuZuLu>Nu;u;sXu>Zu>Zuu>XuveXuZuXuZu)LuNuFuO PFuw׋OףXuZuWXuZuG]= QTȳTr U\us+>Dt G$<uKNu Luuv]UPt]U졎<1+|  .:  5Jt WPPً6  Rt]U]U6n <u<Ƀ><u]]Uuuxufuhu"ȉfu;wuu]U>MrPסM@M ؍&Mru&&Gru"/&GruGWz&7yuP+>yuu"`/zuV&u 6P6P7s@6@P(s16Pr vu۸]UuuuP^]U&OwuFuuz2u]U""uuu2bu""ju.dubu]Ubu ؋&Mpu(Mnubu@dutudu9Mr: ؋&M;put]ádu ءnu9*Mu9(Mttudu]U&G$<0uhvuwujufuxuuu&G>tϠuurxusfufuH&Gvuwu]Ulu<С`u&G ]UW,&G t *#PN,u&Gu&G&G&G#&G:, & u &`&&G6HPs 6P6@PΡ&G ]UMMXDP).EP.6MFPtCP,`u`u9Mr+ LJ&M.Mlu9,Mu>luu`uu]UbM1P-Mv|PFPtCPT,buM;buratus;6pu@PD",&G&7}uP=(>}uu""+~upuΡnu&Gdubu]UM]U Ga΃>Mu,&G M GOA&G M GOף"M$M?MMMMMMM]U>Ms P0P-]UF ؋,M*&G$<0tf&GFMУMM"M$M>t;&u&Gd&G M M MMMu]Uuu9Mr" ؋,M;.Mu t6uCuu]U>ur>u;vu #u-uv !suu @uD.6u3P,]UD GD6n rwPPϣut3P6n PPgϣut3Pѡrw t6n DWPFϣu;rwt3Pgrwtwpw`TPqTPDP 1u t3pwuu;rww$؀D tD.P3P+rwuuuӡtwD D6l DW PΡDˡz&Gtw t "(u]UuF ؋&Muu tF ءu&MFuuFϋFuuuuFF t6 ءuu(M*Muu(M*M&Muu&M]UvaF ؃&Mu!F ᑋ&M,M,M(M*M]UvF ؃&MuFF ؋&M]UvF ؃&MuF ؋(M*M]UM ؋,M;.Mu> t:u ut M؋.M.P2P"*uuMMMMM]UM ؃,MtM؃,Mt.M.P2P)]U6M4MMuu6 M"M$Muuu>u;u;t;u;M; Mw@uus36MM6 MMuu+uuuuuu16 MvM6MlMuu+uuuuuuMM]UM ءuu(M*MuuM؋,Muuu9*Mu9(Ms          (M*M M M]ULM;Mu#>u >utG ؋.M.P2P(]toM M؉&Muu(M*Mu,M]U$<u]á GGNj G]UAtBtCtDt t CtDt tDt`":u&tAt]Ã>MtBtMoL]UtRǸ&G"$u]UF1&w t)6Pr6Pơ.PBPQ']Uuu9Ms ؃&Mu6u[u ؋(M*Muu6uuuu ؋,MuCts uuu)uuuuuuu ؋.Muu t u&G u.uuơu&Gu&G t"6uPŠAts 6uPm1$Cts 6uPVŠDts 6uPDut]UuuƋuuu>u׃uvh+AuQM6u@PsK>uu>uv 6uPċuuu+׸;u;vP]6uP]Ua#]Uvv w؊P2:NuN2  ^v@P蟷sg=Pu6^v@P臷sR3P^6^vPqs]3+6^v@P]sq36^vPIs{33P6^v P.su]Uuu9Mr3 ؃&Mu,Mu.Mu t;tuu$s "h!u]Uus-uR&ws>ut"u]ð]U&G vuuףuuu>uu>uvS&G &Guuu;áu&G *à v &G.uu]Uu&G$<0u]uu ؋(M*Muuuuuw &uuH&GBtsLAts &G u ءu(M*M]/rN !Uuuu uT&GPuRuuu_X@uTs"uu¡uu u)u ءu,Mu&G6uP]áuu&G uuPȴ&@[uY&GQu>uuuuu&G y;ut:6uPP;uu;ur 6uPP86uPu ءu,M]è T%r" "Uu ؋(M*Muu"Cts6uP{us:n2uuuv[nusu"tuDts 6uP@uu&GPu X(M*Mu&G ]UFs&G6 D&GD]U&Gv&Go& vG> vvG v& v<t&Gv&Ov&Ov  PY v6vLv  v v6v, uA>vu@"ȵ vQY  1sA vvvv v 1sA vt.P2Pv]Ë GO]UvPP趾s~6v P袾s &G]às]ø]UvP@Prs&&Gv t6v@POs8]áv]U QF؍&MP&MP QF؍&MPF؍&MPo Q&MPF؍&MPX]UP^㍇&MP&MP:P^㍇&MP^㍇&MPP&MP^㍇&MP]U0v0v w؊2:Nu20vu݊Fs]U&G$<u]Á>MrPáM@M ؍&M"v6&D$< tM@MuM"v"vGGGG]U&Gu "M rP¡M@Mء&MƇ(M]U&G$vPPsp6$vPpsa@ts ;$vu]Á>MrP&¡M@M ؍&M"v"vGW6&4P"vGG]U&G&v豼&71vP1>1vu]6&vPӻs6&vPĻs]Á>M rPM@Mء&MƇ(M]UF ؋&M(vF؋&M*v9(vw.(v;*vrRF PF[(M*M;*Mu;(Ms^3F PF[(M*M;*Mu;(Mv^^]U^〿(Mu&M艻&GPG!^㋇&M&GPGP4vP4^〿(Mu&M5&GPG!^㋇&M蟺&GPGPIvP༠4v:Ivsȴ.v^(Iv84vvȴ.v^4vȴ.v^>4vtF>Ivt?,v,v;.vw0؊5v:Jvs^,v5v:Jvv^,vu]UMEPDP*]U6MFPCP]Uhvs$&GPrv/sv^tvVwtvY&OrvwsvFFs rvPrvP]Uov2*P>ovu >`v u2>ovu>`vu 2P]6`vP P P]U=P6^v@P辸s3P 3P6^vP衸r3Px]U&Pn&wPP诿P6^v@Pks3+6^vPWs#36^vPCs(3-3P]U/P 6^vPs(P6^vPs)P]U=P23P6^vP۷rE3P]U6^v@Ps%6^vP讷r6 wuԠwww:www&8 twu߰]U GP@P]r]&G&GwD3P6^vPs3P6^vPs3P]U[=P6^vP۶s36^v@PǶs3P3P6^v@P誶s6^v P蛶s36^v P臶s3P^6^v@Pqs$3PH6^vP[s3P24P+6^vP>s0hv&G Y&G t4#4PPz6^vPs24P6^vPsB4P6^vPӵsO4P]U&G$< uhvivPP}P=Pqhvs o4Pb%4PY&G t藵4P@ivivsy&Gbvdv&G tZ&Gbvdv̡bvdv tRPP3P<vv6bv6vPP]UPPGP&G^v^&nv&O`vPovP>ovuA6^v Pqsq6^vP]s\6^vPFs4P Z]UP 4PP4P&P4P/P4P=P4PP4PP5P&P5P/P5P=P5P]U졘 @ [cEtGt<fvfv9Mr<Ft-؀(Mu&Mfv㋇&M|fvu]U쿛v v]Uv]UN ;vFFv]U6h vPvHP6h PP貶]U|s+ ; r趼vƇv Ƈv 6r vPCS e]UFvH; v GtvEts ؠFtvv]UPFvvv]U^&7"w^"w&8r&0"wu]U#w^$w#wt^:$wt Q#w]Uv@%w%w8Ft^0^%w]U^7&w^&w8r01&wu]U(w>t!P&*w(w&(wFt (w>t.&&G tPP PcPl&5P]U,w>t&ݱ&Gt %&G,w&ӡ,w tPP P P]Uo&G^]U&GҰ]UVwVw<w,1u VwƇ4w. VwƇ4w VwuͰ TwUwVw^Vw&8r&4wVwu4wP]UͰ&G]UD&Gt]U2w2w t0述&2w&G諰&G;Fu&2]U}u}t E;Eu)=uDt DDD=uDD]ø+GGGGUEhwEjwDdwDfwDDdw fwtLdwtjwdȡhwdȡhwdщDTjw&hwȡhw&hwѣhwjwfwdw]UD DuDDD]U> 6 EDED]U> 6 E+DDEDD]U> 6 Ed؋Ed؋EdӉDT]U> 6 DtE EuR]U> 6 D DuDD]Êe&nw2d&mwEtDtuED`wEDbwlw >lwt1TTr;bwrw;`wr+`wbwDuDlwmwtnwtD Dt|2>mwy]>pw9>rwpwDË>twtwDU G& G]U6h 6 Fh vwvwxw؊\zwg(&g߸ P0 hP) ]U GPGP|wP  ~wG|wG]U GGw Pes wPSr&7wP6wE 6&DGi ?u.ww<w&Hwu" < ?u"G;uG]Ë G; uG]Ë ?u 6&DG] GG]U6  6h h GGGhP P*x(&Gg&G0]U Gc^&;Gv&G⫋^ȢwGF&HwGwwww8wr#w&0 w^:u% gr?[r>@r@rGA! r%ww:ws&www<wgwOG3OS&@[Gw.5wu wwu wwwGwwuGwt`wrwDw:wsw>wwow?uVG腩PGPP贫               U2:t<3t>wu >u2wGGwGwwuwtp]U Gz GG6&DG]U t]Ë G?u wwP` ?t  ?u wwPH ?u蕨w&Gw* ?u ww ?u ww 6&DG]U>t0:&G;u&G:wu &G;wu]&ơw" P&&Gw&Gw&GS&G]U6h Pw>t\P%6㋇&&&G&G \&O&GQ6 thPGP詩&ws&G$.lP1P&G (hP]Uww<v+؊9wwߊwƇ0w]U>u>s3]Á>s2]1>u]U>u>v3]Ã>v2]1>u]À>u]À>u]À>u]U>vJ]]UF^<vF"w;vw^㠚w25^G]U ?uGHGe㋇&w>t8GvxsF&2Gtw&w]Uwww؊R5:NuS5wu߰]UP&Gw&Gsw&:&G]U9\v#h6$8@tN w\P0P ]Uv&;\uL\ tOh6 twvOwwHwww:wwww&:t]wuڰ]U\ tKh6 twIwww:wwwwuݠ :w(]U G$,G<$;<w%h tQ4h6,,$ҋ G$,+ȉ\HG]U졬vQ8]U6P]U졮v8]U6Pϯ  ]U졸v8]U6P蝯]U>t㋇l^]U젮: r P9Fl]Ujx"]Ujxz]U전s]á]Ujxz]Ujxl]Ujx^"]UwNw,x,xu;؋w;wr,x,x㋇wHwwwww;wsS-x>-xuw@wP6w-xPVww9wsP6w-xPV>-xwww;sQPV뤊,x㋇ww6wPV,x㡮w9wvA.x9ws@/x2r,x㡮w+ww+w;0x0xs",x㋇wwwHww@w w@,x㉇wwwwHw,x]U젎 ȴ4x2x2x;4xwa؋&>tI胠&6x&Gu0&G 8xV8x t[&Gu8xС6x2xu]U젏 ȴ>tt&>xV>x:xu]U@x &@xN:tDu-\xٱ"طb5_x^"طb5`xBx@xG@@x믋@xG]U~0u.v/vPө踪]UF CC!"#123CCC!"#123CCC!"# BNO MESSAGE FOR CONDITION A-000H?rW =?e^b'/vӆ/ ;:;);$/,-.H/ ;:;);PiX0/H/(əڬ°Ƹ 4eeP#i =UƸ/ G/~҂ ,/ 0/PK/SO/S/ W/Nj/Zn/ r/ / // / W/ / r /0/ r  /0/ rEy/ / rEy/ /3FF @FðVR NF7r;F/+'^7"ËFFFð ]*FFËFF ð׋F;F:rϰȰİ뼰븰F;F갟3rð D<'u=<'tF ?n~2trNuÀ~uF~5tYF~ t4Nu~t.0$F-r;FF+F r-r+F;r,03 rrxP< tF,0< Xr݉Fø9rø8;<>=?@*%&CJKMOQUVWYFF u< t<0r<:s u&0"Ce"`'e*<a&A a&a&A `'e"C \`'e"A `'e&e"e"e#@b >Ce#`'e"Da&A `'e"C }`'e"$    123ABCQRab123!"#123ABCQRab123!"#!!!!!!!!!!!!!!!!`)a b !b >%`'a&Wa&a `'e*}a,`'e&a&#a&Qa&K`'e*)a,)`'a -`'e"e"`)a ;a CD +`'`)b w.D `'`)b w.D r`'e"+b /6`'e"b /6`'a&aa&a"a `'e*}a&ka"a,`'e"a"{a ua$`'a+a,`'`+a"`'e#}e#)e#e#+e#`'`)a&a&a&]a&a&a&a&a&a&a&a&a&oa&ua&{a&a&a&b /6`'a"b /6`'e&e&e&e" `'e"(a b /6a$`'e*!a-D e&C `'h. e&b Cg `'h. e"a `'b"-C +`'A `)b !D -`'b".a$a `'a&b#\.C Zb -`'b"-C b -`'a G`)a)5a&-h-D `)h a b -`'e"@ a)Ob -`'h-a =D `'`)h-h-D e`'`+a"OC `'a&e&e&e&e&!e"$`'e"a a&qb j-a+a b)1!a b -`'a"{A a+b 1!`'`+e*h `'`+a"C b 1!`'a&e"`'e&e&e&e&e&(e"`'e*a)h g `'e"b j-a `'e"a&a&a)a)a `'e"a&a&a)a `'e"a&a)a b -`'b#-C E `'h a"C *E `'`)b+-a h-g+b+/6D a)b Cg a)b Cg e&@ a O`'b >Ca&C Yb 1!`'e"e#@e"0`'a 'a&5h g `'a&/a Eg `'a"[g `'`+a&?a Eg `'a"[g `'h)b-Cb /6D `'`)a&ea)}a a)a)a)a a)a `'h.e"a a o`'a&ua `'h e"a `'h-h-D D sb-Cg D ,`'a&D zh-D ,`'e"@ D th-D ,`'a&D sh-D ,`'e"          @ D ~h-D ,`'h-h-D `'b Cg*a `'h a&a h g `'a-D `'h.e&b Cg `'h a&a `'`.e#`'`-`.A D -`'a&a&a&b-/6D ,`'e*a&a&)a"7`'e*a `'e*fa,I`'e*b j-g b Ca,=a Q`'e*fb j-g b Ca,Ia Q`'e*a,=`'`)b /6D `-D ,`'`)b-/6D ,`'g)a)a b -`'a&ga"ma b ^Cg `'a"wh `'a&wa*a,mb" `'a e&e"`'e"e" b PD`'e&ee&e&e&le&e&e"`'a g `'a&a&h `'e"h b D`'`*a&b -'`'a+a,`'`-a b '`'e* A a a 7a Ea Sa `'e*'A a a 7a Ea a `'e" C `'e*A a a `'a a)a h. A b !`'a E `'`+a `'a&a&!a&+`)b /6D `'e*}a, `'e*ja)a) a `'e"e"e"@b -a sa a)Wg-a ]D b)Cg a)b !h-h-D `)a)5a eb -`'a&a `'`)h-D `'h-h-D D nh-D ,`'a&{a g `'e"a)g-a-D `'a&a g `'a"a)g-a-D `'e&e"`'h.A A 2A `'h.A A A 3e&A 2`'e"a `'`.A 3b C`'`.A 2b C`'a&a a `'e"C A  `'e"a&a&a a `'e"A a a `'e"a A @`'a&A `'e"A `'e"A a `'e"C `'F F  a&#A  a u`'e*}a,3a +`'e& C A  `'a&Aa&ua&a&a&a&`'e*Ha&MA  a&Sa&Y`'e" C =`'e"A  `'a"_A `'e&a&ga"m`'e*a"m`' `'`)e"a+a a D `'h.a `'`)a&a b !`'`*a,`'a"e"a `'e&e"`'b !b-FD `'e*a&Aa&A  `'e" C `'e":a&A  `'e" C `'e"9a&A  `'e" C `'a&a b-^Ca %`'e*}a e&@a a %`'a&a `'e"a,a `'a&a,a `'e#H`'e" a b-^C`'a&b .`'e"b .`'e"a,!a `'e#D`'a"-a,3a `'e&e" `'e#<`'e* A a,Aa a`'e#A`'e* A a,Oa a`'e#:`'e* A a,]a a`'e#9`'`)`*b /6h. A b !`'e"a `'e""a `'e"a `'b*1a a a a %D `'e* a)a a a %a D `'F  F F a,a +`'a&Aa&a&a&`'e*Fa&WA a&]F  a&a&C `'d"A `'d"A `'`)h b-^Ca `'e" A a,Ma `'e*a)a a a %a a a 3D `'F  F F F F a, a +`'a&Aa&a&a&!a&/a&?a&}a&a&a&`'e";a&)A  `'e" C &`'e"Ea&9A  A `'e" C E`'e*Fa&WA a&]F  A d&da&ka&qa&wC l`'e" C `'a ce#`'e"e" b PD`'d"A `'d"A `'d"A `'e*3a&A 0 a&]F A d&a&C `'e"0 C `'d"A `'e*=a&A  a&]F  A d&a&C `'e" C 7`'d"VA `'e*4a&A a&]F  A d&`a&C e`'e" C `'d"A `'e*5a&A 0 a&]F A d&`a&a&C `'e"0 C `'d"A `'d"A @`'a&a, a `'e#;`'e# E `'a&a,Aa `'e# E `'a&-a,Oa `'e# E `'h) b-^Ca Ca Qa _a ma {`'e" A a,Ma `'e#F`'e" A a,[a `'e#3`'e" A a,ia `'e#=`'e" A a,wa `'e#4`'e" A a,a `'e#5`'a&a,a `'e#E`'e# h-`'a h. A b !`'`*b /6`' 'F049 ALTERNATE RETURN IS NOT SUPPORTED.F050 MISSING TERMINATION FOR A DO OR BLOCK IF,F051 MISSING TERMINATION FOR A CONTAINED DO,F052 MISSING ENDIF FOR A CONTAINED BLOCK IF-F053 ILLEGAL STATEMENT TERMINATING A DO LOOP,F054 ILLEGAL STATEMENT FOLLOWING LOGICAL IFF055 NO MATCHING BLOCK IF.F056 ELSE OR ELSEIF FOLLOWING ELSE IS ILLEGAL,F057 DO VARIABLE IS NOT AN INTEGER VARIABLE7F058 END SPECIFIER ILLEGAL WITH WRITE OR DIRECT ACCESS)F059 UNFORMATTED INTERNAL IO NOT ALLOWED7F060 DIRECT ACCESS NOT ALLOWED FOR INTERNAL OR LIST IOF061 MISSING UNIT SPECIFIERF062 MULTIPLE UNIT SPECIFIERS F063 MULTIPLE FORMAT SPECIFIERS F064 MULTIPLE RECORD SPECIFIERS F065 MULTIPLE IOSTAT SPECIFIERSF066 MULTIPLE ERR SPECIFIERSF067 MULTIPLE END SPECIFIERSF068 INVALID STATUS SPECIFIERKEEPDELETEF069 MULTIPLE FILE SPECIFIERSF070 MULTIPLE RECL SPECIFIERSUNKNOWNF071 INVALID STATUS SPECIFIER F072 MULTIPLE STATUS SPECIFIERSNEWOLDSCRATCH SEQUENTIALF073 INVALID ACCESS SPECIFIER F074 MULTIPLE ACCESS SPECIFIERSDIRECT UNFORMATTEDF075 INVALID FORM SPECIFIERF076 MULTIPLE FORM SPECIFIERS FORMATTEDNULLF077 INVALID BLANK SPECIFIERF078 MULTIPLE BLANK SPECIFIERSZERO F079 INVALID CARRIAGE SPECIFIER"F080 MULTIPLE CARRIAGE SPECIFIERSFORTRANCONSOLE`)a b !b >%`'a&a `'e*}a,`'`)a&a&a&ca&a&a&[a&a&_a& a&Ca&Sa&ma&a&a&a&a&a&a&%a&a&{a&a&I`'e*(a QE (`'a&ce&a SD !`'e" `'e*+`)a ka D +`'`*b >a a b J/h g-b Ga a b-=`'e"b VF`'`+a a b VF`'a&b <`'e"b X;`'a,`'e&b >C`'`)a&a D !`'a&`+a)a `'e+ a)a  J/a,`'e&b&b/C Vb 1!`' F081 WRONG NUMBER OF ARGUMENTS,F082 ARGUMENT MUST BE AN EXTERNAL PROCEDURE"F083 TWO-BYTE RE a&a `'e"a,i`'e"b !a D `'`+a,3`'a&+a&b !a 3D `'b#E2C a,i`'a&Qa&Ya&_a&ea&ka&s`)a"GD `'a&a&a&a"`'e+0a+a `'e+La `'e+Oa `'e+Ma `'e+Va&{a `'e+Wa&{a `'a"`)b !D `'e+Ka `'e+a `'e+Ja b !`'e+a+a b !`'a#C #b 1!`'e&e"e"`'e"/`)a a D `'a&`+`+a a e&e&C P`'e+`+a a `'`)b !a D r`'`+a `'e*a a&a D `'e+a D `'a&`+a `'e+ a `'e*b !a D `'`+a a `'a&=a %`'e"a&/C sb 1!`'e"a&7e"@`'e"b"3`'`*a,`'e*b !a MD `'`+a `'e*a a ]D `'`+a,?`'e*,a+a ?D ,`'e* a+wa D `'`)`*a,?D }`'e*a ?D `'e*-b !D -`'e*a+a D `'a&a ?`'a"CA A @`'e*a D `'e" b*1a D `'`)a+a+a+9D a `'e"b*1a D `'`)a+a+a+9a+a+D a `'`)a&b*1a+a A 2D r`'e"b !`'e*b+!a D `'`)a+a+a 9D `'e"a `'e"$a `'b*1a D `'e"h g b*1a Ca&5a =`'e+a a =`'a kD `'a&Ia `'e"`)a&Wa }D h-`'a"e"a KD h.A A 2A b !`'`+a&e" a }a a&a&b L`'a&a `'a"A !a K`'e"e"e"@b >C`'a&A @b tP`'e"A b PP`'a"b L`'e&e&e"e#@`'e*b L`'`)e"a&a D `'e"a&C E `'a"Ca&A @`'e"A `'e"h. A b 1D `'e*a a a&a&a a gD `'h.a b 1`'A e&@A e&e& A `'e"a a _D `'e"a&a&?a&-a ga 7D `'e"@a ga 7D `'`)a ID r`'e"a Ia _D `'h.a Qb 1`'A e&@A e&e& A `'`)a gD `'`)a Sa o`'a"uD `'`+b,!`'e"b*1a D `'`)a&a D `'e"a 9D `'a a&e&C `'a a&e&C `'e&a#C $`'e&0e" `'`)a D `'a ia a S`'a#C Pb 1!`'e&e&e&e"`'a a S`'a&ce#0C rb 1!`'a a S`'a&ca"C b 1!`'e&e" `'a a S`'a&ce# C b 1!`'a a K`'a a S`'a&ca#'C b 1!`'e"e#`'a ia S`'a a S`'A qb !`'b !`'e"@A b !`'`)a SD `'`)a ]e&b !`'`*a,S`'a ie"`'a&Ya&a&a&5a a w`'a"a b ^Cb )4g `'`*a&b -'`'h b+Da,`'`-h b Db '`'a*e,b" `'a"b&2b 1!`'`*a,`'a ia&b /`'e"C b 1!`'e"a&a&a b >C`'e" b PD`'e"e"C b 1!`'e#e"@C ?`'e"A `*a a&+C kb 1!`'a&a"b+^C`+g `'`+a+ e#a `'a&a `'e"h g `'a&#e*a"#`'e"e#@b I`'a&ce"e&e"`'e"a&=b 1!`'`*a Ob >Ca#Ib J/`'b#FC `'`+a,U`'a `'e"ra&ab 1!`'`*a ie#`'a&ua&{a&a a `'e"a `'a"b >Cb J/a `'e&e"e"`'`+a,`'a&a&a ia `'e"a&a&b >C`'e"e#e#C b 1!`'e*a ia b J/e&0e& C b 1!`'e"a&b //`'e"0b /`'`+a,i`'e"b >Ca&b J/a `'b#(FC 6b 1!`'a b&j0b 1!`'b '2a `+b,1`'e& b+ "                     !!!!!!!! ! ! ! ! !!!!!!!!!!!!!!"""""""" "  g h b Ig h.a #`'e"a b&5a.A 3D >`'b&5h.e"a `'h.a&9 a `'h a ? h.a h g `'b"5E SULT FIELD NEEDED8F084 DIMENSION VARIABLE IS NOT AN ARGUMENT OR IN COMMON,F085 FORMAT SPECIFIER IS NOT A FORMAT LABEL%F086 FOUR-BYTE FIELD LENGTH REQUIRED$F087 TWO-BYTE FIELD LENGTH REQUIRED+F088 DATA TYPE INTEGER OR LOGICAL REQUIRED!F089 VARIABLE REFERENCE REQUIRED F090 DATA TYPE INTEGER REQUIRED$F091 ARITHMETIC EXPRESSION REQUIRED F092 DATA TYPE LOGICAL REQUIRED"F093 CHARACTER DATA TYPE REQUIREDF123 ILLEGAL USE OF HOLLERITH#F094 ILLEGAL USE OF PROCEDURE NAME+F095 SUBSCRIPTS MISSING IN ARRAY REFERENCE0F096 SUBSTRING ALLOWED WITH TYPE CHARACTER ONLY$F097 INCORRECT NUMBER OF SUBSCRIPTS9F098 THIS PROCEDURE CANNOT BE USED AS AN ACTUAL ARGUMENT:F120 ONLY INTEGER OR LOGICAL SUPPORTED FOR VALUE ARGUMENTF099 WRONG NUMBER OF ARGUMENTSF100 INCOMPATIBLE DATA TYPE`)a b !b >%`'a&a %`'e*}a,`'a %a `'`+b !b #`'a)Ma&[a&a&a&a&a 7A  `'a&a&a&a&a&a&a&ia&a&]a&U`'e" F  b 5`'e"(a I`'e"-b 5a I`'e#b J`'e*+A  b+!b+!b 5a b 5b- 6D +F  `'`)a&]a `'e*a D `'e*a D `'a a&a&`+a `'e+a o`'e#@a"b-,M`'`+e"h `'e*a+a,ID `'e*b+!a oD `'e*a oD `'e*,a+oa ID ,`'e* a+Ia oD `'e*a oD `'e*!a D !`'e*a mb >a gb =D `'e*b !a D `'`+a,`'`)a&)a&7a&a&1a&Aa&Ga `'e*a,D `'e"b !`'e*a A sD `'e*a `'e*a&ea&Ua a QD `'e"e#e#a ca&-a&5a `'a*D a D `'`)a&a&a&a&sa&]a a&a&a&a&a e&e&b !`'e"b !`'e" A `'e"a"D x`'`*a"a,`'`+e&0e" `'`*a,`'e*ra&Wa&a&a&a&a&a `'e+a `'e"b !a A 2D `'a"a a$O`'e&Xe"Y`'b !a D `'a"b v3a `'e&de"2`'`+a,`'`)a 5a a oe&e&a$O`'a a o`'a"-a#%a c`'e"e&e"`'e&e&e"`'a"a"Ea ?a c`'e"A `'h.b 3e&e"`'b 3e#b !`'e"a mb >a gb =D rA  `'`+a,`'a& b !`'e"a&a&a&E `'e"a `'e"a Q`'e"a _`'a"D `'e*oa&a+oa,`'a&`)a oD `'e"a `'e"a+a,o`'a"a D `'e*e,b" `'`*a,`'`*a o`'e*e*a o`'`)a&a&a&a -a a ca&a =`'a&a&%b <`'a"b ;`'e"e"a& A rb !`'e"@b.GA A r`-`'e*a ob 9<`'e*b <`'e"e"@b ;9`'a"3b :`'e"b VLb ^Cg `'h a-ID a oD `'b @Ge" b 6`'a&a)ka a a b 4`'a&a)ka a b 4`'a&yb 4g h g h `'`*a k`'b Gb$ a g a g a h g `'h a&`-h `'h.e"C h `'e"b !`'a&a&`)a"D `'e"a#b !`'e"@e# `'`)a"D `'a&a&a&a&a"7`'a*A b.!A s`-`'a"b !`'e&e&e&e&e"`'e*b !a+G`)b+!a a h-`'b&5a&D e`'e"b !a M`'a&%b !h g `'e"a)ka a h a + g b 4`'e*b !a)Ga h a + a-`'a&ME `'a"W`.A s`-`'a&e"a&wa"gh.b JA *`'e&a"oe"`'e+e"0e#`'a"}a `'a"b.GA `'a"`*a `'e*`+h.A `'e"i i `'a)ka a h g b 4`'a&a b Ig k !  ] Gf Gt G]Ë G] P-H,@.8/00`'b&5b&5a&D e`'e"3D N`'`)b+Ga,`'a a `'b) a `'a Ea #`'a g g b&5a&7`-a&=h.D `'h.e"`'a"h.D >`'h g a oa&Sa&ca [`'a"b#5a [`'h a ? a `'h a"k i g `'a g a g a&h-a&D `'b"5D `'h a"g h j g `'a"g a"j i b I`'h.e"`'h.e&3a g a e&3a k b I`'h.a&e#3b v5`'h.a&e#3b 5`'h.e#3e&b 5i i b I`'`.e"b D`'`.e"A 3b D`'`)a&Aa&a&#a oh `'a" h b&5b !`'e*eh g a,`'a&a o`'a"Ai g `'e*a&5a"a+oa Ag h j `'a"Ag+a oD h `'e"h b D`'a Ob !`'`*a,I`'`.A 2D e`'e*a ma&ya&a+a D `'`+e&e&C b 1!`'a"a"a+`*a gb =D `'a&e*a"`'e"b"K`.b >`'`+e*re#Sa mh `'a" a"a+ a A !D `'`+e&a& e#r`'a&a `'e*ga,`'e"e#a ca&a&a =a a `'a"-a 'a Ga Ma U`'a"b ;a 5`'e*a+b+=>b =`'b&{=e*b&{=`'e*gb >a, b 9`'a&a&a&b 8`'e*b 8`'e*re#Se"b 8`'e"b R:`'a"a D `'a"Sa D `'e*re#Se"b X;`'e*b X;`'e"e"@b ;9`'e"e#@b X;`'e"e*a e`'a&qa+ a A !D `'a" a" a+ a A !D `'e"a&a&a&a"`'a&a&a&a"`'e"~a D ~`'e"za D z`'e"sa D s`'e"ta D t`'A !`+a e`'e+a+a D `'e+Ta `'a&a&a& `)a ] D `'e*a `'e*ga `'e+Ua `'e&e"ra"b ^Cg `'`*a&e+Ua b"5`'e+Te"b VL`'`)a& a `'a&a&'`)a ca"h-a D `'e*`)a a 3D `'a ka)?a oa Gb 4`'`)a a G`'a ? h a&b&5a U`'e*a D `'a)ka og a g h j i b 4`'a&ua `'`+`+e#a `'a"A 2a&D `'`+`)a b#5`'h e&a&a&a&a&a&b I`'`*a `'e*a [`'a"b 5`'e&e&e"`'a"`.A 2`-h `'a&e"a"}`'e*ga)ka,b 4`'a&a i g `'e*ga,`'`)a a G`'a&] e*ga) a a a, D g`'a& a&] a& a `'e*ga, `'h g a, `'a&' a - i g `'e*ga, `'a&a&7 a&= a G `'e*a G `'e*ra&W C Nh `'a&Q a&W C yh `'e*a G `'e#b I`'e*ra&q a mb >a b X;a gb =D `'e+Sh)a- D a oA !D h-D `'b)Ig a a `'b jGe" b 6`'`)`.a h-h b-^CD `'a" a" `'`+a" `'e&a& a& e#re"`'e*`+h+b"A4e&e"`'e*re"S`'a& a& a" `'e*re+Sa o`'e"b VLb-^C`'a& a ca"`'e*`)a D `'a)a a  a-G `'a s a a  `'a)kg+a j i b 4`'a&# e*a + `'e"e"a 1 `'e"a 1 `'a&9 a ? h `'b"5e#@`'b.Ie#`-`'a&b&5a&U `+A 2D e`'e*e"`+A 3D N`'a&a&k b !a G`'e*b !a G`'a&y h `'e*a `' F101 ARRAY SIZE IS UNKNOWN.F102 RIGHT SIDE IS NOT A CHARACTER EXPRESSION*F103 VARIABLE-LENGTH FUNCTION NOT ALLOWED2F104 VARIABLE-LENGTH CHARACTER STRING NOT ALLOWED!"#123AB CQRRabbqqq 0123456789ABCDEFrr:U _. +7ES[cks{"  woհPơ 9mv  G#PO Py]Ë WC w6 t Po(  ] ]U _.2J[v ( ;  . w wO Gn _ G _ Gv _$ _$ O:  G J- G-, G,ػ. G.Ż/ G/w0 G0d  G Q G:t@@ G$ G  G "u@]U _.m {  Gȱ؍P K G6"A GȲ JP]Ë Gg؍f]U]U>vѶ;r]À؍2]U GG]U졄 ; u0P/8F 16 "DG]U졈  9tw #P P Gw]U졄 ; u + v}Pt]U uS9 6 GDGD]UWs]Ë6  S~ 8^. ]U m  gg}6   ]U~ nt| 6  O je dK]U.I]U *> O LL~ tn| 6 1$ " " """"""""""""""######## # # # # ##############$$$$$$$$ $ $ $ $ $$$$$$$$J7]U ' (> ,9~ nt| 6t 1I]U졊 (~ 6l RP~  ]U]U9_z]UjQl]U n]U>mur]Ët.#<$<$#<$#<$$t6l tP56l tPPz*t]Á>tu t6l tPPPn*t6n tPtP ᣦmtS㋇t*XwbU6n P6l I]U Z#x z mmgKtttt n v PP᠂sWCPtl l t PP 6n tPP^ࣦm]U2g t2"]U^Ks }6]U]U ]U m ]U졊  ;z s]ø#PP]U졄 s]Ë6 S~ 8^G G ;v.s]Ë6 S~ 8^ɡ  ؠG]U> tr#PPB  ^]Uj.q&{&&&&&4 GЋ # w w'']U .&&&&'' G= G4 w w!$$ O ]U ?uP. ]Ë ?u  WW]Ë u P >u#P, P]U6fQ. ]U6 M{6 . ]UR6. ]U66 ]U 6]U  <w :t] u]U6 | PAPs* ?u G.2 ?u G.3FsX]U ?.*'+h*m*u*y****'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+'+*****+ +++++$+Tu  w# = &?u :G] &:G]U ?u*wPs:G &wP]U:Gs:u!R, s]Ë _.@+,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,++++++,,++,N,,,rK]àsv:s.s2~s s⡈ ڋ us t| q  s| OQOZ| ;v\As: GȴPGY| ; v %6    V 's  w 6  . )U  ;tv#Pr Pg5F GG]U"+F"=2s7P P*F"]U Ps" ]U3Ps"32)"G1]U졲t2";ðw@s3uw1)""]U" t@]U"$$3u6 D;G/u]Ë$ã$t2;w]U"G/ ;Gt@]U w6 8wA&HPm&s PZ]U ]U GG]U GG]UP6 G]UP6 G]U G G]U @8Gs  8G G :Gt@]U u]Ë u 6 D w(P w+P(+؋/!/u  G]ð8(w+:w:);,v1,Q >+w  G);,v,6+P G]U0t]ð+P6]U w`&0s# uD v:0P`!&>r  w! G:t0P!Pm u$P!PQ  u]Ë G.u1Pi"PI]à. G]ðBPs]U GB&G &G$< u]]U(&OƎ:G]U G G]ULPӰ]ULP]UFgu8Pҋ4.4.gtS]U 3u FG5( 2uF5 F5 GFЋ G]UP]UP]U졈 ; t@]U졈 + t@]U6g "]U GG6 DG]U GG! G]U G+gGtG]U u N! D؋OJGLHDGȴH;r7J| FtG;s NJHuDG;JtND뛡L+JL z ;r#P7#Pg]á  6J| 0~ 9L򥡊 +JN6 ~ F6 6L~ F;rtNGFsա L 6  NG]U:G$   G]U GսPGPP 掉G䎉G]U GGw PIs wP7rG0:G:Gs6 &G:G &G;FuB:Grx%~ur:G_~(t)\F;tJ &9Gt@~u? &G. &G&F&:uq:Gs]U! u :Gr]Á>Ύt7 ?uGZ&G ?t  ?u GΎ]U! u :Gr]Ë:GsP(P wu:Gr(P w]U! u :Gr]Ë:GsPP6Ύ:GrPN>ΎuP6Ύ9c]UP&F&G(&G@&Gw &GƎǡP&PƎ]U! u :Gr]Ë GR:Os SWPX:GrP6R]U! u :Gr]Ë:GsP P\P:Gr P2Ǝ:G]U! u :Gr]Ë:GsPP\P:GrPƎ:G]U! u :Gr]Ë G:GsưPP&wJ:Gr-Py&wk:Gs  wV]U! u :Gr]Ë:GsPP6ʎ:GrP >ʎuP6ʎ]U! u :Gr]Ë wTP&:GsP2P6Tk:Gr2P6T]U! t  G;Hu :Gr]Ë wVP:GsP6V\P:Gr"6V):GGs  w]U:Gs(&t &?t :u̎tE9̎t<Ȏ2 ?uʎ) ?u >̎uŽ9̎tŽ+̎@ʎ9ʎt9ΎuΎʎΎ]UʎȎ̎ ?uG&G̎  ?u̎ ?u̎]UΎ]U<@< ؍]:GGGG GPPsP:G& t`6@PrQ>&G ¡:6&DGG]Ë:G! t wPas]øP:G(s&OA¡&G ]U~1u ^&~2u ^&x~3u ^&h~Au ^&X~Bu ^&H~Cu ^&8~!u ^& (~"u ^& ~#u ^& ^&]UPyv]U.PBP:G]U}u}t E;Eu)=uDt DDD=uDD]ø+GGGGUE؎EڎDԎD֎DDԎ ֎tLԎtڎdȡ؎dȡ؎dщDTڎ&؎ȡ؎&؎ѣ؎ڎ֎Ԏ]UD DuDDD]U> 6 EDED]U> 6 E "'$$$$$%%%%%%%% % % % % %%%%%%%%%%%%%%&&&&&&&& & & & & &&&&&&&&&&&&&&'''''+DDEDD]U> 6 Ed؋Ed؋EdӉDT]U> 6 DtE EuR]U> 6 D DuDD]Êe&ގ2d&ݎEtDtuEDЎEDҎ܎ >܎t1TTr;Ҏrw;Ўr+ЎҎDuD܎ݎtގtD Dt|2>ݎy]U G & G]U6 2 ؋OGf w P]U6  G6hh GGhP P wP訽  ]U wP Ꭳ"% U;,u0th6$6,,$뾋 G$,+ȉ\uP0Ph6,0\#>\vh6$8@tP0P\$&7P 6  6&DGM ?u.<w&Hu  < ?u"G;uG]Ë G; uG]Ë ?u 6&DG]Ë GG]UF(&G PĢ&G&X]U G{^&;Gv&G^ȢGF&HG쎌8r#&0^:u%uԠ:w&8 tu߰]U G6 Gȴ&;Gt@]Us wP >uP P P聽 G]UQ gĎP PQ]U G萻&G= G&:t@]UPP P~s G Ď]U wP7" c G]U G"uG G 0 G]U G GG6&DG]U GP@Pѹr]&G4&GD:s&<wgOG3OS&@[Gpeu u GuGt`rD:s>wo?uVGPGPP(2:t<3t>u >u2GGGutp]U>t3]2>u]Ã>u]Ã>u]Ã>u]U6 ؋OG P ]U Gl GG6&DG]U t]Ë G?u wP@` ?t  ?u wP"H ?u臷&G * ?u   ?u   6&DG]U>t0 &G;u&G:u &G; u]&ơ " P &&G&G &G &G]U  t&G0i P \P ٶ㋇>6&>&D\&D&DP> }hPDP藸襶qPP GGqGG]U G # G ;t@]U>u 5&G]á 诵&G]U G茵&G&;v6GPP蘷 GGG]U(9 s ]U ?u&G腵&u("&G G&G9 s ]U3 G 8Gu]Ë #u]Ë G蟴 2t  "u&u &G&u&G#;u]á&#Gu   G G]U  <v+؊9w ߊ Ƈ0 ]U>u>s3]Á>s2]1>u]U>u>v3]Ã>v2]1>u]À>u]À>u]À>u]U>vJ]]U~v@F؍te"$>$w";Ft"G"$u܋"G]U&?t.P2PF&F&G]UF^<vF"&;v&^&e^G]U]Uz]U GGG G]U((w؊e:Nue(u߰]U**wPP*u]U, ,?wPͲP,u]UP貱&G.&G˱.&蒲&G]U G$,G<$;<w9h t&> &  G. G G G G G G >}]U ."""####<}4 GЋ<} # w w\H G]U`㋇> > t#{Gvxs]&]U>t$P&S$^&DuA\P6s6\&4z4Ph6$PGP7$P6zGPౡ]U44 u&4&G֯&G;Fuϡ2&>tQ賯&0&G;Fs#0P~萯F&G0&2&G;FtI20른PI[F&G&02<0& vv]U>tBs]&]Uv&;\uL\ tOh6 t6vO8:H=<<:=w68&:t]\IA@@:Aw>@uݠ :w(]UP(F&G&BPB&F&GBP筡B&G&]U&G:$u>u/&G;\uk&G設GFH\GFH$LzDLȢKJJ:KwDF&:t]Juڰ]U졬v}8]U조vc8]U6P]U졮v18]U6Pݸ  ]U졸v8]U6P諸]U졺v8]U6 Py]U졼v8]Uv8]U>t㋇l^]U젮: r PᰊFl]Ux`"]UxzN]Ux@"]UN$NN:tDu-jٱ"طem^"طenPNG@N믋NG]U~0u.v9vPݴµ]UF\@\B\D\F\H\J\L\N\]UN\-h1ȸh6\ 2\; r uG  s,\ P66\&P64\P68\62\64\:\ B\; r x sD\ L\; r w sN\ F}]UE:\yءG1GG<\yOGO>\yWGG@\yWCWOB\y OWGD\yءFG*\GF\yJOGH\yء@Gt0\,\yGJ\yءHG*\GL\yGROGN\n}l}]U6n V\PT\PMR\ uXPp]U6n PP6R\]U>R\u]ø9T\v !T\ T\S㋇V\yXw4T\.{ V\yOyT\]Á>V\tEyT\U R}Ox (QLTLTPT(\(\#VTTTRhRhh]UVT t "TR yTT t "TR y]UyM2P t n PPv t l PPn v |6n T\PPR\~]U>~v&I6n 56l .]U{s ?]U@}>}]U ]U졈  9(\w) P}  P}]Ë ]UP}u#F 6 DGDG G]UP\ G>}]U _.q""}""""" G G> G' >X}zu:\Z}X}y&i}]UX}:9tZ};\}u 6X}X}v]U>X}uDZ}t}؊:㓊_$㋟"|}l3B<}'<}'>}]U.B#L#U#d#w## G= G<}4 w w!<}$<}$ O <}>}]U wOOP G.}iNTNT9LTv/ 򥾆 NT _ vP} WRPY:@}s]Ë _.#%H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&H&%}%%%%%f&_&%%%&>}swd>}s>$)'' ' ' ' ' ''''''''''''''(((((((( ( ( ( ( (((((((((((((()))))))) ) ) ) ) ))))}sx>}sߡ >}sʰTP‹ u>}s ؋_㍇T\ \  >}sb OQOZT\;vF->}s& GȴPGYT\; v   ؍? >}>}NT NTw  ? .NTgUT\㍇T\  ㍇?  XTNT,Q,QP}]U]U _. '!')')')'-'5'>'J'X'`'j' H]<}1 G3 G<} G<}]<}<}P}]Ë G<}]U _.''''''''' ((9( - w w{<} G_ _h _<} G<}> _<}$ O:G<} GP}<} GP}"u@ _<} G<}:t@>}]U _.n(t((( Gȱ؍ G  G P\]U u>}]>}]UN}s N}O}]Ë }s" 6 GDGD G]UN}O}N}]UR}sFR}]UQ}s B}D}Q}E >}]U G>}]U W>}]U uG. uG uG uG>}]UT}T}@:FtT}T}A]U 7 G>}]US}>}]US}>}]U wF>}]U GPE>}]U]U졊 F};t +D}1G D} F}]UP}":u#PLP&P}N\;F}t6G*}Q}]U졒 G>}]U F G>}]UF G>}]UH\ G>}]U ?uF\K ?t  ?*uH\4 ?t( ?u<\P}sL\ ?uD\J\ G>}]U׋ wD}>}]UסH}J}PHH}J}*Q"tG>}]U GH}J}>}]U>} su _SX$8  _SX$ r]>}+PoP]US} G>}]U졈 L}t> }L}L}>}]U >}]U ?u >}]>}]U U}pKU} 6 DG>}]UD wC>}]UX}<t< uZ}]áZ}x}؋G]UX}:}l9}}\;t}uB\Z} t}G t]Ët}gX}y]U>X}{ug}$<0u i} u<\0@\+>X}|ug}$<0u i} u>\B\ ( ]U3N\ F}]Ut}G G3]Uv}l32]U^x2}(:r*؊}}}]U!2t X}yt}Z}]UX}:9t\}t}؀?xu ]Uyh; wP}]Ë X} 򥡊  G ]U"~} t)PPs 6~}@Pys n}l}]Uv}<6}}X}y7BPPs)]Ët}G;Z}u>X}ytt}< tX}yuZ}t} Gi}O]]UX}:9t$Z};\}vX}P)Z}t}؀?xuX}P]U X} X}:X}Y}X}:㋏$؋"v}]Uny]U3]U츚PԠk @ ; v6r lPkP]U>v^ + s Pԡ}PyԸPrԸPk} P[ԃ2 POtb]U6 PPwP0ԋ PP PaPԋ GPPPJPԋ G PP P3PӋ G PP PPӋ GPP PP}}<w 0 PPP}uڋ GP PPP|Ӌ GP PPPeӋ GPP PPN]U젦:v<u h>uN\yh ;F}s ( ]U^S:^_^$㋟"}l32]U^F GuFG]UF<t3F"t}R}m5\5"NRqP]UF$t}}F<uOF<u}O]UF$t}}F袜}<u s/G*>}u} sG >}t } sG ]U}<6}}؀? u0s)r"}:9t 6}}t}]UF}t}t}=hrq؂ u u:9t yGt}?u  ut}S:^_^$㋇"}x6P.t}]Unp)  uVPﾋ^ sO ]U~~~~9~ra؊~G~ tHu ؀s;O6>~u~?u&u S>~u~ s O }؀R2u PP#6}P#]U}P}:tQ*P6}c$}Q2u}Ze2't}G]Ut}Gt 5}[!0P?<u}}/}2t}G]U+;t}u>*tPJ**t}+]U}}<w؍ PD)s]}uݰ]Usb؍ P)rL؃ u }d}/ }}"o1؍ P8 PM @%}}<wP؃ t= P(r1}e}'}+%} 1}؍ P8 P}u]U>X}qu6\}}؀?vuG}t}v_}G v-؀ t%G t}u6v}l3!2tt}Ot} t u#s؊Q2. t}GGt5]P؀R2ut}G<3t <#tGt t}G]]U}}}u^?t }}PS$]U^ w:vv^8u^8t^?uu}r ^?u]U^?xu sS^PW^? u]U^8u uO:Nu}P]U^.ABAAAAAB BBMBjBqBBBBBZ}}؀?xu1t@~;6Z}}PsK6\}}Ps9}PF6\}6b}}P6\}}Ps 6Z}}Pr\}b}6Z}}PXZ}}؀ uwP}P7>}a>f}ZZ}}ذ8u}}}}}Px!}}}P+6\}A6\}BP(;\}u >'t@]UvsCv}l3!2tX}Pi6i}X}:9tX}PHv]]UF}}Т}t}}X} }S:^_^$㋇"}v}}]8tC}\8Pu + s D PW P~+d Pqăg Peăj PYăm PMăp PAăs P5ăv P)ăy Pă| Pă',)))))))))******** * * * * **************++++++++ + + + + ++++++++++++++, P]U졬 }B} 7N\t}t}9F}v;؂t[t}:9 t t}GCtt}Os<} ]U^~r 8Fw:vvx"vv vv,]U~~~~9~r5؀u&G$PPmr~PGP~s]U~~ w Ƈ~~u~~~~9~rT؊Otu>~u4G~O~:tPQ!~~GGGG~Ƈ~~s]U*Q؍"yPvr*QH؍"yPvs]U^G~ t^?u ~~ u^?u~ t@]UF<t<u&F~P s ~<wP6~e]U^~r vx s]U~~~<w'Ps6~s~~6~~uҠ~tP]ð]U*Q؀"y u]á*Q؍"yPr:~~~~9~r+؀uO;*Quwws]Ã~sG]U~~~~~9~r)؀uP5s gs]~~sΰ]Uv}l3~Q2}2}t}}}}}~~~>e}t>Y}ui}t}t6}K>Y}u P>}}P >X}qu} ]U^* PP~; ]UY} ~}}E}}~~;~wP~sPm]UP>~u>~u6~r~s]U~~~~9~r؊O:OtkuQGP~tRS[L~u4 u(PGP~u$~G :tQP6~ ~uSl~rx]U^G;*\w ^t]U~~~~9~rN؃t?QGPo~?u,u&Sr~u G<vG~G ~s]USzr]U~~~~9~r;؀u,wEs"~G~L@OTt}]Ã~s]U^\5vDK5P$DXD|uD~uv^G;2\uGG^tR^G L^uG^t/^G)FF؃uG^G ؉^G]U~}~~}v}<6~~~Ps*~~<w~H:~v~G~uۃ~s]U^G~H~@^H~@^G@~^OH~~~:r~^GP~^G~@]U~~~~9~rQPsB~G~~~9~r(Ps~G:~u 6~S+]Ã~sσ~s]U~~~~~9~r)PsF~xt @~~sΠ~]U~~~~~9~rpPKsa~~~<w~xt~~~uހ>~u.~~H~@PM~~~~@~s~sr]U~~~v}l3!2 u=}u/~~<w#؊ 6t}Lt ~~@~u֡~~~~9~sPor~G~ tX<uL;,\u |u~G ~~<w0؍$P~P4s~~~@~uɋ~?u ~G G ~~<w؊ ~Ou@~u܃~r>]UF؋%~ t3$~<uڂ~ t>~u  u@]U~~<wW؊~~Ps~6~s~(~~~~~9~r~؋~@~s~u]U& r]UF}PdP!v*QP ]Uv}L7}X}㋇!~v}\8.>QQNQTQ_QiQvQQQ6~IY}~=~0~0}*~㋇H!@~H!~㋇H!PH]U~F~D}~P࣬}uL}~P:࣬}]Uv}L7}X}㋟!㊇H!}};Du}#y};Lu}znn]UF؊}}}}~}Z}}`}}]UF؊}}}}H}]UFX}~G}]U~ b}~}~]U6}0 *Q؍"yPP[ ]UPGP *Q}]UF}}36]Uv}L7}]U~~~~~~-}1~;r\؀}uI}P'P~X}~$;u~~~$;u~~~~~u]U~؊}+#;u }c}.)P}d}#~؊}+%}~؍}P ]UF؊}$؍ P{s F~cF؊}+%Pi ]U>~u*>~t!>~t^@%؍ PsDmFsr؍ Ps\~t$؊}$؍ Pr6~)~t'؊}$؍ Pr 6~>~t%@%؍ P~s ~~~]UP]}%N^.UUUU6*Q+ PPq} }% 9]UH%  ؃ u; u]á ء +%@>t I]UF+ȁ~~؋ ;}tP P ]Uv 6*Q}}2^v ]U>~tv}L7}}6X 1~t؊}+%}~~;~sPe" ]UPi}$u@~؋ ;}t~>~t~~sX}㋟!0X}㋟!0}=]U؋ ;}tPxP)X}㋟!0}]U}}P]U}}x]UPj]UPPV]U}}}B]U}}Pg.]UPY}]Uh}$~}~ذGt~~\3}]U>*Qtr}PIP]U>*QtP]UF:r u]U}=P}]UP}]UF:r Pu]U>*Qu]á*Q؀"y t}]á*Q؋#y;b}s]U~s*Q*Q@Pf]Uv}1.9Y ^YY-\Y ZZZ Z+Z3Z8ZCZHZMZ^ZlZtZyZZZZZZZZ[[W[{[[[[[[[[[[[[\\\]\2\@\K\}\\\ ^\\\]\\\\] ]!]X]b]]]]]]}}~}}~}+~}$~}9}}PG~}4i]d~}=k]f~}m~}ma]\PU?Z]UPP?:P}4P),B]=~}Z]UP}B]*Q6~a*Q؍"yPP6}D*Q؍"yPPP[} ,PPe]]ðPxP8 P})}cX}㋟!0}}v}L7}o!P)}X}㋟!0}PPv|n]/]']6~c*Q؍"yPP]n(%]øP7}}PdP"}}P~~}Po}]4~}P#n}!+]w\}Z}}o<v}X}}u]^PSeN2Z}} $P^W]áZ}}$PH P;P]ðP|P؍ P8 PM]s]ÊX}㋟!0}]ð P})PAX}㋟!0}N P]}]à}}~}}G}$~}}}k}}~} }}Pg~}}}EX}㋟!㊇H!}]} }z}}mP]ðPP]UL}F࣬}} }]UD}F࣬}} }]U^v]UPPvvvvPP]UF;VTvVT]U*Q@*Q(Q;wI*QO#P P迭腮*Q؍"yPvp6*Q]URT t؍zPZr]RT]U>*Qt*Q]URT@RTP}s ;J}vJ} RT;TTvTTPT;RTwHRTO#P PRT؍zPv]U^^GL?uT>Tw 8 PnTuvbRT]UH%؍ Pvj]U؍ P8 PM@%]UF؍$P}^ }}*Q} ]U^ }*Q}}F؍$P*Q؍"yP]UF< uPF؍$PPjF؀$u} ^ }F}]UF< r })}FF< r}"}VF}F}KF؍$PF؍$P"]Uvv]UF :r V:rRP F< u Pv vvc]U}WF}F} F؍$PF؍$P]U}XF}6*Qk F؍$P*Q؍"yP]U}d}&F}Z ؍ PF%؍ P@]U^G:Ft@]U؃ u }c}/I Ps}e}%N ؍ , P{}Pr6}I6}d6};6}Vn$PP P蘙PQj]U}㋇pw0o^O9 u too$opuɰ]U`$q>qw,``^O;Lu47sqquͰ]UbBr r< w^Ob;Ot bru߰]U^Gd u ^G^?uNSst^vhs t ^sd8u^/d?xu3^ ^8uGO;@u8?u ^^G<\;duI^t?u);Lu#s 6^?uSstȋ^t<\utPvs>st^Tvs t^?vs u,d<thu>it>hufGt]UF؍$PN]Uvs}svjv]UvF؍$P8 P]U؍ Ps@,{}e}$+%}O{؍ P؍ P$]U^G}G}_^G;2\u}^G;4\u} ^G;8\u} } ]U^u GP^u GPf ^ww]UP=^P^ uG;@\u}(})}c!v^_j_ !}}#]U^w^G$PP^Gl|u+ 8Ou}P}( PFK^GL^u#Pv}*Q} P^G} uhGl} u}(#l_ !}^?u un]U~u0! vPP[P]U~u9! vP P9P]U~H~~H;r~(u6l P~@P芚~]UF~C~r]UvFP]U~u~r~r]U졪};DtD};LuP}s}H}+h}}h};Fu }hP6}>u]U|t>}u ]à}<t<u }}}}< t < u>}u|P}!Pns6}P}s.}}} }u6}PQs]6}P=r6}@P.s6} Pr6}:6}P s6}}+Q6}Ps6}}P_]U젆N F]U6}|t6}|u>}u}u}!!P}!!Pz6Pp6Pf66}>u 6}p>u6} |t6}r}":u6}(>t'}!P>v}!P|袉t<u n"PQPPt:u&6s6}>u 6}]À>t>u6}]U>u6P PJP$P}؍&PPP PPʙ} ؍;P赙)}P}P}P}- OUT$H$C RLDST$DS$M0 RLDST$RC$M0 RLDST$T$M0 RLDST$2$M0 RLDST$4$M0 ICST$O ICST$P }}}}}}}}}}}n]UPr<w Pu}hNs N}{T ]U@tP]U}P6 ]U~Pv]U찂P]UF}}]UF}}]UP~v]U?w Ƈ2u]UF裎?w^@!2]UF裎?w^62@!u]U GT&G&G&G 諐&G >}]U GsG~ t8& u]&G V&G  GrO뾡H O;vm )G G]UF萐&G]U Gtr&G]U ud&&GP&G;Fuϡ&>tQ-&&G;Fs#P F&G&2&G;FtI른PUՏF&G&趏& vv]UP萏F&G&Pp&F&GPO&G&]Uj]U"]U"]U졒]UF;r;v4P]U졢]UF;r;v4P输]U]U G|F&G]U졾v 8]Uv蝚PP聚N;Fw&u桠]U"ȉWW;r GG9GsG]r 2 ~sztnF180 THIS STATEMENT IS TOO COMPLEXF181 INSUFFICIENT SIZE FOR ASSIGN VARIABLE  ADDRESS TYPE MODE VAL HW FLAG 2 DICT BASE INDEX OFFSET VALUE  FLAG1 FLAG2 STMT USE USE USE SP INFO RLFRLHDW IP PREFIX MACRO MRO SUBTYPERLRRMBMXMSMDMVCDCVHW@   !!!!F183 THIS STATEMENT IS TOO COMPLEXF183 THIS STATEMENT IS TOO COMPLEX./////%&&  &'(    @    !XZYWPQ[mzp"   # !!"""#$$%%&&''')(+*-,./012345 68:><=?ACDEHFGIKMQOPRSTUVYWXZ[\]^_`abcdeffffgghijklmnoprtvxz|~       &);EOQSUWY[^gmu~]f    !"  ) *  %&AB!1"2#3AB C1!2"3#CABqsr1!2"3#ABCqs CEL UTS FSL OUT$B OUT$B$C OUT$H .   SRRURTRTXR     ## #  $(<:;<9=>9EE@ABCD?#  *+ARGST$O ARGST$P RETST$O RETST$P STRST$O STRST$P PUSH$H$V PUSH$H$M0 PUSH$S$V PUSH$F POP$H$V POP$H$M0 POP$S$V POP$F STORE$B$M0C STORE$B$M0V STORE$H$M0C STORE$H$M0V STORE$S$M0V STORE$S$V STORE$B$XAM2 STORE$H$XAM2 LOAD$B$VM0 LOAD$H$VM0 LOAD$P$VM0 LOAD$S$VM0 LOAD$S$V LOAD$EA$VM0 LOAD$B$XAM2 LOAD$H$XAM2 NOP MOVI$B MOVI$H MOVI$L BRANCH SBRANCH JUMP$N GOTO SGOTO RETURN SF$RET CALL LCALL ICALL$M0 LICALL$M0 STATUS RCE$NOP ADD$B$M0C ADD$B$M0V ADD$B$VC ADD$B$VM0 ADD$B$VV ADD$H$M0C ADD$H$M0V ADD$H$VC ADD$H$VM0 ADD$H$VV ADD$B$XAC ADD$H$XAC ADD$H$VCT ADD$H$M0CT BIT$B$M0C BIT$B$VC BIT$B$VM0 BIT$B$VV BIT$H$M0C BIT$H$VC BIT$H$VM0 BIT$H$VV BIT$B$XAC BIT$H$XAC MOVE$H$V XCHG$H$V XCHG$H$VM0 XCHG$XAV EXP$B EXP$W MUL$B$M0 MUL$H$M0 MUL$B$V MUL$H$V MMAX$B MMAX$H RCTL RFUN$T0 RLD$TN RST$TN REAL$TN REAL$T1 REAL$R$M0 REAL$D$M0 LBIT$V NOT$B$M0 NOT$H$M0 NOT$B$V NOT$H$V ,0.............//////// / / / / //////////////00000000 0 0 0 0 00000000000ABS$B ABS$H DBL$B$M0 DBL$H$M0 DBL$B$V DBL$H$V INC$B$M0 INC$H$M0 INC$B$V INC$H$V TEST$B$V TEST$H$V REAL$WAIT PREFIX STATEMENT$NUM SLABEL SF$ENTRY CODE$OPTION NOCODE$OPTION PROLOGUE W$ADDR W$VALUE AGOTO RCE$TEST MOVI$S STR$STR CLEAR$INT GET87S$DS LOAD$F ENAB$INT NORM$PTR$L NORM$PTR$M NORM$PTR$S MUL$IX$VV RSTP$TN BB  ˆˆC IBCCYRBCCCC B   !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFG*,-0123456F   78>;>G",,,,,??>,,,,,,,,,,,,,,,,,;9:)*;#%#%$&#%&''(  -++++++/.0112<87555555555566666666663"!! , ,,  ,   4,,      ===@,,AAABC,,DEEFFF,,,,,( )!#   RSRSRUQPQQ!!R !$$@ / b *b -`'e*+b *b +A  b (*a b t*b *b 6*b +F  `'`+a a `'`+a a&;a `'`+b +`'D a Cb O)`'e"(,!"&& $$$$  ###   %%%'%  $$$$###)(((..-/""""""+,!!!#BRAQu#BR!%#BR!!!"%#BR%AQu!"%#BR!"1%#BR5!1!1!1"2!1"2%5#BR%5AQu!1"2#BRAQu"2Bd!R"2BRBdRC"2SCd"2SB!RBd!R!!""!!!!1AdQAdQAQAQ"#BR#Bq!"E#BRE#BRUBR#BR#3!1"!"1#%AQ%5AQAQ%AQu%5AQuAQuAQ !)1iN@  p  !       !        !  !                 !      ! !!MMN~]abehlqwz5M3MMM !DVVV?RRR?5M73?;NRR %'I+.+.INZINRRM35MM3M3M3M5M?PRR3?c b         %&&  &'(*.//c-041678989898989:;:;:;:;:;@AGCEFfhiOLMNSPQRMjLcmnmnnop-- ^_fsttf@wExEfy>zCc?>DCDCkllqrr>uCvCfhiGEF    xx 8883+3+3+s`h+++++C3+C3+`h@0(@0(H XXSS##;;;SS`h3+<<  IIII,,,,<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<,,,@dd$$$@@ @@@@ -C.C/048M9E1-C-C-C@F?AGAGBH57D22333:<<=>  $&%"'#()*+, NO!;6IJ KL^]!"}~*cd456789:;$%1MNOP'() +hw#  &_Q2RS3TUVW/0fgeruABCDnitl`aqpbkmjos,-yx EF .GIHJyz {#yyyyy{yy{#{{{yy{|{$y%y# ADD ADC SUB SBB CMP AND OR XOR IMUL IDIV NOT NEG INC  DEC SAL RCL FADD FSUB FSUBR FMUL FDIV FDIVR FCMP FCHS FLD FST FSTP FLDT FSTT  FSTPT FXCHG FFREE FLDZ FLD1 FTST FXAM FABS FSQRT FDECSTP FINCSTP FLDCW FSTCW FSTSW FENI FDISI FSAVE FRSTOR INPUT OUTPUT Z LT LE NZ GT GE NB BE NE E A AE B FINIT MUL  a$b !`'a e" b *F  A  b  `'F  e&a&'a&Ca ie& b t*b *`'a"7e& b t*a 1`'e" b *`'a&}a&a&%a&a";`'e" b*(a ]b O)e& b t*b *a ca W`'b*X*b,D*`'`+a I`'`*a,`'a&ea&Ea&qa&a&a&a&a&a&`'e*-0 e&e"`'a&D va `'e"a&D *a `'e"D ua `'A s a b O)`'`+a a&`'e&a Ug `'`+a+h g b (b O)`'e"b*(a a&a a b O)`'a" a g `'D b ,A s b O)`'e"b*(a a&a Ia b O)`'a" b ,`'`+a Ug `'e*b (*a+a,D a b 6*`'a"!b (*D ga b 6*`'`+`'e*D a a g+e#b ,a a b O)`'e"!b*(a Ib O)`'e*D a ]g+a g+a g+a g b O)`'D a Ib O)`'e"b*(a g b O)`'e"b*(A q b ,a b O)`'e",b*(a g+a g b O)`'a&a `'e*a b )`'a&b w)D a Ib O)`'a"a `'e*b (a a Y`'e"b &)`*b (a&a&a `'e#e#e#a Eb O)`'b (*a a 1b 6*`'a a&a E`'D a 1`'a+a E`'`+e*a,`'a&A  a&_F  a `'e"qD A s a g a 1`'a&a `'a"#a+)a,7`'e&Xe"Y`'b+(a+Ua,1`'a"!a =`'a&!a =`'g a Ob O)`'`+a mg+a mg+a mg+a mg `'a"aa"?C `'e&Le&Oe&Me&Ve"W`'a&wa&a&a U`'a&a&a"g `'e*a"a U`'`+e"e"a `'e"a"D A s a 1`'e*a a a&a U`'e*a U`'`+a Ug `'e"a&D a*b ,a b O)`'e"a&D h g b #+g b O)`'e"qD a g b O)`'h e& C 7`'e"a `'e"ra A  `'a b (*a Qa b 6*`'`*a,`'a&a `'a&%D `*a Ca 1e&a 9`'a"3D `*a /a 1a 9`'`*e"`'a"?G m`'`+a,Gb#o*`'a#K`'e"a" `'`*`+a,Y`'a&_a `'a&a&ka&a&a"`'a&ye"D a a a 1`'e*a k`'a&a I`'`*`+e#a#a I`'`+a&`+e#b#(`'e#`'D a"g a a 1`'a&a `'e"A 3 e&a&A 2 `'e" F  `'e"e"D h g b O)`'e*a"a+k`+a `'`+e"e"`'e"D a 9a a 1`'e*a+ka `'D a a Ia 1`'D A 2 a Ia 1`'a&a 9`'a&a&#a"3`'e"qA q `'e"ra )`'A s e&e& A q `'e"sa 9`'A s e&>e& A q `'h g `'a Ug `'a Ug `'a&a&a&a&a& a&%a&a&ya&ma&#a&w`'e*a U`'e&e">`'a"sb (a*a,`'a&`*a,a UA `'a"a&a `'e*3a,b#o*a UA `'a&`*a,b#o*a UA `'a&a"`'e&e"3`'e">D ha*a,`'a&a"`'`*a,b#o*g a Ib O)A `'e&e#3`'A b (A 2 g a"g b O)`'a&a A `'e&g a&a Ob O)`'a"e"e#`'a"b ,e&b ,e&b ,`'e&e"`'e"Nb*(a&5a&[`+a Ib O)a I`'a"Aa"[g b O)a I`'e,3b#o*a O`'e,3`+a,Q`'e&3g a Ob O)`'a,b#o*a Ua e`'`+a,k`'a&D eg a Ob O)`'b*(a Ua&g b O)`'`+a,`'g a Ob O)`'a#a&a&a&D a a a&b O)`'`*a"`'e"b 7+`'`*`'e"a `'e"a"a `'e&e#e"`'D a Cb O)`'a"a&b (a a a&b O)`'e&e"`'a&a&/a I`'`*a&/a Ia&a `'a" b",A s b O)D mg b O)`'a&`*a"a#`'e#a")e"`'`+`+e+e#m`'e&e"`'e#e#b 7+g h g a ?`'e" e"b +g `'e&a Ca&ca&S`'a"[b 7+g `'e&@e" e"`'e"e"a mg `'D ka yg a b O)`'b+*a"A  . 30011111111 1 1 1 1 1111111111111122222222 2 2 2 2 2222222222222233333333`'e+*e+b Kq`'a"g `'a"D A r b *g b #+g b O)`'e" e"@`'a"a"a+g+`+h g `'`+`+e#`'1 FADDFADDPFSUBFSUBPFSUBRFSUBRPFMULFMULPFDIVFDIVPFDIVRFDIVRPFCOMPFCOMPPFCHSFLDFSTFSTPFLDFSTFSTPFXCHFFREEFL`'e&a Ug `'a"D a g b O)`'`*e&e"`'a&-b**a&qb*(a+Ia Ob O)`'a"?a&Ea&[b**b*(a+Ia Ob O)`'`*e"@`'a"Ub**D `*a+Ia Ob O)`'e&ne"`'a"kb**b )b*(a+Oa Ib O)`'e&ze"~`'e*b (*a&D a+a a 1b 6*`'a+a&b )D a a 1b 6*`'a"D a 1b 6*`'a&a&a"`'e*a+a+a `'D A s a Ia 1`'e*ga+a,D A s a 1`'b (*D ga b 6*`'a&a&a a 1`'a"a 1`'a"a 1`'e"a a a b 6*`'`*`+a b (*D a 9a+1a,Y`'e"b*(b (*a+a&a a 1b 6*`'a"a 1b 6*`'A ! a I`'e"b*(a A s a 1`'b n,g b O)`' 3F118 BUILTIN OPERAND MUST BE IN CONTIGUOUS STORAGE5F105 LABEL IS NOT DEFINED AT AN EXECUTABLE STATEMENT;F207 OVERLAP ACTUAL ARGUMENT -- SPECIAL COMPILATION NEEDED???4FREE SPACE FAILED IN PHASE 40P INVALID MASK POINTER IN PHASE 40RINVALID OPERATION NUMBERTINVALID TEST NUMBERV ATTEMPT TO DECREMENT 0 USE COUNTXATTEMPT TO READ PAST END OF BUS_DIGIT BIGGER THAN BASE` BAD NUMERALbINVALID MODE FOR OFFSET???rxrGENERATED CODELABELS, STATEMENT FUNCTIONS AND SYSTEM ROUTINESBB  ˆˆC IBCCYRBCCCC B  ( 8 0 (%8*.26: >BGM R(X(^ ejp0u8{80(88 ! 0 %' ),/1 47:=?ADFL """  UN\dk `#.=pi i   6,ttG LS"*0@@@@aa@@JJ  JJ  VV P00ry$00~~~ :U\ D`v q`@0@TY [\\ ^_` b d \\ ^gl nv0d \\ ^gyzj@hi{|}~0L  eSeSenSeSAenSAeS Sn'2?Eee'""q"2kkq"??4>9EAJS\enw2?4U"/EeReR^ex!@ @ @@@ @ P PPP Pp`  (2defgnpoqrtsuxy,.40628:>B-/51739<@D         #   "    $ &    dnx f  RRRS\\]*+ !>?45  .ffghijfggppqrst "'-2  #'+.158<@DHLPTX\kosw{ADDADCSUBSBBCMPANDORXORIMULIDIVNOTNEGINCDECSALRCL2 ROUPMGROUP/; STATEMENT # //PROC//FAR//NEAR//ENDP/44444444/CHARACTER//COMPLEX//INTEGER//INTERVAL//LABEL//LOGICAL//REALDZFLD1FTSTFXAMFABSFSQRTFDECSTPFINCSTPFLDCWFSTCWFSTSWFENIFDISIFSAVEFRSTORINPUTOUTPUTZLLENZGGENBBENEEAAEBFINITMUL ,MOV,XCHG,TEST,LEA,āLES,,TEST,TESTA,A,ƁMOV,MOV,0PUSHPOP@PPUSHXPOPMOVA,MOV,ACWDXCHGAX,Ё,1ҁ,CLCMCFALC䕅악DXCALLCALLCALLCALLRETRETRETRETJMPJMP JMPJMPIRETSTICLIINTOpJpJ'DAAHLTWAITMOV,MOV,PUSHPOPSTDCLDMOVSS,MOVSP,MOVBP,SPPUSHSSPOPDSMOVDS,UPUSHBPPUSHDSMOVDX,JCXZBINCDXIDECCXJCXZLOOPJCXZ MOVDS,DXLOOPMOVDX,MULDXADDAX,SIXCHGAX,CXMOVBL,DLMOVDL,ADDAX,DI;CMPCX,AXSBBBL,DLXLAT[BX]0XOR,OR,8CMP,yJNSNEGpJЀRCR,1RCL,1DWPUSHESPPUSHAXQPUSHCXRPUSHDXSPUSHBXVPUSHSIWPUSHDI_POPDI^POPSI[POPBXZPOPDXYPOPCXXPOPAXPOPESADCDL,DHREP LOCK XCHG AL,MOVAL,@INCAXрSLL,1SAHFMOV,uJNE+SUBCX,XAMOVCL,xSHRCL,CLDECALuJNZ٩ݩ۩(ߩ۩ةܩ٪٫ݫثTOS,ޫ۪PUSHFPOPFrJCTESTA,0WAITNEG:CMP,MOV,NDECSI+SUBCX,SIADDBX,SIMOVAL,pJSUBSP,MOVSP,BP]POPBPMOV,CBWDW JMP.MOV,BPvPUSH[BP].STATUS87CALLЀRCRAL,1rJCCALLCALL ʀRET8HMOVAX,AX%ANDAX,A5XORAX,@FTEST[BP].CODE8086,uJNE~MOVCX,FCLEX⃉MOVBX,SPvPUSH[BP].@DISPLMOVBP,BXADC,tJZ &MOVES,ES:HDECADD,JMPtJZ sJNB MULADDDX,߫FQ_TQ_MQERMQETM:_WM:_NTQ_INITFQ_MQER ACSAINANTASNAT2ATNCI2COSCSCSHDIMDSESEXPFPINTIRTLGDLGEMAXMINMODNI2NINREALMATHFILTERRI2RMDRNTSGNSINSNHSSSTTTANTNHY2XYI2YI43LABEL ADDRESS AND CURRENT LOCATION COUNTER DISAGREE1F251 TOO MANY PROCEDURE NAMES AND LABELS TO SORT *PREMATURE END-OF-FILE ON INTERMEDIATE FILE"$INTERMEDIATE-FILE RECORD IS TOO LONG$ INTERMEDIATE-FILE CHECKSUM ERROR&%INTERMEDIATE-FILE RECORD IS TOO SHORTNO MESSAGE FOR THIS ERROR)6F252 MORE THAN 64K OF DATA OUTSIDE COMMON -- 64K USED*@MORE THAN 64K OF DATA OUTSIDE COMMON INCL. CONSTANTS -- 64K USED+!MORE THAN 64K OF CODE -- 64K USED,7F254 MORE THAN 64K OF CODE INCL. CONSTANTS -- 64K USED-/F255 MORE THAN 64K OF STACK NEEDED -- 64K USED.ES:CS:SS:DS:; [BX+SI]SEG @@STACK$OFFSETCS:@@STACK$FRAMECS:@@DATA$FRAME/DEFN//NAME//ADDRESS//DATA TYPE//ATTRIBUTES//----//----//-------//---------//----------//EXTERNAL SYSTEM ROUTINES//REFERENCES//------------------------//----------//DEFN//LABEL//ADDRESS//ATTRIBUTES//-----//-----//-------//----------/ @/-----/ 0123456789ABCDEFr U&G"< t>u>17㋇>>t &7㋇Z&7u]U Pl`;PPC]U +ȉ79Ns  F767v P]UCC$<u2C 'DCC)DCC(D CCPTCCPT]UN"705 3 3 3 3333333333333344444444 4 4 4 4 4444444444444455555555 5 5 5 5 5555555PD_335a9~(jO&-]Ud n f d f PPt n v t l v PPV;^;d;P;;;; CPh0]U!t CrB;@;>;<;C|th;h;= @ WC PPq]U`7TtV.P/PI]U X6H@PsTCs(6ߠCs6`;]U(u;J;H;]à;J;H;]U&G&wU]U&G&wU&w U]U&7TeTe9$7r&pnTTeu]U>(7uGPeeP.>(7uGPeeP PGPeePd&7TeTe9$7reeTTeu]U&G&Ve&7TeTe9$7r;Ves &p PSTeu]U$7Ze(71(79$7vH$7$7;&7r&GXe&Gy (7&7Ze9&7w(7)&7+$7XeQ]URu&FJ;FH;PSPSPSv6TQ]U&G\e&Gt6^ePP6\e6^eP\e^e]U`e>t &Zbe&`e&`e١`e]UY&GH;]U>n;t;PSh;*7t;n;t;PmSh;]U>uY&GRe&Gde&7&O(7&<uu,E빡(7H$7&Gݠde<t<uI딀>deu눀>deuX뼂>det]U>"7t"PZ]U>t$<t Xu~s ~sPR]U6p;s6ef]Ut((e(e(e&GePUse(e&u~see ~seee(ee"QYe]UP:PP PL P;PU PL P)PU PL PPU]UN  t&P[~s PHPA"& t#P.P'P 4 tKe@e؋$ ㋇&ees6e]?see07븋eLJ07]UFew^36e<;u];C]U6"#P6$#I> 7u~s6,#B6(#< 7XXXXXPQPXP*5X~s6.#6*#Cep;]Up;e&Gp;h;&Gt6 #6"6p; s e"C]Uee㋇pet4e9*#t .#;eu #;eu P6eLe]U @-ee㋇etVe9#u3Ph;PPv,";eu ";eu ";euP%6ee]U&Ge&7ePQ>et?6ePs06ePr6ePs6ePs8]U$eeeh;L;N;*7n;<t<uw{eee㉇peh;N;ȉD;L;"tRe]U&GPGPeeP&Ge@e]U~sff^&Yf=w>YtYPBIY^&PSYYP^&Y@Y.7YPvI]UYYP;PIYP;PI&GPGPYYP&GY@Y;u &G&GN;&GeYP6eCIYPvIYPlH]U6e(CPP.7 e㉇07er]U^㋟$ S㋟&eX%e/CP/PCP׋e/u6eP PCCP)10e㋟&e/P/PCCPy׋e/C]Ue<t tePGePPHeP6eH>evePhGePPGeP6eGeP&GPHeP6e&w/e]U&G &Gee:u :u<9et6>etePFePPeGeP;PnGeP6ecGee>ev/ePFePP.GeP;P7GeP6e,GeeeP&w7GeP6e&wbe]Ue<t/tePBFePPFeP;PFeP;PF>ev+ePFePPFeP;PFeP;PF&GPGPeePՋeeCe6&LeeNOeP@P#F&GeӸePD;&GP8FeP P Fe]Ue<t tePKEePPEeP6eE>eveP'EePPEeP6eEU>eueP&GP eP&wEeP6e&we]Ue<t/tePDePP;EeP;PDEeP;P7E>ev+ePDePPEeP;PEeP;PEeP&wEeP6e&w@e]Ue<t teP DePPDeP6eD>evePCePPDeP6eD*eP&wDeP6e&we]U졬 eF e>ewOee;w9eF+eeF1 tePhP!Kneueue ]Uee?w2Ps$>l;rPX֡l;@l;e؉;eu]Uee e;ew1PBs#>l;rP ֡l;@l;ءe;eu]U&Ge&7ePJ>eu6e@Ps?T6e@Ps6ePs$6ePs &G ee6e Pseh6ePss-&G &Ge&u96eP,6eP7r6eP(see6e PΡ&Ge&G ]U&G$<u! t6f;Pr]U|!t t||sCe?>o?]U&GeD&7ePH6ePosS6e@P`s6e PQs0+6eP8s6eP$s>eu!6e@Pr6ePr;]U&Ge6ePs 6ePr6e@Ps! tK6e@Pr6ePsP GP6z;%T GP6|;GPPeYP?͡.7 &G ]Ue/5 htYPP4YPP3thth;xh5 u YPP3YPP3YPthf3thz;h]U&Gq&GU|;.!u t IP!uYzYYP;P?YP;P?"YY""Y@YYP6{?YP+Pl?YPP)?s u YPYPP@?YP6z;?YPh>ee~eee3PZIePC>Y|YYP1>2PHY.7eeee;ewP=s eLJ07euظYP=3PH1PH]UYYt >;<;@t B;@;P3PCP]ee?w0Ps"6eP PCP&eCPPeuȸYPP=]U&&GJ&7hPDYP6h&wPPS6zh>huxh@xhءz;fP]U&ʸYPPR=&uYP YPP5=YP{P+=&u YPP=YP&GRPN=YP|P<YPP<YPmPxhcrxh|h.4PBPG]áxh@xhz;f]U>xhcrxh.4PAPUGxh@xh؋Fg]Ur&u&G0&hhhhhOhh;hsYYYWP;YP{P;YPFRP;YP}Pr;YPPh;YPnP^;Az;~hYYYWPx;YPwP5;h&&W6h& &|;u;wZ+h>h>hu$hhךNhhh>hhh hhhs YPP:YP6h6h:>huYPP:YPvv`hYPPc:YPz;HPm:YPPM:YP6~hX:Ghtov6z;4:]" T ThP6h&wGFs hP hP6z;7hP7z;YYYWP7YP{P7YP P7YPPw7YP6z;7z;zhh㉇fh㋇fzh]U>|;uNYYYWP^7YPtP7YPP7YPP7YPrP6YPP6Ez;|;]YhQU제hs>u]áT& u]&G hxh&t+hs &cs.4PBPA 3855555566666666 6 6 6 6 6666666666666677777777 7 7 7 7 777777777777778888]UYYYWPO6h>hu $<u>hu96Ps*YP P6YPtP6YPP6YPP5YYPP5YPtP5YPP5hsX&7hP<YPP5YP6h&wYPrP5YP6xh5>xhtYPPz5YP6h5z;f;]UYPP5YP{PL5YPvB5YP}P85YP4]UYPPX5YP{P5YPv 5YP|P5YPP4YPjP4YPY4]UYPP 5YP{P4YPv4YP~P4YP"4]UYP4z;]U|h&GYY&Ggthg;th}&Gr wPP6zh&u 6|;.&2uZ&(u/&u%&t6 h/XP/PXPh/u6hP PXXPj0h㋟&h/P/PXXP躵h/X]U^>u&Gh&&7hP:6hPs 6|;+6hP߿r6h PпuPP6zhv=YYYWP3YPuP2YPP2YP6h&w&z;h>huP#6z;S6hL$YYWP2YPPo2vhxhth>th|=vh@vh u YPPA2YPP72YPthg<2thqz;h]U~u$~uvj~uvuv8Fu%9Fuv~uvvʀ~u$~uv 붃~uv v 렰8Ft9FuvrhhhWP1hP{P[1~u hPPK1hPFRP1hP|P+1hPP!1hPmP1hP0z;@z;vP1]UFsf6@P躽s&h<1tx>h2tx>h3tx>hAtx>hBtx>hCtx>h!tx>h"tx>h#tx>huh }Fsq&_.iDDDDDDDDDDDDDDDhDh=h6h/h(h!hhh h h]U&_.DTETEE EEE"E*ETE2E:EBETEJEvFv>v6v.v&vv v v v P/]U6@PLsvvvd vvvI]U.DRCs 'D,D 'DX,DRCs(D(DYH":u)DZ)Dt'D(D+D":u-DP]-D]UCS;r;DS;t;ES;v;Yhhw$1]WCS.1]Phr;.huhhw)؊0Dt1]WQ`.1]Ph0;e.huϸ1]P-]U&G$< u?hs]Á>Yrh3P0PE9]øYPP.YP&GP.]UCs;8;@8;0DD0;YP6;-YPP-YPP-YP!-8;;]UCs8;@8;1DE2;YP6;-YPPx-YPPn-Cs2DF8;4;YPPR-YPPH-Cs3DG8;6;hFP+7YP,8;;]UCsY8;YP6;-Cs2DF8;4;YPP,YPP,3DG8;6;hFP6YP1,8;;]UYY8;]Uh&7h(7+hH$7h蓹&Gh<t>hu]À>hum]À>hu]À>ht>hu]U6h->hw-P-h+h+hP-ohH&hH;H;]ð2P4P!7]Uhh;hr ;hu]U>)_t(_P.+(_]U>)_t(_P+(_]U|+h]U>hvC>)_t>(_u90h+)_;rL>hu>hwsh]U>hu]áhH&h w-]]]U>huhr,\]<]U>(_u]UhhhJShh]Uhhh%u ;J;86HSPcshJ;6HSPJhHS.1P2P5hhH;]U6HSPs,P6LS6PSP6NS6PSLS <;NS >;6HS@Ps, P6LS6PS0P6NS6PSLS @;NS B;]UhsB)hh0)h+hhhhhPhP hh]UHS>PSu &GPSh&G h&G~;;hh~;;;NSu;LSvh t hPhP# hhhPhhHY;s!Bhsh;hu h;ht R(h;JSu h;ht5hhhh~;;a]UHS!&Ghh&hrh h;htK(uԡhH;(_ൡH;&GJSh>h>h t"hhh9hrRS,)hu]UhhNs%CshsQehsO;Ԡhs@ hs''^h;H;;J;(_]Uh4;u5D8Ft1؊3Q33P;;P蜶^3;;Pv8Ft;Ƈ;];]U>X;v,7XPP PXPXC]Ë,7㋇07X$ S㋟&hX%7 r6iiu]U젔$u@2iPh0iWP/2irPP0i60iZ0i㊇is2is)*P0P$P.NNNN,7 M,7]UZ;ij&G ;6Z; Ps:&G腳&GPGP;;PN&G;]øP@4P;;P;S6&tPP;;PjY;]UXXXh%XXht7xT;膲hu &G&GXCsXXh$PCs]6XPPXP XXP6,7 ]UZ;茲&7hP+6Z;@Ps; r4Z;;HuCs>hw>,7r6Z; P聱s.,7>hu26Z;@Pfs6Z;PTsf,7&GD;XZ;;Du ,7p;b6Z;@P"s6Z; Ps%ht#6Z;Pr6Z;Ps,7E6Z;Pڰs,7&G'6Z;P輰s ,7&+G ,7&G;;;h QP>hv;Ƈ;.;>hu6Z;P_r;Ƈ;?;5h$P6,7]U;;h$;5DI Z;h$P,]U^h$GCsPh㍇(4Ph㍇4P^GP+^G]UX;㋇^ht BNCX;XXhChCh Ch Cshhu5D hhh#;uCht $ h ht} hhth$h.hht%XPhhht#;tXPht;]UX;㋇! P4DX%:;6I]U PP4P ]Pڰ5 ]6 P7 P]Pð6 ]]P ]U"P"P@eP虰@e>e=eP ]U^Y=vYP ^PPYYPS^Y@YR;]U&G"< t"7t7YP]UF;h;tP]UiD  7~s. 7pҠCs h;\;iH;h;]U; iPPɫr ;;?D;&Gi&GH&GPGP;;P&G;6i>d ]Uih;i\;H;h;!t .0c/cWPPCs]U> u]ád;; u]!tI0c=r/cP>0cu/cP;P-/cP;P /cP{P8/cP6h;-Cs d;]U,X;؋! t]ËX;㋟!.2WWFWQWVW]WkWuW}WWW 7]]C]à!$u@C|]6I]]]]U(eP6 iG(eP6 iu(eP^㊇;P=(eP^㊇;P((eP^㊇;P(ePij;@j;^;]U ih is ijPj]U&G$< u ix&G$"7t $XP%;]U^㊇ir^㊇is it]UF^ritiui]Uvs^LJiii]U^㋇>蠨^㋇i&G]U^K㊇is^Ƈi2^Kv拇iii;iwiiti^㊇isƇi^㊇isLJi]U^㊇ir^ヿit]U^iii]Uii9FrMP6is%iK6iVi_iiHPl8 6Xi6XiPPzX{XP zX]UTi@Ti؊(P]U6X]U6It:$Zi_is؍5Pf]ðPZiP;2irPP,0i㋇iitθ)P#P0i2is PP0iP60i0i@0iWP|60i0i㊇is2is,+P0P$2is PP0iPP0iHPP}0iK㋇i\;0i㋇ii" us 0i]UPPPPis /P0Pm#PP]U9suTP+is -P0P+#PPPPPPPP(i*iip;]UP\PP&PPPPPP$i&i'i PP]5:888 8 8 8 8 8888888888888899999999 9 9 9 9 99999999999999:::::::: : : : : :::U7]U>us]ð]Uv vv64i؊QGPvW4i]UF tD^=r -^ ^+vPP^@P^]Uvv!]UV;;^;v6n V;PP6it >V;v" >V;s&P6n CNP6V;ڦ6i9V;t PV;W;~]UP1&G΢GPP4PF]UCsP;PJ:P$]UCsV~t@P6h;PPPP~t^PPPڨPNFݰPzXP]UУLSNSPSGSHSJS>GSu$HSJS~;;6f GSPP줃t>GSu]À>GSuC6f LSPJSP輤:iCGSBiu >@i u4>Biu>@iu 5P,]6@iP P\Py]U>i=P 6>i@Ps 5P5P6>iPr5P]U&P&wPPP]U/P6>iP詟s(PI&6>iP葟s)P1]U>i&G@i&7BiP{6>i@P\sx6>iPJr6>i@P;sw=P%6>i@P#s*5P6>iP s55+6>i@PsI56>iPsS5_5P6>i Pʞsj5P6>iP贞su5P6>iP螞s5P]UzXF{XzX]Uaiai؊Fbi]UF t"؊QGPzX{XP襠^zX]UCsci]U5DX5;;Ƈ;[X;X;Ƈ;];]UzX<sƇ{X zX]UCsci]UCsci]U~t.aijikiFNiFHiFjiniji]UvFP]U^Fbiv]U~vN>6It~vNFNai+IQ$PvzXPv]U>;t$;szX<sƇ{X zX;Pl^i]UXs+>Xt$zX<sƇ{X zX긨5P7XP0^i]U젌5bi5P5P^i]UTi@Ti(]UCsXLP]UmCsWBP]U_i~uP607P`f6ci6I${i>6Iu P627QP{i47P#~u>6Iucikibi{i5ci]UP%P6;P5P;P;PzX{XP͝;zX]U>Xu6XVi 6XVi6Vi6X6XXP]U졣;+h;ai+HP;P]U>;u;+h;ai+Pq6;hP6;P;P`]U5bivBPPPv;^i]UTi@Ti؊(|iP|iPPPzX{XPOzX]UTi@Ti؊(Xi@Ti؊(Yi9 i^G@Gii9iv^(iii^6i6`;SFV̐^G]U/cP(_P|1]Pu]U^wF@G]U5㍇5PT]UqiqiPXPP6XqiP/]UPXPXP]U6PPP5P^i]Uup;p;\i6\i6\iPPzX{XPzX^i]UvBN 6'P]U6;iP6;6;;P`]U^sv5D GPGPHEv5D ;P;P1>;u 6;>;u6;P6;6;]UCrfPP6X6XXPPji˷aikiLJNi]UCs cir]øXPP.]UCs XPP]K]UPLXPP]U>ait!u]àai)_=sji 2]=r ~iii}iaiiiȊ}i:r:bi ~iki:}iuNiHi~ini ~i}iu]UTi(ci^i^isTi@Ti؊(`i떰 PP낸XPPf]Ubiaimilikiji_izX >biuii aiiidiibiP6ai!aih;Fis .P0PbFih;]U>4Dt:;㋇J#Tit:;4D]U>4Du :;TiU]]U졥iC&GPGPiPi!&GPGPiP]UCs @ C]á ; s @ ]j g ]Ui&GiΔ&7iP>it>6iPs/6iPs >l;rP謙l;@l;ءi;]Ui&Gi_&7iP >iu/6iP胓r >l;rPLl;@l;ءi;]UP^㍇;P;P试P^㍇;P^㍇;P蔕P;P^㍇;P]UP^㍇;P;PcP^㍇;P^㍇;PHP;P^㍇;P3]U^P5P P5P &P5P /P5P =P|6Pt Pl6Pd P_6PW &PR 6PJ /PE)6P= =P846P0 p]UP @6P =PZ6P KPf6P=P6P.]UP6PP6P&P6P=P6PP6PP6P&P6P=P6Px]U^㋇;i^㋇;ii:ir.i:iw;iȴiii;iw0؊i:is^"ii:iv^ iuNj^]U^㋇;i^㋇;i2i:isii8iviiiȴiii;iw0؊i:is^$ii:iv^iuǠi^]U^㋟;㋟$i 늇/ii#ډi^㋟;㋟$i늏/i#ii;ri;iwi;is^i;iv^^]UAI=l;mPo l; uPpPnP{ ii9l;rd؋;P{#PoGP&Gi&PO&wPPyP piu]UAI=l;z輾l; tSPPqPUnP ii9l;r5;QPCPM=Pi;iu]UAI=l;uiDi mPC l; uP5pPnPO ii9l;s؋;PIP@GP&Gi&P#6i@P!s&wPPAP^iD;&GPPP#P@itf]Uii?w Ƈ2iu]UFi?w^62]UFi?w^6i26u]U!t]^G u uO?|uJi: er* pAr Or-r%r&CODEDATASTFv v Pvv]UvvvFP]UFVusv9~u~svP~vvvPjvvvFPW]UFV >1uvP0vFP&4>2uvPvvvPvv3vFP)]U>)_r>)_uY>(_t>(_u(_P6J;(_P6H;)_b;-h;F;F;h;H;(_WP(_P6H;~(_PvtH;]UvwFPp]UF%it}F %i)_؊6++b;NN͈iFi1]P6iEi&Di1]W FP>iv1]PFP~u 1]PP]U>)_s>2]rP@PvPG]U(_F;h;6PP;PP F(_]Ui i]Ui]UN ;vFFi]U6h iPiHP譍6h PP融]U|s+ ; r袓iƇi Ƈi 6r iPCSk e]UFiH; v AIiCs ؠ@Iii]UPFiii]U^&7pj^pj&8r&0pju]Uqj^rjqjt^:rjt Qqj]Uv@sjsj8Ft^0^sj]U^7tj^tj8r01tju]Uvj>t!<&xjvj&vj@I vj>t. &&G tPP POPlԸ6P]Uzj>t&Ɉ&Gt %&Gzj&ӡzj tPP PP]U[&GJ]Uχ&G辇]Ujj<w,1u jƇj. jƇj juͰ jjj^j&8r&jju丂jP]U蹇&G]U0&Gt]Ujj t0談&j&G藇&G;Fu&2]U>u>s3]Á>s2]1>u]U>u>v3]Ã>v2]1>u]À>u]À>u]À>u]U>vJ]]UF^<vF"j;vj^㠦j6^G]Ujj uV&j&GB&G;Fuϡj&>tQ&j&G;Fs#8::::::::::;;;;;;;; ; ; ; ; ;;;;;;;;;;;;;;<<<<<<<jPF&Gj&2&G;FtIjj른PDžF&G&jj訅j& vv]UPL肅F&G&jP,bj&F&GjP Aj&G&]U6PC]Ujlk&]UjNj.k.ku;؋j;jr.k.k㋇jHjjjjj;jsS/k>/kuj@jP6j/kPVjj9jsP6j/kPV>/kwjj;sQPV뤊.k㋇jj6jPV.k㡰j9jvA0k9js@1k2r.k㡰j+jj+j;2k2ks".k㋇jjjHjj@j j@.k㉇jjjjHj.k]U젎 ȴ6k4k4k;6kwa؋&>tIт&8k&Gu0&G :kV:k t詂&Gu:kС8k4ku]U젏 ȴ>kkw-؋>>t‚&@kV@k//STATEMENT //, //WARNING//ERROR//: //10000H//65536D// SIZE/DICTIONARY SUMMARY:KB MEMORY AVAILABLEKB MEMORY USED (100KB DISK SPACE USED/STORAGE REQUIREMENTS FOR MODULE //CODE AREA//CONSTANT AREA//VARIABLE AREA//MAXIMUM STACK SIZE// ERROR// DETECTED.// WARNING// ISSUED.//ENTRY POINT IS //FLOATING-POINT OPERATIONS WERE GENERATED.//COMPILATION OF // COMPLETE.// ABORTED.// TOTAL ERROR// DETECTED.// TOTAL WARNING// ISSUED.//END OF FORTRAN-86 COMPILATION./F261 TOO MANY ERRORS TO SORTNO MESSAGE FOR THIS ERROR???r U&w P&G]U>."rP."@."ءf!"P0"P"P]U2"3"5"Fs%0" 0"]U6p n6p P$!f!m!." +ȉh!v  h!6h! P Pe]UPQ ]Ul!:sd!$u@|l!sH @ ؂"t#؂"t # ]U6p ,"PPj!>j!tD6p 0"P6,"j!f!d!;sm!X6p ,"PPj!d!f!]U6p l!|Q]UV}6."6"P!Pa]U6p PP">t6p n!PPGr!6p 0"P6n!5r!]Uu!s:CPeu!]Ut!r/PGPt!r/P]Up!G\t!&G$<ut!]UJP]Up!w Psa&G}GP]Up!w Ps-&GIGP^]Uu!؍"p! ru!VP] PP PPp!Gv!<@r.v!>v!1u">v!2u/>v!3uW >v!4uu!sbPp!@rfoPvP6"Pn!-P ]UQF؍"P"P QF؍"PF؍"PQ"PF؍"P]UF؋"x!F؋"z!9x!r2x!;z!w:F؊"x!F؊"z!9x!s^x!;z!v^^]UP!s |P6|!PP P*$P!s P6|!PPP]U&G"< t]U츌P&F؊t u!v|!]U츂!P7PM-!!>!t! P!P!!>!t!P!P!䡆!!!PP PPP6!P PPP!dᣖ!16!! ;sPPQ!ds PP PpP%P)P\!!;v+!!6!P P3PPPI)&]UP"P0:P~ P PPP PPlP! PPXP0 P{|!!x #PO6P PPD PJ>tSPL P6v6P PePX P>tSPb PGt&:tl P6PPP9 t } P P"Pt  P]U6 P PP P~> tSP% Pj6 P PP PL> tSP P8Tu-!P(De]U쿟! !]U!]UN ;vFF!]U6h !P!HP6h PP]U|s+ ; r!Ƈ! Ƈ! 6r !PCS< 0&"u]U'"^("'"t^:("t Q'"]Uv@)")"8Ft^0^)"]U^7*"^*"8r01*"u]U BNFBBBu;؋B;DBrBB㋇BHBDBBBB;BsSB>BuB@BP6BBPVBB9BsP6BBPV>BwBB;sQPV뤊B㋇DBB6BPVBB9BvAB9DBs@B2rBB+BDB+B;BBs"B㋇B BBHFBB@B B@B㉇ BDBFBBHDBB]U젎 BBB;Bwa؋&>tI!&B&Gu0&G BVB t&GuBСBBu]U젏 ȴBBB;Bw-؋>>t&BVBBu]U&&&]r! ux= > ? @ A B C D E F G H I J K L