;"I(U*U*UPROGNCONDSTATUSNOFEATURENOLDMSGTERPRIMSGFILESPRINCPNPUTU*UjuQUOTE;Loading CGOL 651pSETQxDEFPROPU:U*UT+INTERNAL-STRING-MARKER xALPHALESSPLISPV2071CGOL651VERSIONU*U.UPUSHFUNCTIONLAMBDAXORFILE-EXIT-FUNCTIONS        xANDFEATUREU*U*uCOMPLRSPECIALIT*LEXPRCAT*EXPRPARSExGETU+UjWCGRUBLOADPRATT xEOFMxBOUNDPLISTxW:]juTOKENxxSTRINGNUDxxCIBASExu;UnWxCGOLERRxxCTOKEN-TABLExxRET-NUDxu.WxSUBR ,x0FUNxTOP-LEVELxW+UnWSILENCExxFREE-KONSxxCTYIPEEKxu;U*UxCGOL-INPUTxxSFAPFILEPTYI^QINFILEPNORMALIZE-READ-ARGS,8[Z`[,8,8Zg5F @b1D + *5B ` 5B @@`  ` Jg `0B + J`+6@` @+7D!+ ! J`+ J` g U,X-,/,x LISTIFYWHICH-OPERATIONSU*@`RUBOUT-HANDLERTOPLEVEL-PARSECGOLREADLSUBR-0,8"-,1`,8"[Z F,8*Q4B & $# ` .+A,8 A@ " $'-. gy4J&[(Z (0H# `+ &$ $# gy .+A+' gy ]$+ /+H%ARGSU:@b!%$&& xTOPLEVEL-PARSE-1-, "'.T+@(ADVANCE-, * D" ( -, ' T$C0B(+2(z:u+4@@ ",.@ +p+FORCE-RUBOUT,8,8,84F97H  +9 $ + 3o+F ,=b,8,8",< ,@,8,8g~,8",D <~J ,D,8,8,8",< ,F`,8,8",<7@`+I (+I :U "/,x&p   5FILEMODEFILEPOSDSKU*U*UMEMQMAXTYOEnd of file while forcing ruboW;Tut,,--../p//x/ xERROR,<,8 `4BU & $# ` .+A4BU[ 0Z0J(+O & $( ` .+A  + ` 4B} `-, $-,0c-, $)-,,8Z4D`[ Z0J)+[[ "**+` " "/4B} ,l,8,8g ,j,8@0,8 ,g,8,8g}",<) /.,<`` *p,8",<+/,8",<) ,8,<,8 g0n2+| ,r,8,8g~,8",< Np "p B` "8Ny 1N+y ,y,8,8,8",<+ g.. Nw "w Bg+n// ,,8,8g,8",< 9N}00 ,,8,8,8g",<0//0D],x&&/KCTYID6B+ , ,8,8,8 ",< + d@@,x6B+ ,,8,8 B],8",< B+,xhCUNTYI#]-, B,xCGOLTYIPEEK CREAD-READTABLEu:T 12xREADTABLE222xREADCREAD 2-, 2@05 ,,8,8,8",<3+8U*U*UCSKIP-WHITESPACEEOF encountered inside cgol-exp - CU;]*UGOLREAD556677889p99x9 xMAKE-TOKENCTOKEN-STRINGCWHITESPACEPCDIGIT-PU*U#.ICHAR-UPCASECLOOKUPCFOLLOW-TAILKONSCGOLTOKEN4-,} ",8,8 g9N%6@g|+! & $4!D@ "9+ g1 & g g|:  + g1N+'0N +-6@g|+) "( + g1 & g g|:+0Nb +36@g|+03+ g1 & gD@ g|:+0N+8 * @@g~@@g~ Jg0 Bg+0N+B6@g|+?:,8 $-, $-, B * J,X + g1 & g g|:+ g@h;4BG g1 & g g|:+3 g0N+V6@g|+N;4BM@@g~  * Jg~+ "<+6@g~+S g1"b & $ g|:+7@g~+U * Jg~@ @@g~+1N"+X0N2+d7@g~+d6@g} @ +d,8 1N+b1N+b; 5Bb g1 & g~ g|:/+/ * Jg}+ g;4BjP6@g|+h * Jg~7@g}+j * Jg}+ g1N+m0N+q7@g~+q7@g}+qLb6@g}+q;5B g<  Bg= B`4B~6@g|+zZ= $ gb > & $ :+ g1 & gD g|:+@@g~@@g~ g| g>,8 `X0 Bg,Xg|+/,xh,8 0N+ " +0N+ " +P 0N+ " +0N+ " +0N @0+ " +0Ng " /,xX 00,8,80 B` 0N+6@gg " Bg+;5B6@gA:+ `/,x@ASSOC$?PUhEXPLODENINITIALIZE-MULTI-CHARACTER-TOKEN-TABLE,8? $, B/0,a,x,8-,4B(< 0,8 g= Bg4B'0Zg= $D  `>+'//,xXU*U*wtoken with illegal first character@AABBCCpDDxu( #D xINSERTTOKPUTTOK-,?,8 D [=5B0 ,0,8,82,8",<0 @dX ,XD B+DP),8@ ,85B6 "-,+@[=,805B=[g,8 $Zg~D,X-,  g-,+@ZZgDXC` g@`]-,//,xH3izer U*U*whas inserted missing " before @EFFGGHHIpIIxqA@I x0,8,8 `1N+E0N "+K & $& "I `1 & $D0 g:+[0N+Q 0N+OQ10+W & $ g:+[0N+W&  1N+V 0N +W0@0 B`0 g,8 g> Bg,Xg+C`/,x(A,8 1.+_1n +`g " /,x8\,8 @ 1.0+f0n=+f/.-, +f-,0*U/,xHaNREVERSEOK-AS-NUMBER-PIMPLODEIBASEUCREADLISTREKLAIM,8,8,84FjJ Bg6@g D+lJ5Bn gK+q -,  K gL,*gL g/0.@ 1,x  gREADLIST,8 2-, 2 :M/+ @sERRSET,8-,1 `M " $|-. gyL-,0 + ,[(B{  anbg " /,x (w,8,8A@7F+-,QBZ H "-,0 `0XB "+-,/,x]d U`*NCONC N B,x HTYIPEEKU*U MEMBERGET-READCGOL-#-READMACRO,8 ,,8P,8,8",<NOOPPz '$f,< "pQ/4B " + ,,8,8g",@`_<3Q*`C`/,x   $3xU:U*wRATRATREADRS3xUndefined languageSTTUpUUxu*U*wU xWRNG-TYPE-ARGNot a language symbolVWWXXpYYxp` Y x,84B(B{ an+ $3D  `5B$ ,,8,8%,8g,8&",D <0Q+$ ,$,8,8&,8g,8'",A@D"<0Q/,xUVYV]:U*U RAT-ARITHMETIC_ALISTYxPLUSRAT-PLUSMINUSRAT-MINUSDIFFERENCERAT-DIFFERENCEU*U*UTIMESRAT-TIMESFLOATQUOTIENTRAT-QUOTIENTEQUALRAT-EQUALLESSPRAT-LESSPU*]*GREATERPRAT-GREATERPEXPTRAT-EXPTYYZZ [[ \\ ]] ^ ^_ _` `a ab bc xARITHMETIC_ALISTLEXPR-FUNCALL-0@@b,8",8 Y-, c ,.,8``0,8/,8",<d,/,x%zH;U$ 0%'%S&& x#-MACRO- ""R H0SETSYNTAX-SHARP-MACROMACROu*Ujue(edxSTRING-STREAM-CHAR-LISTSTRING-STREAMCHAR-LISTDEFSTRUCT-SLOTffg gxDEFSTRUCT-EXPAND-REF-MACROfhexMAKE-STRING-STREAM-1W+UjuDEFSTRUCT-NAMEhfixDEFSTRUCT-EXPAND-CONS-MACROhiexALTER-STRING-STREAMjfixDEFSTRUCT-EXPAND-ALTER-MACROjjexONEU*U*USFADEFSTRUCT-DONT-DISPLACE%%DEFSTRUCT-EMPTY%%NOTYPESELFEVALCOMPILESTRING-STREAM-W*T"DEFSTRUCT-DESCRIPTIONfkklg&lmfhmnf&nojo pxSFA-CREATESFA-STOREMAKE-STRING-STREAM,8 &f $n "f p*`? & $& `q,X,x]*U*U1UNTYISFA-GETunknown command to string-streW;@ amssttuuvpvvxv x,8,8,80D#+;(P(0 NrzV?jC+L0D +A $&rZ $&,8@  g~q[`/+L0DN+D $&Cr[+L0Dr+I $&r `-,0 & $& gq+L ,L,8,8M ],8",<0/,xv h 7READ-PRIN1-STACKw*D 1wxwwxPRIN1CGOL-ENTER w 3-, w  Q-, Bw "$ B3,xNCGOL-EXITZw,8w Bw[`[ D3Z Bw/j\@0,xRADVANCE NUDNUD'yyx "'-,,xY A:W@@> B,xxYVERIFY,84B]@`]' `-,/,x [NUDERRW UNUDERR NUDz{yx "z-,,x0^LBPLGETDENU*U"FUNBOUNDP MISSING PRECEDING EXPRESSIONNUDL(RBP {|4BhD ! |5Bh ,f,8,8,8}",<" $0 & $4+},81,8' gT |4BxPOOz '$f `Q4Bx6D+s }I# |4Bq 0B~+s {|5Bx $~E g5Bu "-, g-,0@ @0+x g-, $-,-,2H $-, $-,/.\C,x}(`FUNBOUNDP NUD|yx "-, *U $|-,,xx~FSUBREXPRFEXPRLEXPRU*@*FEXPRAUTOLOADGETLFBOUNDP,84B(B{ Tan+%ez 5O{U `5B `+ *r "/,xHLEDERRLEDERR NUDyx "t-,,xH  IS NOT AN OPERATOR WITH A LEFT ARGUMENT , ,8,8,8QKW",< & $4&@ GETDEN NUD|yx!AH "-, $|-,,xX@F,84B[ 5BZ`|/0.\@0,x@NUD NUDyyx "y-,,xY@` 5B! (N{ 8anb+ d -, $-, $-, b0]+! }|z5B"z,xLEDW QLED NUDyx "-,,xp#LEDL Da:r|z5B',xh$PARSE NUDyx "`]-, $-,,x'*LESS@0 ,8y@,8 {| $5D/ $&D0 g5B1 `+5,8 gC` `] Bg/+,/,x@*PUTPROPW :WLBP ([n xx ",x86EXITEXIT NUD  yx 4 " -,,x(7x ",x 9U*@#LANGUAGE_ALIST is an unknown languageSPEAK,8  ?,84B> Z D`+C ,A,8,8g,8L",<" @ & $  }[`-, B} D Z`[-, B {Z`Z[ @0-, B{/ "/,x%j\@0 H:FORGETFORGET NUD  yx " -,,xYD"XMZ}4BR B}Z DZ{ F{ "j\@0,xPNRESETLANGUAGERESETLANGUAGE NUDyx "-,,x]*J%hSCNUDCLEDCLBPyzP:z J}z@:6 H z0:5: B F{ *y J * J * J ",x]F`TLEARN,8  ?,84B_Z D`@+o ,b,8,8g,8",<,8 ,f,8,8g~,8",<,8 ,i,8,8g~ 0,8",<-,,X-,,Xb-, g B`-,  -, B [` BZ`[ DZ`Z[H( F g-, $-, z 7X\-,2@0 $?-,,X*`-,-,2J  $-, z 7X\-, $ -,0d-,,X-, $-,*u,xy [RIGHTRIGHT NUDyxDRBP`] -, $-,,xRIGHTLISTW*JRIGHTLIST NUDyx,PARSELISTzZu-, -,2A:W $-,,x0RIGHTREPRIGHTREP NUDyx`1 -, $-,-,  U-, $-,,xPDENTYPEISFUNU*U 1LEFTDEPROGNIFYDEFUNSYNTAX-NEEDED*EVALDEFFIX-,` ,8-, $-,bP,8  _4Bz:6U,8' "&@ 2,X-,,X-, $ 0-,,87@g+" -, g @0-, -, $-,-,0J  `-,oz ?PRATT;CGOL 651_2 ` " -,-,0 /,x%ELITERAL,8 $1/0u.!+HARITHARITH NUD22yx " -, $2-,,x(J,8 c0? B4BQZ+R `-,/0.UjU,x MDEFINEDEFINE NUD33yxPROG2*APPENDU( %#RBPDEFBPSUBST-,ezP0n1<4JY[(F Z (2H+T,8',X+Y "-,~0&C ,86D+]1 $4_4Bf@@g@ 2  "-, Bg~ -, $H -,-, $-, $4-,0$ Bg~ Jg+p -, Bg'H  -, $-,-,  $-, Bg~ "-, $-,2@ $4-, Bg~ Jg  H' !,8 0B~+6D+'  L( 1B-+x%+x " Bg g0B+|0[g * Dg Jg "-'@@g~@@g}+ ! 1B++0B+7D+ 7B+`2 -, $-,-, $'@-,-, $ g}5 Bg}  2-, $&-, -, $ -, `-, B`'+ g} -, $ g~5 Bg~ 1B++ H 0B+6D+@@g}+ "5-,  @2 $-,-, $-, $4@`-, Bg} -, $ g5D@1 Bg'+  g~_4B' 0B Pf+&' "n+' 6,8  M10B++' "n+- `5B-  6,87@g|+0 g|-, $+1  $ g}5 & $5 `6 Bg} "+b'7@g}+O g}-, -,bP,8  g}_4B;z:6U,8 g|-,0@ ,X-,,X-, $-,0$,87@g+F -, g-,1H -, $-,-, +G ",8 g~J $,X5,X @0-,oz ?@[\]^`{|}~!@7xDEFTOK,8 $E/0u.+xaNEWTOKNEWTOK NUD88yx% $7B0-,,87D+f,X,xcW`C( NUD~9yx "&,8 "-',X,x_+@$ g-& x( LED~9x,8 1B-+o $!E "&+o ",X-,,8 "-unU',X,xk~: x& x{{ LEDu( @2:;xAPPLY}-, $ -, $ d,8 "&,X-, $;-, >u,8 "<',X,x0s:: x<& x[W(H![ NUD<=yxCIRC 1B-+ $ "& A $-,,8 0B-+ `-,2B0 $=-,+ `/+ ` P ",8--zHdf',X,xP{LAST,8 >,8 g-,XC`*g//UjU+X-& x[ LED<>xABMAPCARUHCONSSUBLIS,8 0B:+' ` "?@0-,,8 "& $?-,-,0J0!,X-,; @@ ??z $-}RUA,8 "<'@ @2,X+ `-, $ -, $ d,8 "&,X-, $@-, `_,8 "-',X/,xh <: xU:HOCTOCT NUDAByx *B-,  "~ ' "&,,8 "-',XkHC,x !' NUD.Cyx $& ",8 ".}*q',X,x0'.& x## NUDCDyx,8u.!',X,x@+== NUDDEyx "j\0!"P-\\ NUDEFyx%,8 "+'!Ld "&,X-, $-,&_,8 0BE+7',X,x`/E& xU:TLETLET NUDFGyx&UNPPRATT;CGOL 651_3[`0BG+;Z`@ @0[+= `-, $-,/0.U*P,x%8INBE:=REVERSELENGTH-,~2Hb0 +Hz H8& *5BQ% $ g5LH! BgIIDzUe&' 0B:+L' "& 2 * ,8 "< Jg',X-, $G0-,+M "n g-, Bgb0 0B+>'+>'7@`+a $H`C g,J Bg "& g  -, $-,-, $ -,0b,8 gJ=N][g+^ g "&@ -,-,,X-, $;-,0Pf2+g "& g-, $0-,,8 gJ,X-,/0.Uc,xp>PROGPROG NUDKKyx%,8 "+ ` ' "&,X-, $K-,0.Uj,x8hNEWNEW NUDLLyxRETURN%,8!Pf "+' "&,8>,8[ -, $M-,QC`*g/`],X-, $K-,,xHnSPECIAL NUDu `2MyxDECLARE% $-,-, $Nud!-,,xXyLITERAL NUD1Nyx $ "n * $1-,,xh}SUB1PRATT;CGOL 651_4,X-,2A:P $O-,,xx% FILLARRAYCGOLARRAY,8`! 0B~+ '[`,8 $ "& `! $O,,X-,,8 "-'P&!,X+ 0BI+ '[`,8 "n @0-,,X-, $P-,+ *u[`/,x ARRAYARRAY NUDQQyxPRATT;CGOL 651_5t2 ,X$ % PRATT;CGOL 651_6 `-, $PH -,-, $-, $-,1:P  $,X& (% REMPROPPRATT;CGOL 651_127@` +   ` g + !  gSu*(/,x8% FIXNUMFLONUMMAPC~:<zPfdf4J &([(Z (2H+ " "Q+ %,8 $R,,8 $R g, 0B~ Q+ ' $ "&,8 "-'TT zPU\c*B#4J 4[(Z (2H+ /,8',X+ 4   " ,8IDzPE4J :[(Z (2H+ 5'!E$ "n+ : ",8 0B++ ]'A@7@`+ J,8 "`,8,8g}7@`+ H 2[`,8 g~-,,X-, $P@-,-,XCgZ` Bg D`+ @ / g/+ J ",8 "&@2 $,X5 g~-, $ -,,8,8 "`,8,8g|7@`d+ Z[` g} g}-, $-,  $Q-,-,XCgZ` Bg D``+ R/ g/,X-,H+ [g~-, $-,,8,80  "`,8,8g|7@`+ |[` $y,8 0,8 "y-,,X-, ` -, $-, g|,8 g|-,2H $-, $Q-,-,` g-, $-,,87@g|+ ud g|-, g-, $P-,-,+ v ",X-,,X-,00/XCg g>Z` Bg D``+ b/ g/,X-, `0 $-, $4-,/+  M0B++ ' "&+  ",8 , @0,8,8 ,8g~,8g~",<U,X/.UjR,xS "DIMDIM NUDUVyxARRAYDIMSCDR "`2-, $V-,-, $W}."-,,x`  nn~x; LED+Wx (+ &n!oU. $(#x +n x&& LEDXXx,8 "&d-,,X-, $-, jW $4-,,x Xn xIFIF NUDYYyxU`C!THENELSE "4,8 "Z' "4@$ ,X-,,8 0BZ+ ''!@a "4,8(B{6 + $[`0B@0+ $Z`+ & ` $ -,-,0(2/+ ( ",X-, $}nW-,,x Z& xZ& x Mn~xGO [n~xU:H3WHILEWHILE NUD[\yxDO "4.-, 0,8 "\' "4,X-, `] $-, $\-,,x@ *REPEATW)0!REPEAT NUD]]yxUNTIL "4,8 "^'!L4 "4 $,X5 $4-,H -,-, $-, $\-,0/U.P,xX 3\& xFORFOR NUD^_yxPRATT;CGOL 651_13 ` @ (N{6 8+ B[`0B)g " + B * "/,xx% =ADD1PRATT;CGOL 651_14 $nZ`  -, _4B H g-, $`-,0@ + LZ`-, -, g-,2@` $Z-,-,Z`[-,0@`] g-,/,x% CPRATT;CGOL 651_15 2Z`Z[-, g-, $aA:U-,/,x% PBODYCOLLECTCOALESCEU*U*PMAPCANONMAPMAPLISTMAPCONASSQ FOUND WHERE IN OR ON EXPECTED FOUND WHERE DO, COLLECT OR COALESCE EXPECTED-,1 a -,,8',8'( H\Ub@bcc\dbdbez  }(b `e,84B ]Z D`+ a , `D,8,8g,8 ",< & $4 "nA-,,8 0B+ k' g~`4-, Bg~' g' "n ` #-, B`+ c g ? Bg4B p"Z[ Dg+ t , s,8,8,8 ",f< & $4' `J B` g~d J Bg~ "n Ba g0BU+ $_b `,4B , ,8,8 ,8g} ,8g~",<@,8 , ,8,8 ,8g},8g~L ",<@0-,,8 a,X @0-,,X-, $\-,+  $0 g~Za_4B [a(B{7 + H 2[a+  a-, g~-, $H-,-, $ -, `-,0@`2 g-,/+f"}*uf`ap UH& c& b& b& xITERITER NUDggyxIVARSU*TWHENVARRESULTSTEPDITTOWHEN-,hhF!ia^h@@_'I@'4_i_'j' 4hjh4^h4[h/4Mi4\a4z gFL e B4B !'ZDB![+ 6Bh+ &6Dh+ &6Fi+ &Pd#6Ha+ & "4 Ba hJ,8 i -, h-,-,,X-,2@  $\-,,8 a(N{6 8 $+ 1[a0D+ 1Za+ 3 a-, >W $,X5+x ^& j& ^& [& i& M& xTO LED)kxU  BY,8 "k,8 0Bl+ : (' "k+ : "n-,,X-,0H,X-, $)-,,x0 4w*@)k xl& x*GREAT*PLUS,8,8,8l4B B @ "+ K g-,,8,8 g g~b0m g~ Bg~l5B J g~-,XCg@  Bg+ D,X//,x >U:@CLOTSOFLOTSOF LEDmnx*I,8 "n-,( `/an&z T X-,\nnz w: -,,X-, `] $n-, $\-,,x` L w+Ujumo x7IxCGOLPRINT oonyxCGOLPRIN1 ppnyx:= LEDIpxSTOREFORMP  STORE,8(B{7 + X &n $ `A+ n[`0B+ bZ`[,8 "n,8ZgZ[-,,X-,0H ,X-, $ -,+ n $q B4B lZ`[,8 "-, `0,8 "n $-,-,,XbD-,,XA+ n &n $q `}*U/,x SI xCARRPLACARPLACDSETARGU+U*UPLISTSETPLISTSSTATUS rrq Wsq )sq ttq uqxITOPLEVELBREAKLEVELWHO2WHO3U*]*pTTYSCANTTYREADTTYINTGCTIMEU u u6uuuyvvwwxxyyxOFOF LEDzzx,8!@ 2 "*`-,,X-, $ujW-,,x( o z{ xOFQOFQ LED{|x d,8 "*`-, $-, @0-,,X-, $-,,x_:\@ t{{ x /P~xNOT LED/|x,8*`C` -, $/-,/,xH zu9C_/ xAND LED}x ( &B $(#P B xW)C_OR LED}x ( &~ $(#X ~ xU*U*W=#=$<#>#<$>$<=>=7~7777777xW@= LEDDx,8 "_2 & $,X&_*\ ( D xNENE LEDx,8 "_2 & @0 $,X-, $/-,,x_*\D 8  xEQEQ LEDx & $& H u+@C" x<< LEDx,8 "`2 ( &}*p $,X(# X  x>> LEDx,8!Q_ "a2 ( & $,X(# h  xW>W=# LED~x & $D& p ~ x=$ LEDx"}." & $D& x  x<# LEDx & $z\D&!  x># LEDx & $&! u9;u x<$ LED x & $&!  x>$ LEDrwjp x & $&!  x<= LED x,8!P02 "a2 & $,X-, $/}.-,,x!   x>= LED x,8 "` 2 & $,X-, $/-,0/U.U,x!( $ x|| LED  xZEROPREMAINDER 0!,8 " 2,8 " 2,8 "`*g-, g-,,X-, -,,X-,/,x!8 )u+HC_  xISINISIN LED  x & $Q&!X 3  xU:H;uISATOMISATOM LEDxATOM $$!h 5 xISNUMW)>UISNUM LEDxNUMBERP $$" 6 xEXISTSEXISTS LEDpdx-, $-, $-,z].R,x" 7 xNULL ~x. LED<x &!n]*r $@&"( :< x@@ LEDx ("}.Q & $&(#"H ; x{ NUD:yxGATHER  Q 1B<+ A $ "&+ A " $-,0` U,8 "<',X,x"P = LEDu)C_xUNION ( & $(#"h E xU:HD LEDxINTERSECT ( & $(## Gu+TD x~~ NUDyxSETDIFF $ "$#  IW;u~ LEDx ( & $(##0 J xW)C_ LEDxELEMENTP ( & $(##@ L xU:HD LEDxSUBSETP ( & $(##X Nu*U*W xULIBLSPSETSFASLELEMENTSSYMDIFFCLEARSETSU  *  !!n!xU9C_^^ LED""x (" &k $(#$( P"k xW;uCAT LED#x ( &k $(#$0 Rk x| NUDuh0! #yxABS "$2 $o,8 " '.Uj(,X,x$8 T++ NUD$%yx ~:<zPfdf4J ](1![(Z (2H+ Y "Z2+ ^ "%k@C",x$P Y+ LED$&x,8 "Z2 ($ &%}*p $,X(#$` _$% x-- LED&'x,8!Q_ "\2 (& &% $,X(#$p c&% xWh;U- NUD&'yx "[2 $%$$x g** NUDrD!!((yx~<:zPfdf4J m[(Z (2H+ i "]2 uj+ n "(,x% i* LED()x ,8 "];u2 (( &) $,X(#% n() x/W/ LED**x,8 "^2,8 "^2,8!A@ ")-,,X-,-,`0 g-,,X-,/,x_+U`!%( r*) x/:7+x/: LED++x,8 "^2">U (+ &) $,X(#%8 |+) xREMREM LEDph,,x,8 " 2 &) $,X&%H u+@C,) xMODMOD LED--x,8 ")-,`_,X-, $--,,x%X -) x ,8,8 ,86!gg " 6!gg!D $ _5B  `4N  g `m+ .W `/,x%P **7.x** LED..x ],8 "b2 &) $,X&%h  u*U.W./ x+#-#*#/#\\7/70707171x+# LED/2x"wjr (/ &% $$(#&  /% x-# LED02x (0"}." &% $&(#&( 0% x*# LED03x (0 &)!oUd" $((#&0 0) x/# LED13x (1 &) $*z\D(#&8 1) x\\ LED14x &o $1&&@ u*Ujr1o x+$-$*$/$74757576x+$ LED46x (4"}." &% $4(#&h 4% x-$ LED57x (5 &%!oUd" $5(#&p !5% x*$ LED57x (5 &) $5z\D!(#&x #5) x/$ LED68x (6 &) $6(#_*U*u' %6) x:N::A::V::X::^:7879797:7:x:N: NUDu`d8;yxBOOLE ")-, $&-, `] $P-, $;-,,x'0 ':A: LEDr29<x $9,8 "),X-, $n u-, $;-,,x'@ ,9) x:V: LEDr29<x $9,8 "%,X-, $~ u-, $;-,,x'H 29% x:X: LEDu0:=x $:,8 "%,X-, `_ $=-, $;-,,x'P 7:% xW);u:^: LED:>xLSH &/ $>&'` =:/ xPRINTw:Uj" ?4~x 4~x w4~xWRITEWRITE NUD?@yx $ "4JC] $-,U @z09J5 K $&6( >NEWLINEWw*qNEWLINE NUDAAyx ""( BUREADUREAD NUDBByx, *q $B-,,x(( CUWRITEUWRITE NUDCCyx, *q $C-,,x(8 EUFILEUFILE NUDDDyx, o $D-,,x(H G [n6}y{ y  cu x;