; @U*U*UORSTATUSFEATURENOLDMSGPROG2TERPRIPRINCQUOTELoading FFORMA 10  xPRINT-FIXED-FIELD-FLOATINGLSUBR-0 1n+( @` ";` 0Z(+ " @J Z(@ ( -,5 E"QBASE+ZEROS*NOPOINT EXPLODE  anA+ `+  `FLOAT,8-,},:)R7BgT " ZFIXNUM + g`5`; " Z2+`?` hP Np73Ph #` g~7 RwOUT-SET|! *  B` h5.)- @ @ p0n `Xˀ'|10S  ӃD";{`2.c`-,0NDD|/p/./nw@T07@``o31OUT|  "wQ@ #REPEAT-OUT|a6@`+<3 hNBH03Nh`3# "3NOUT|)a3. " p4NPˀ'  @-, odh -,0`R Nw~ "w~ p0  00,< "pa3a!A 16B +R " +SZNREVERSE`@A g~4J_[(Z (ERROR!+T ,_,8`-, $p-,7 ;-,7@` $h-,7 $-,,8dP Ko! ",/@R//,xq}']fY OUT OF RANGER.@`FAIL-ACT#( PRINT-FIXED-PRECISION-FLOATING-0 ;$` Z(+i%1n@+l @` ";`(0 Z(+p " @DZ(@ ( -,D0  anA+{ `+| `-,|@,:7Bg~ " Z2` g~+`; " Z`+` hPL Np@@wz Nw};  Nw{K . g} Nw|7 g} B`R(`E "MEMQa'3Nh d7 Nw~7 g|6 8`W[g|d Bg " Z`; g@ Nw{Zg|[ Bg " Z @+$ gk`Zg|Z[d Bg " Z++ g @ Nw| ``_7Bg| " Z @`_ g| Nw{ hc  * 20]+6 ;+ L`+<30^+< -, "p!#+=LG10| p1n` `/p1n`D"K+Q`3n_+Qˀˀ'@@  Ӄ;ˀ Nwˀ'  'P0.w |.10S)h[+Q w@;3`2nw|`PK+V * `c ` Nw};`-, Nwz "wz$ p Pw} `..P{` * 3+ w{0n` p/w{;/w{ Nw};'`. `"`' @  D;' )oh` -, Nwz "wz  w{5Nz2.`++}[+} wz5N4N!. ;K@ + w{5Nk++K+. @;L;5. 0-, Nwz "wz w};@ 0+ wz5N+-, 7d  '.w}   h-,0DA 0+$5N @ Nw}+$&.5P&.>w}D0++$EXˀ'  -, wz Nw$ Nwz ; Nw}3+&@" .`S3na+(0.7 .;;/w}/w~ Pw~6@`+0`# $ "w~a3 hNA3Nh+53 "3 "wza3!@ 0 " w} w} ` ,< "pa3 "w|aA3+F3 "3` 3a7@`+I $ "w~a6B +K " +LZ` g}4JY[(Z (!+M ,Y,8-,0@3-,7 $p-,7 ;-,d7 $h-,7 $-,,8b`0Ko! ", 0 /,x 0?|9Lf3 0{# PRINT-FIXED-FIELD-FIXED-0 1n+g( @` ";` 0Z(+k "1n+n H @`   (@D" -, ``,<,: `n"` `0 `FIX`+ B`,8,80d " Z+<@($1.+<0n+< &  " B@0-, B g~   B` *  g5.  gABS Bg gHAULONG- 0N+ˀˀ`W + 0N+0.`1 g 0`W g "hˀ0@` `W g "hLOG @0,Z7 B`Q@IFIX/,8` `02N+* ``W `ˀ Pw@ . w~/w Pp40<3` `e3  "pa30!+733 ga6B `u @b " `wZ+H g~[(Z ( D!`y ,8-, -,0@  $w~-,73-,7 $-,0 4,8LKo! ",@`0//0 :,x# cSUBR,8a,:,< h/.@-, q.-,/.K`K' Np,8.p&. Nw "w '.  B`2nh+]  Np+^ @/p+V 'û  '; )h2nh+g@+o '.p  '.p @@)h2nh+n p+o p ,xA@m@M,8,< pK `0.'`0.2+y0.+x7 .` 0.t` .` 2.+.P+~ .` 2. ` .` 2. +D0K+7 .` ,xkaB 1@Pdn5J` Hr-,,83+ ``C`LEFT1+ * J`+ A0B++ 1B +EXPLODEC1B+R@1EXPLODEN3+3 " -,1 B + `9 + 0+NUMBERPE4B 5N  J@+/ !,x0,<,86F ++F ,*,8 %GETCHARN5 *p,8g  ",TYO<`a[] %B5 Np-,+/-,Z-, XB "/,xP E",86F +8 o,8,8",1PRIN1o7+=[u`3+;  dZ`NRECONCXC` "/@,xh e,<,8 p p`4NE `>p` " @`]+G "/,xX}ANDU*U*UNULLGETARRAYARRAYDIMSPROGNFLONUMOSTOREU*U*U ' #' 0CONDBIGNUMLAMBDAU*U*UIVALPROGT1T2LINVG0009=U*U*URETURN>SETQ5HAIPARTU*U*ULSHFSC@PLUSPBOOLEe*QUOU*U*U0 <#31+TIMESGOU*]pG0010QUOTIENT*$ !9; =  ? )? A !CA "EA)"#A G$I%K&M'O(Q)SI*&"UI+WQ-M,WOYM-(YYM[.+Q]WOYM-(/YM-Q[Q WO/M-Q(!A &_O0Q9a(A)&_1c/2Q-(eA "&_YW)3gM-4Q9i&5A)"&_1c/kQ-YY)[.eW&6&WMmM 7S o K&M'8I*&"UA &MA "&q$MW&6&WM9Ms78osx;