;"I(U*U*EXPLODEN0=LESSPIMPLODEMAKE-FORMAT-OP-NAMESUBR,<@,8(B{ an + `-,@z+UT `U@,8,8,80  "`,8U7@g+[gZg Bg~@  Dg ,,8,8,8,8",<U`ah4B g~/. Np-, +UL g~hU8-,XC` B`+U, gUD ///,x%jU*U0QUOTESREMPROPPUTPROPLAMBDAFORMAT-MAKE-REALSYMFORMAT-MAKE-PROPDEF @0,8 ",8-, $-,-,2H $-, $-,*`-,2@  $-,*-, $-,0d-, $-, $-,  2 $-,-,,X-,z <f 2-, $-,*`-, $H-,-, $-,-,.U,X-,,xp FLUSH-MACROMEMOSxMACROFETCHFLATCU*U*UGETCHARNFORMAT-CHAR-TABLENAMECOND=OBARRAYPNPUTPNGETU*TT*FORMAT-OBARRAYMACROMEMOFORMAT-MAKE-REALSYM.RMac,85B? `0-,Z[,8(B{6 +;1 [`0B+;Z`[=N; $ Z`AH[ -, $ -,+=U, m `-,       z CC>-,U/ z & $ `UH/,xx.U+UjUPROGNDEFPROPMACROxFORMAT-MAKE-OP-SETUPxformat-make-op-setup lossERRORNEWNAMEU*@1EQNOTCARFORMAT-MAKE-OP-SETUP.RMac,85Bn `-,0,8Z[Z[,8,8(F{6 +L[`0F+L(B{6 ;Q+L[g1B+QUTUT ,Q,8,8o` g~-, g-,,8",<nTdU|U@z h{sP `-, $-, -, $-,,8 g-, ` $-, $-,,8 g~-,0H g-, $-,-, ` $-,*g~-, g~-, `0 $-, $-,-,,X  -,,X-,-, $ -,0 d-,z h{sP-, $-,`0*`-, $-,-,,XH-,/ & $ `UHju/,xP@xDEFINE-FORMAT-OPxFORMAT-CTL-REPEAT-CHARU*U*UFORMAT-CTL-NO-ARGFORMAT-CTL-MULTI-ARGFORMAT-CTL-ONE-ARGFEATURELSBSTATUSDEFINE-PRIVATE-ROUTINEDEFUNCOMPILEP DEFINE-FORMAT-OP.RMac,85B" `-,,8Z[Z[ Z ,8 ",8,8 Bg-,~ g~(N{ 8an +} : & g~+UhZg~5D "+hB0U8(D{7 +[g~-,Zg~P-, Bg~ "+U`[g~-,@MZg~[-, Bg~ "U$ B`-,0@ `-, g~-, Bgz9fu@`4B g~ g-, g}-, : $-,+U#P g} g~-,m g-, $-,U#< Bg g~ -, $-,,8 g-,  2 $-,-,,X-, $@(-,-, g-,z ?xUH/,xx#x;