; "M(U)0"-STRING-MACROSUBR"NCONS[` :1+Z`4D `NREVERSE`MAKNAM+  0 ,READCHg `CONS B``0.Uj,xGCTWAT xSTRINGPTYPEP@SYMBOL `) $ `GETCHARa`) `FLATC $p `a  `) `-,+ "t ,xX MKSTRING` 5B$ *RT* ( -,BASE*NOPOINT ,80(`EXPLODEN` B`4B"LAST !@3XC`3 L +#z8$f,h,xMAKE-ATOM`Z,8,8A 5F* "`]@Z4B-As3``]+*Xs `,x8%STRINGLENGTHA:P/.-,,x@_CATENATELSUBR-0`d,< $EQUALaa 4B7 @-,` * 0@ J`` Bg@Z{As3`u `ˀ Np "p .0 B`Z8`Zs `k`uA@`] g/,xHcSUBSTR -0,<,< @`@` @  (1n`@+R (b "NUMBERP`4B[ ,Z,8FIX/pˀ (p,8",QABMINo`/pˀ Nw1 "w p2og`PLUSP@ pp+b ` B`4BjAs3+e@1  AsXB g~+n "/0 0,x`GCONCAT-0,<0A@,88 g3o``F` $*APPLY`ˀ g.0`0Z@`3 Np *p  Jg+r,x]@SUBSTRING-0,<,<`` @`  (@1n`@+ " ,<A7D`+ A 1.pˀ)*) p.`ˀ B`7B``/ K`/@`A , ,8,8g + @ˀ Nw "w`= "K< @`]+! "/,xNTHCHAR0,8` W `3n+( @ "`cˀ $paA1`c `_ `a`c@``]` `/,x  ESETSYNTAXU;`QUOTEMACRO%'x;