; ](U*U*U*FORMAT-STRING-INDEXFORMAT-COLLECT-PARAMSNREVERSEFORMAT-READ-OPCOLON-FLAG*FORMAT-CASE-DIDITFORMAT-CASE-SKIP-ONE-CLAUSEFORMAT-CASE-ONE-CLAUSESQUIDU*U*UQUOTE~~:; not last alternative in ~S*FORMAT-STRINGFERRORNo-parameter ~~; is illegal in hairy case in ~SMEMBERTFORMAT-PROCESS-TEXTFORMAT-SKIP-TEXTU*U*Unbalanced ~~[ and ~~] in ~SFORMAT-SKIP-PARAMS;]FORMAT-CALL-OPFORMAT-HAIRY-CASESUBR,<,8 .. Np *p-,~ ,8U\@ #6@g~+ `-, B Bgt! BgUh6@g+7B+7D+ tz+ U`UL5B ,,8,80H],8>,8",<UU8+<U$Da6@g+ ,,8,8,8>,8",G$<U+Ul7B+ "+$U#@h7D+ g g}+$U#(Up[g 82og}+!Zg[8 83/g}+! "@&+$U#dZgZ Bg5BU "U$Hh]U( Bg4B& * JU)pU7@g+(G&5B-+)U*@ 5B-U*, ,-,8@=h,8,8?,8",<U/hU*6@g cS+0 J` +2U0 BgL BgU/| Bg~1B +50B +6U5t  g Bg~+9U0t7@g+& & g AAh+&U6 g~0B +< "+<U60+h *UX//,x0x0x 0x]*U*U@ DPLESSPFORMAT-PRINT-ROMAN-1BASE*NOPOINTU+FORMAT-PRINCFORMAT-PRINT-ROMAN,8,8 ,E,8,8M,86@ Q7N ",8",<Up4BH ` $ G(@1 g+LU\ * (-, P0  g,UH/,x".U*U  ?$+,&!"U*@(&NTHFORMAT-TYOFORMAT-PRINT-ROMAN-CHAR ..z g$f,<L P "p/,xh N,<,<,8 w1n+\&. p.0,<` $p,< "p w~&. Pw~/h !U w0N+d6@`+d $p " 00 p..,< $p " /+vh1hUT0N+g $p "+vU0N0!+m6@`+m $p "  $p "@ C+vU81n+p $p ""..nwhC Ut,<x,<U\ w2np+u $w " (h:w+qUp "/Uh/0:U/,xp SFILLARRAYARRAYFORMAT-SMALL-ENGLISH-NUMBERSU*U*U zerozerothonefirsttwosecondthreethirdU*U*UfourfourthfivefifthsixsixthsevenseventheightU*U*UeighthnineninthtententheleveneleventhtwelvetwelfthU*U*UthirteenthirteenthfourteenfourteenthfifteenfifteenthsixteensixteenthseventeenU*UjUseventeentheighteeneighteenthnineteennineteenth00 00 00 00 00 00 0 0  0!0 !0"0 "0#0 #0$0 $0%0 %0&0 &0'0 '0(0 (0)0 )0*0 *0+0 +0,0 ,0-0  xFORMAT-TENS-ENGLISH-NUMBERSzerotyzeroteenthU*U*UonetyoneteenthtwentytwentieththirtythirtiethfortyfortiethfiftyU*U*Ufiftiethsixtysixtiethseventyseventietheightyeightiethninetyninetiethu*U*P-.0.0 /0/0 0000 1010 2020 3030 4040 5050 6060 7070 xSTANDARD-OUTPUTMINUS%'FORMAT-PRINT-ENGLISH-1FORMAT-PRINT-ENGLISH,<0!,8,8 5.} 8j8 Bgh$U\ g5N5D 8j "+U@P: 8j "+U, ,,8,8,8g~",8",<UT4B g&.2&.4p2 g&.2 $,< "p: 8j/0 g&.2 Pp "p  Bg4n7@`G(=+j +Ut ":U` ` gt:+U87@`+j! "+U t= "+Uh ` g:U//,xminus zerozeroth9 U9 hundred and th0 xB  millionU*U*Un5J billion0RJ trillion0qW5  quadrillion0xkH quintillion06r5\.z@U*U*U sextillion0' sYN- septillion0l\0 >?0 ?@0 @A0 AB0 BC0 xand th hundred.U*and th "FORMAT-INTEGER-IN-BASE-OPFIXATSIGN-FLAGfmt.R.op|,8,8@cS[4FwZG+{U\G Bg7HH :#h+z +{Uh ;UH/0.U*U,x  sFORMAT-LOSING-SAIL-CHARACTER-SETNullDownarrowAlphaBetaU*U*ULogAndLogNotEpsilonPieBackspaceTabLinefeedUpArrowFormU*U*UReturnInfinityDel (Partial)SubsetContainsIntersectionUnionForAllForSomeU*U*UXor<-> (2-Way Arrow)<- (LeftArrow)-> (RightArrow)CallAltmode=< (Less or Equal)>= (Greater or Equal)== (Equiv)U:TLogOrSpaceIIJ0J0K0K0L0L0M0M0N0N0O0O0P0P0Q0Q0R0R0S0S0T0T0U0U0V0V0W0W0X0X0Y0Y0Z0xFORMAT-CHARACTERfmt.C.op|-,~,8ZB Nw "w B`7DH+ 0.+ 1N+ 1N+ 1N+ 1N+ 1N + P1.. G.@ Nw "w B`U,87B$+" gA.@4n 8j+Uh gA.  4n 8j,U gA.4n 8j-hU8 gA.? Np "p  Bg0N?+P: 8j. "+*U`0.+ (. 4.[I+ZI B`4B+*U .?Ag,< "p/+*UTCP gA.@4n$ 8j/U gA.4n't 8j/U( gA.?,< "p/6A@`Uh//,xControl-_Meta-Top-RuboutC-M- 0 |;