hưs8p,LAMBDAF2Dp,lFASD-DATADkeithJames Brown&FFDp,COMPILER,NEW-DESTINATIONSpGLOBALlTpB SITElGigamos CambridgepB ,PACKAGELISP-INTERNALSpB lREADTABLEstandard Common-Lisp1DCIN-PACKAGEDÀQUOTEB51DÀDEFVARÁ*PRINT-ESCAPE*B-lIndicates whether or not to output escape characters when printing anexpression.1DB?Á*PRINT-PRETTY*NILlIndicates whether or not to nicely format expressions when printing them.1DB?Á*PRINT-CIRCLE*BE,If T, the printer will detect cycles in output expressions and print themusing the #n= and #n# syntax.1DB?*PRINT-BASE*F Determines what radix the printer will use to print rational numbers.1DB?Á*PRINT-RADIX*BEIf not NIL, the printer will print a radix specifier along with eachrational number.1DB?*PRINT-CASE*pB UPCASE,Controls the case of output. :UPCASE means use upper case, :DOWNCASE meansuse lower case, :CAPITALIZE means capitalize the first letter of each word.1DB?Á*PRINT-GENSYM*B-Indicates whether or not to print #: in front of uninterned symbols.1DB?Á*PRINT-LEVEL*FControls how many levels deep a nested object is printed. If NIL, an object is printed to arbitrary depth; if a number, parts of the object whichare nested more times than that number are printed as #.1DB?Á*PRINT-LENGTH*BElControls how many elements at a given level of nesting are printed. If NIL, all the elements on a given level are printed; if a number, then wheneverthe number of objects on a level exceeds that number, the excess are printedwith three dots, ..., in their place.1DB?Á*PRINT-ARRAY*BEIf NIL, the contents of arrays (except for strings) are not printed.1DB?*ALWAYS-PRINT-PACKAGE-PREFIXES?*BElIf true, always print a symbol's package when printing the symbol.1DB?Á*PRINT-NICELY*BE1DDEFCONSTANT*SHORT-FLOAT-MANTISSA-BITS*F1DBt*SINGLE-FLOAT-MANTISSA-BITS*F1DBt*DOUBLE-FLOAT-MANTISSA-BITS*F41DBtC*LONG-FLOAT-MANTISSA-BITS*F41DBt*SHORT-FLOAT-SIGNIFICANT-DIGITS*F1DBtC*SINGLE-FLOAT-SIGNIFICANT-DIGITS*F1DBtC*DOUBLE-FLOAT-SIGNIFICANT-DIGITS*F1DBt*LONG-FLOAT-SIGNIFICANT-DIGITS*F