;0QU*U*UORSTATUSFEATURENOLDMSGPROG2TERPRIPRINCQUOTELoading FFORMA 10 u( xPRINT-FIXED-FIELD-FLOATINGLSUBR-0,8 1n+( Z(+ ",81n+ 0Z(+ ",8 Z(,8J Z(,8Z(,8 ( &-,5 E"QBASE+ZEROS*NOPOINTQ EXPLODE (B{ anA+ `+  `FLOAT ,8-,},:)R,:7BgT " (B{ZFIXNUM0B  + g++S Pw7Bg~ " (B{Z20B + g~++S hP Np Po3Phg 2#` g~ Po RwOUT-SET|! * J B` h5.)- ( H@ @ p4.S0n +S"`..|10S  ND"no3nb+S2.c+S-, Nw} "w}Q@NDD| Nw~ w/p/./w~/nw4.S@T07@`+7 g} 1OUT| g}  "wQ@ #REPEAT-OUT| 6@`+< g}  hNBH03Nh+? g}# " g} "w}NOUT|) g}. " p4NP..  @,: w}-, oh -,0`R Nw~ "w~ p/ g}0 $ 00,< "p g} "w}//1 6B +R " +SZNREVERSE+_@A g~4J_[(Z (ERROR0H+T ,_,8` g}-, $p-, $w-,` $h-, $-,,8,8c,8dP ",< ",//@R//,xq}']fY OUT OF RANGER.@`FAIL-ACTPPRINT-FIXED-PRECISION-FLOATING-0,8 1n$+h Z(+i ",81n@+l Z(+l ",81n+o(0 Z(+p ",8 Z(D,8Z(,8Z(,8 ( &-,D0 (B{ anA+{ `+| ` -,~ -,|@-,},:,:7Bg~ " (B{Z20B + g~++L Pw7Bg} " (B{Z0B + g}++L hP"2 Np@@wz Nw}@@wz . Nw{". Nw{ . g} Nw| Po Rw| g} B`R(`E "MEMQ Bg o3Nhg .#o Nw~ Po g|(N{6 8++[g|d Bg7@ " (B{Z0B + g@ Nw{Zg|[ Bg7@ " (B{Z @0B +$ g Nw{3.\+LZg|Z[d Bg7@ " (B{Z0B ++ g @ Nw|0n+L+/7Bg| " (B{Z @0B +/ g| Nw{ h5.1 * J * D  J20]+65PL .@@w| Nwz+ 20]D`+<30^+< -,,< "p !#/./+= "oLG10| Nw} p@ 1n+L0.+L w}/p Nw~1n+DD" o2.^+Q+E3n_+Q w~....@@  Nno w}.. Nw..  0P0.w,: |.10S h/2no+Q w:w~ Nw}6@g+b w}2nw|+TP2.w{+V * Jg+b5.Y#w~/. 0` Nw} Pwz+b o-, Nwz "wz $ p/ Nwz Pw}5pb 0B+a..P3nw+b * Jg7@g+ w{4.L0n+L p/w{ w}/w{.0 Nw} Pw}0P+l o_. +s"`.0 @  o"w}.0,:  oh` / -, Nwz "wz Ro  Nwz w{5Nz o2.`++}2nwz+} wz5N o4N!. no>w}".@  Nwz+ w{5N o3.`++2.wz+ o. :w}"0 No Pwz wz5. 0 o-, Nwz "wz Nwz w}4n@ 0 w|5. wz5N o+-, o  0.w},:   h-,0DA Nw|/ 1B+$5N .@ Nw}+$ w|&.5P w|&.>w} Nw|D0++$5.""`..  -, wz& Nw$ Nwz .@@w| Nw}6@g+&@" .+) w}3na+(0.77a . w/wz/w}/w~/ Pw~40L6@`+0`# g| $ "w~ g|  hNA3Nh+5 g| " g| "wz g|!@ 0 " w}4N? "w| w}/ g| ` $,< "p g| "w|/A7@g+F g| " w}4.D g| "`  g| "w}7@`+I g| $ "w~ 6B +K " +LZ+Y g}4JY[(Z (0H+M ,Y,8 g{-,0@ g|-, $p-, $w-,0H $h-, $-,,8,8b `0,8b",< ",//0 //,xz( 0?|l?rg4e9Lf3 0{%h  dPRINT-FIXED-FIELD-FIXED-0,8 1n+g( Z(+g ",81n+j 0Z(+k ",81n+n H Z(+n   (,8Z(,8D",< -, @,<,:(B{ `n"+y `0 `FIX B`,8,8-,~0d7Bg~ " (B{Z0B +< g~@($1.+<0n+< & F " B B@0 g~-, B g~ Bg 0B B+ * Jg g5. * J gABSF Bg gHAULONG Nw 0N+ w/.&... ++ w0.?+ 0N+ w0.+ g  0++ g ,: "h.. /0@` ++ g ,: "hLOG @0,:,Z Po "o/ B`Q@IFIX,8` Nw~ "w~ Bg `/02N+* `++ `..  Pw@6@7K . w~/w/ Pp40<7@g` +2 g}  g}  "p 6@g`+7 g}  g} g6B +: @b " +;Z+H g~4JG[(Z ( D0H+< ,G,8 g}-, -,0@  $w~-, g~-, $-,0 4,8,8L,8L",< ",@`0/////0 :,xPcSUBR,80,:,< h(Nr/.@-, q.-,,</.,<2.q+U". Np,8 w.p&. Nw "w ..  B`2nh+]  Np+^ @ Nw w/p0n+V ..w  0.w,:  h/2nh+g@ w+o ..p  0.p,: @@ h/2nh+n p+o p /.///,xs"jA@m@M,8,< p2.+0.'+{0.2+y0.+x7 .+0.t@"+z7 .+2.+0.P+~7D" .+2. +7 .+2. +D02. +7 .+ ./,xkaB 1@Pdn5JA@Hr-,,8,86@g+BH `+![gLEFT0B+ * J`+ H( 0B+@@+ 1B +EXPLODEC1B+R@1EXPLODEN0B+0Bg " -, B  + 0B+ * J+ 1B+NUMBERPE4B 5N * JZg Bg+ /0, ,x0 ,<,8,86F ++F ,*,8 $GETCHARN,< *p,8,8g  ",TYO</+0[4H. $B Np-, +/-,Z-,0 XB "//,xP"",8,86F +8 ,7,8,8,8",QD PRIN1<+=,8[4H:+;  dZ`NRECONCXC`/ "/@,xh2,<,8,8 p4nF,< p`4NE ` g >p+A "/ @`]+G "//,xX >ANDU*U*UNULLGETARRAYARRAYDIMSPROGNFLONUM'STOREU*U*U ' ? 9 0CONDBIGNUMLAMBDAU*U*UIVALPROGT1T2LINVG0009=U*U*URETURN>SETQHAIPART r U*U*ULSHFSC@PLUSPBOOLE2*QUOU*U*U0 @<#31+TIMESGOU*]pG0010QUOTIENT*$ !      !! "" "# #$$%%&&''(())$*&"*$++(&,+',&-(,,&-.+(.+',&-(/,& -( -( +'/& -((! &/'0(0( &/11/2(-(2 "&/,+)33&- 4(4&5  "&/11/ 5(-,,)-.2+&6&+&6&7)7%&&'8$*&"* && "&8$&+&6&+&9&97879x;