(/VERSIONCHECK 2) 

(DECLAIM (FTYPE (FUNCTION (|%String| |%Shell|) |%String|)
                |OUTFORM;doubleFloatFormat;2S;1|)) 

(DECLAIM (FTYPE (FUNCTION (|%String| |%Shell|) |%Thing|)
                |OUTFORM;sform|)) 

(PUT '|OUTFORM;sform| '|SPADreplace| '(XLAM (|s|) |s|)) 

(DECLAIM (FTYPE (FUNCTION (|%Symbol| |%Shell|) |%Thing|)
                |OUTFORM;eform|)) 

(PUT '|OUTFORM;eform| '|SPADreplace| '(XLAM (|e|) |e|)) 

(DECLAIM (FTYPE (FUNCTION (|%Integer| |%Shell|) |%Thing|)
                |OUTFORM;iform|)) 

(PUT '|OUTFORM;iform| '|SPADreplace| '(XLAM (|i|) |i|)) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|) |OUTFORM;bless|)) 

(PUT '|OUTFORM;bless| '|SPADreplace| '(XLAM (|x|) |x|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Void|)
                |OUTFORM;print;$V;6|)) 

(PUT '|OUTFORM;print;$V;6| '|SPADreplace| '|mathprint|) 

(DECLAIM (FTYPE (FUNCTION (|%String| |%Shell|) |%Thing|)
                |OUTFORM;message;S$;7|)) 

(DECLAIM (FTYPE (FUNCTION (|%String| |%Shell|) |%Void|)
                |OUTFORM;messagePrint;SV;8|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Boolean|)
                |OUTFORM;=;2$B;9|)) 

(PUT '|OUTFORM;=;2$B;9| '|SPADreplace| '|%equal|) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;=;3$;10|)) 

(PUT '|OUTFORM;=;3$;10| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '= |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;coerce;2$;11|)) 

(PUT '|OUTFORM;coerce;2$;11| '|SPADreplace| '(XLAM (|a|) |a|)) 

(DECLAIM (FTYPE (FUNCTION (|%Integer| |%Shell|) |%Thing|)
                |OUTFORM;outputForm;I$;12|)) 

(PUT '|OUTFORM;outputForm;I$;12| '|SPADreplace| '(XLAM (|n|) |n|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;outputForm;S$;13|)) 

(PUT '|OUTFORM;outputForm;S$;13| '|SPADreplace| '(XLAM (|e|) |e|)) 

(DECLAIM (FTYPE (FUNCTION (|%DoubleFloat| |%Shell|) |%Thing|)
                |OUTFORM;outputForm;Df$;14|)) 

(PUT '|OUTFORM;outputForm;Df$;14| '|SPADreplace|
     'DFLOAT-FORMAT-GENERAL) 

(DECLAIM (FTYPE (FUNCTION (|%String| |%Shell|) |%Thing|)
                |OUTFORM;outputForm;S$;15|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Integer|)
                |OUTFORM;width;$I;16|)) 

(PUT '|OUTFORM;width;$I;16| '|SPADreplace| '|outformWidth|) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Integer|)
                |OUTFORM;height;$I;17|)) 

(PUT '|OUTFORM;height;$I;17| '|SPADreplace| '|height|) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Integer|)
                |OUTFORM;subHeight;$I;18|)) 

(PUT '|OUTFORM;subHeight;$I;18| '|SPADreplace| '|subspan|) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Integer|)
                |OUTFORM;superHeight;$I;19|)) 

(PUT '|OUTFORM;superHeight;$I;19| '|SPADreplace| '|superspan|) 

(DECLAIM (FTYPE (FUNCTION (|%Shell|) |%Integer|) |OUTFORM;height;I;20|)) 

(PUT '|OUTFORM;height;I;20| '|SPADreplace| '(XLAM NIL 20)) 

(DECLAIM (FTYPE (FUNCTION (|%Shell|) |%Integer|) |OUTFORM;width;I;21|)) 

(PUT '|OUTFORM;width;I;21| '|SPADreplace| '(XLAM NIL 66)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Integer| |%Shell|) |%Thing|)
                |OUTFORM;center;$I$;22|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Integer| |%Shell|) |%Thing|)
                |OUTFORM;left;$I$;23|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Integer| |%Shell|) |%Thing|)
                |OUTFORM;right;$I$;24|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;center;2$;25|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;left;2$;26|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;right;2$;27|)) 

(DECLAIM (FTYPE (FUNCTION (|%Integer| |%Shell|) |%Thing|)
                |OUTFORM;vspace;I$;28|)) 

(DECLAIM (FTYPE (FUNCTION (|%Integer| |%Shell|) |%Thing|)
                |OUTFORM;hspace;I$;29|)) 

(DECLAIM (FTYPE (FUNCTION (|%Integer| |%Integer| |%Shell|) |%Thing|)
                |OUTFORM;rspace;2I$;30|)) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;matrix;L$;31|)) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;pile;L$;32|)) 

(PUT '|OUTFORM;pile;L$;32| '|SPADreplace|
     '(XLAM (|l|) (|%pair| 'SC |l|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;commaSeparate;L$;33|)) 

(PUT '|OUTFORM;commaSeparate;L$;33| '|SPADreplace|
     '(XLAM (|l|) (|%pair| 'AGGLST |l|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;semicolonSeparate;L$;34|)) 

(PUT '|OUTFORM;semicolonSeparate;L$;34| '|SPADreplace|
     '(XLAM (|l|) (|%pair| 'AGGSET |l|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;blankSeparate;L$;35|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;brace;2$;36|)) 

(PUT '|OUTFORM;brace;2$;36| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'BRACE |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;brace;L$;37|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;bracket;2$;38|)) 

(PUT '|OUTFORM;bracket;2$;38| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'BRACKET |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;bracket;L$;39|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;paren;2$;40|)) 

(PUT '|OUTFORM;paren;2$;40| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'PAREN |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;paren;L$;41|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;sub;3$;42|)) 

(PUT '|OUTFORM;sub;3$;42| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SUB |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;super;3$;43|)) 

(PUT '|OUTFORM;super;3$;43| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SUPERSUB |a| " " |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;presub;3$;44|)) 

(PUT '|OUTFORM;presub;3$;44| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SUPERSUB |a| " " " " " " |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;presuper;3$;45|)) 

(PUT '|OUTFORM;presuper;3$;45| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SUPERSUB |a| " " " " |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%List| |%Shell|) |%Thing|)
                |OUTFORM;scripts;$L$;46|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%List| |%Shell|) |%Thing|)
                |OUTFORM;supersub;$L$;47|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;hconcat;3$;48|)) 

(PUT '|OUTFORM;hconcat;3$;48| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'CONCAT |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;hconcat;L$;49|)) 

(PUT '|OUTFORM;hconcat;L$;49| '|SPADreplace|
     '(XLAM (|l|) (|%pair| 'CONCAT |l|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;vconcat;3$;50|)) 

(PUT '|OUTFORM;vconcat;3$;50| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'VCONCAT |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%List| |%Shell|) |%Thing|)
                |OUTFORM;vconcat;L$;51|)) 

(PUT '|OUTFORM;vconcat;L$;51| '|SPADreplace|
     '(XLAM (|l|) (|%pair| 'VCONCAT |l|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;~=;3$;52|)) 

(PUT '|OUTFORM;~=;3$;52| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '~= |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;<;3$;53|)) 

(PUT '|OUTFORM;<;3$;53| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '< |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;>;3$;54|)) 

(PUT '|OUTFORM;>;3$;54| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '> |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;<=;3$;55|)) 

(PUT '|OUTFORM;<=;3$;55| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '<= |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;>=;3$;56|)) 

(PUT '|OUTFORM;>=;3$;56| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '>= |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;+;3$;57|)) 

(PUT '|OUTFORM;+;3$;57| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '+ |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;-;3$;58|)) 

(PUT '|OUTFORM;-;3$;58| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '- |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;-;2$;59|)) 

(PUT '|OUTFORM;-;2$;59| '|SPADreplace| '(XLAM (|a|) (|%list| '- |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;*;3$;60|)) 

(PUT '|OUTFORM;*;3$;60| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '* |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;/;3$;61|)) 

(PUT '|OUTFORM;/;3$;61| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '/ |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;**;3$;62|)) 

(PUT '|OUTFORM;**;3$;62| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '** |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;div;3$;63|)) 

(PUT '|OUTFORM;div;3$;63| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '|div| |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;rem;3$;64|)) 

(PUT '|OUTFORM;rem;3$;64| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '|rem| |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;quo;3$;65|)) 

(PUT '|OUTFORM;quo;3$;65| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '|quo| |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;exquo;3$;66|)) 

(PUT '|OUTFORM;exquo;3$;66| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '|exquo| |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;and;3$;67|)) 

(PUT '|OUTFORM;and;3$;67| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '|and| |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;or;3$;68|)) 

(PUT '|OUTFORM;or;3$;68| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '|or| |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;not;2$;69|)) 

(PUT '|OUTFORM;not;2$;69| '|SPADreplace|
     '(XLAM (|a|) (|%list| '|not| |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;SEGMENT;3$;70|)) 

(PUT '|OUTFORM;SEGMENT;3$;70| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SEGMENT |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;SEGMENT;2$;71|)) 

(PUT '|OUTFORM;SEGMENT;2$;71| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'SEGMENT |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;binomial;3$;72|)) 

(PUT '|OUTFORM;binomial;3$;72| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'BINOMIAL |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Shell|) |%Thing|) |OUTFORM;empty;$;73|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Boolean|)
                |OUTFORM;infix?;$B;74|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%List| |%Shell|) |%Thing|)
                |OUTFORM;elt;$L$;75|)) 

(PUT '|OUTFORM;elt;$L$;75| '|SPADreplace| '|%pair|) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%List| |%Shell|) |%Thing|)
                |OUTFORM;prefix;$L$;76|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%List| |%Shell|) |%Thing|)
                |OUTFORM;infix;$L$;77|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Thing| |%Shell|)
                    |%Thing|)
                |OUTFORM;infix;4$;78|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;postfix;3$;79|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;string;2$;80|)) 

(PUT '|OUTFORM;string;2$;80| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'STRING |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;quote;2$;81|)) 

(PUT '|OUTFORM;quote;2$;81| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'QUOTE |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;overbar;2$;82|)) 

(PUT '|OUTFORM;overbar;2$;82| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'OVERBAR |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;dot;2$;83|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;prime;2$;84|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| (|%IntegerSection| 0) |%Shell|)
                    |%Thing|)
                |OUTFORM;dot;$Nni$;85|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| (|%IntegerSection| 0) |%Shell|)
                    |%Thing|)
                |OUTFORM;prime;$Nni$;86|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;overlabel;3$;87|)) 

(PUT '|OUTFORM;overlabel;3$;87| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'OVERLABEL |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;box;2$;88|)) 

(PUT '|OUTFORM;box;2$;88| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'BOX |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;zag;3$;89|)) 

(PUT '|OUTFORM;zag;3$;89| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'ZAG |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;root;2$;90|)) 

(PUT '|OUTFORM;root;2$;90| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'ROOT |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;root;3$;91|)) 

(PUT '|OUTFORM;root;3$;91| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'ROOT |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;over;3$;92|)) 

(PUT '|OUTFORM;over;3$;92| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'OVER |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;slash;3$;93|)) 

(PUT '|OUTFORM;slash;3$;93| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SLASH |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;assign;3$;94|)) 

(PUT '|OUTFORM;assign;3$;94| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| '%LET |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;label;3$;95|)) 

(PUT '|OUTFORM;label;3$;95| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'EQUATNUM |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;rarrow;3$;96|)) 

(PUT '|OUTFORM;rarrow;3$;96| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'RARROW |a| |b|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| (|%IntegerSection| 0) |%Shell|)
                    |%Thing|)
                |OUTFORM;differentiate;$Nni$;97|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;sum;2$;98|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;sum;3$;99|)) 

(PUT '|OUTFORM;sum;3$;99| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'SIGMA |b| |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Thing| |%Shell|)
                    |%Thing|)
                |OUTFORM;sum;4$;100|)) 

(PUT '|OUTFORM;sum;4$;100| '|SPADreplace|
     '(XLAM (|a| |b| |c|) (|%list| 'SIGMA2 |b| |c| |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;prod;2$;101|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;prod;3$;102|)) 

(PUT '|OUTFORM;prod;3$;102| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'PI |b| |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Thing| |%Shell|)
                    |%Thing|)
                |OUTFORM;prod;4$;103|)) 

(PUT '|OUTFORM;prod;4$;103| '|SPADreplace|
     '(XLAM (|a| |b| |c|) (|%list| 'PI2 |b| |c| |a|))) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Shell|) |%Thing|)
                |OUTFORM;int;2$;104|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Shell|) |%Thing|)
                |OUTFORM;int;3$;105|)) 

(DECLAIM (FTYPE (FUNCTION (|%Thing| |%Thing| |%Thing| |%Shell|)
                    |%Thing|)
                |OUTFORM;int;4$;106|)) 

(PUT '|OUTFORM;int;4$;106| '|SPADreplace|
     '(XLAM (|a| |b| |c|) (|%list| 'INTSIGN |b| |c| |a|))) 

(PUT '|OUTFORM;postfix;3$;79| '|SPADreplace|
     '(XLAM (|a| |b|) (|%list| 'CONCAT |b| |a|))) 

(PUT '|OUTFORM;dot;2$;83| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'SUPERSUB |a| " " '|.|))) 

(PUT '|OUTFORM;prime;2$;84| '|SPADreplace|
     '(XLAM (|a|) (|%list| 'SUPERSUB |a| " " '|,|))) 

(DEFUN |OUTFORM;doubleFloatFormat;2S;1| (|s| $)
  (LET ((|ss| (SVREF $ 6)))
    (SEQ (SETF (|shellEntry| $ 6) |s|) (EXIT |ss|)))) 

(DEFUN |OUTFORM;sform| (|s| $) (DECLARE (IGNORE $)) |s|) 

(DEFUN |OUTFORM;eform| (|e| $) (DECLARE (IGNORE $)) |e|) 

(DEFUN |OUTFORM;iform| (|i| $) (DECLARE (IGNORE $)) |i|) 

(DEFUN |OUTFORM;bless| (|x| $) (DECLARE (IGNORE $)) |x|) 

(DEFUN |OUTFORM;print;$V;6| (|x| $)
  (DECLARE (IGNORE $))
  (|mathprint| |x|)) 

(DEFUN |OUTFORM;message;S$;7| (|s| $)
  (COND ((ZEROP (LENGTH |s|)) (|OUTFORM;empty;$;73| $)) (T |s|))) 

(DEFUN |OUTFORM;messagePrint;SV;8| (|s| $)
  (|mathprint| (|OUTFORM;message;S$;7| |s| $))) 

(DEFUN |OUTFORM;=;2$B;9| (|a| |b| $)
  (DECLARE (IGNORE $))
  (EQUAL |a| |b|)) 

(DEFUN |OUTFORM;=;3$;10| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '= |a| |b|)) 

(DEFUN |OUTFORM;coerce;2$;11| (|a| $) (DECLARE (IGNORE $)) |a|) 

(DEFUN |OUTFORM;outputForm;I$;12| (|n| $) (DECLARE (IGNORE $)) |n|) 

(DEFUN |OUTFORM;outputForm;S$;13| (|e| $) (DECLARE (IGNORE $)) |e|) 

(DEFUN |OUTFORM;outputForm;Df$;14| (|f| $)
  (DECLARE (IGNORE $))
  (DFLOAT-FORMAT-GENERAL |f|)) 

(DEFUN |OUTFORM;outputForm;S$;15| (|s| $)
  (SPADCALL (|spadConstant| $ 27)
            (SPADCALL |s| (|spadConstant| $ 27) (|shellEntry| $ 28))
            (|shellEntry| $ 29))) 

(DEFUN |OUTFORM;width;$I;16| (|a| $)
  (DECLARE (IGNORE $))
  (|outformWidth| |a|)) 

(DEFUN |OUTFORM;height;$I;17| (|a| $)
  (DECLARE (IGNORE $))
  (|height| |a|)) 

(DEFUN |OUTFORM;subHeight;$I;18| (|a| $)
  (DECLARE (IGNORE $))
  (|subspan| |a|)) 

(DEFUN |OUTFORM;superHeight;$I;19| (|a| $)
  (DECLARE (IGNORE $))
  (|superspan| |a|)) 

(DEFUN |OUTFORM;height;I;20| ($) (DECLARE (IGNORE $)) 20) 

(DEFUN |OUTFORM;width;I;21| ($) (DECLARE (IGNORE $)) 66) 

(DEFUN |OUTFORM;center;$I$;22| (|a| |w| $)
  (|OUTFORM;hconcat;3$;48|
      (|OUTFORM;hspace;I$;29| (TRUNCATE (- |w| (|outformWidth| |a|)) 2)
          $)
      |a| $)) 

(DEFUN |OUTFORM;left;$I$;23| (|a| |w| $)
  (|OUTFORM;hconcat;3$;48| |a|
      (|OUTFORM;hspace;I$;29| (- |w| (|outformWidth| |a|)) $) $)) 

(DEFUN |OUTFORM;right;$I$;24| (|a| |w| $)
  (|OUTFORM;hconcat;3$;48|
      (|OUTFORM;hspace;I$;29| (- |w| (|outformWidth| |a|)) $) |a| $)) 

(DEFUN |OUTFORM;center;2$;25| (|a| $)
  (|OUTFORM;center;$I$;22| |a| 66 $)) 

(DEFUN |OUTFORM;left;2$;26| (|a| $) (|OUTFORM;left;$I$;23| |a| 66 $)) 

(DEFUN |OUTFORM;right;2$;27| (|a| $)
  (|OUTFORM;right;$I$;24| |a| 66 $)) 

(DEFUN |OUTFORM;vspace;I$;28| (|n| $)
  (COND
    ((NOT (PLUSP |n|)) (|OUTFORM;empty;$;73| $))
    (T (|OUTFORM;vconcat;3$;50| " "
           (|OUTFORM;vspace;I$;28| (- |n| 1) $) $)))) 

(DEFUN |OUTFORM;hspace;I$;29| (|n| $)
  (COND
    ((NOT (PLUSP |n|)) (|OUTFORM;empty;$;73| $))
    (T (|fillerSpaces| |n|)))) 

(DEFUN |OUTFORM;rspace;2I$;30| (|n| |m| $)
  (COND
    ((OR (NOT (PLUSP |n|)) (NOT (PLUSP |m|))) (|OUTFORM;empty;$;73| $))
    (T (|OUTFORM;vconcat;3$;50| (|OUTFORM;hspace;I$;29| |n| $)
           (|OUTFORM;rspace;2I$;30| |n| (- |m| 1) $) $)))) 

(DEFUN |OUTFORM;matrix;L$;31| (|ll| $)
  (LET ((|lv| (LET ((#0=#:G1527 |ll|) (#1=#:G1526 NIL))
                (LOOP
                  (COND
                    ((ATOM #0#) (RETURN (NREVERSE #1#)))
                    (T (LET ((|l| (CAR #0#)))
                         (SETQ #1# (CONS (LIST2VEC |l|) #1#)))))
                  (SETQ #0# (CDR #0#))))))
    (CONS 'MATRIX (LIST2VEC |lv|)))) 

(DEFUN |OUTFORM;pile;L$;32| (|l| $)
  (DECLARE (IGNORE $))
  (CONS 'SC |l|)) 

(DEFUN |OUTFORM;commaSeparate;L$;33| (|l| $)
  (DECLARE (IGNORE $))
  (CONS 'AGGLST |l|)) 

(DEFUN |OUTFORM;semicolonSeparate;L$;34| (|l| $)
  (DECLARE (IGNORE $))
  (CONS 'AGGSET |l|)) 

(DEFUN |OUTFORM;blankSeparate;L$;35| (|l| $)
  (LET ((|c| 'CONCATB) (|l1| NIL))
    (SEQ (LET ((#0=#:G1528 (REVERSE |l|)))
           (LOOP
             (COND
               ((ATOM #0#) (RETURN NIL))
               (T (LET ((|u| (CAR #0#)))
                    (COND
                      ((EQCAR |u| |c|)
                       (SETQ |l1| (APPEND (CDR |u|) |l1|)))
                      (T (SETQ |l1| (CONS |u| |l1|)))))))
             (SETQ #0# (CDR #0#))))
         (EXIT (CONS |c| |l1|))))) 

(DEFUN |OUTFORM;brace;2$;36| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'BRACE |a|)) 

(DEFUN |OUTFORM;brace;L$;37| (|l| $)
  (|OUTFORM;brace;2$;36| (CONS 'AGGLST |l|) $)) 

(DEFUN |OUTFORM;bracket;2$;38| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'BRACKET |a|)) 

(DEFUN |OUTFORM;bracket;L$;39| (|l| $)
  (|OUTFORM;bracket;2$;38| (CONS 'AGGLST |l|) $)) 

(DEFUN |OUTFORM;paren;2$;40| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'PAREN |a|)) 

(DEFUN |OUTFORM;paren;L$;41| (|l| $)
  (|OUTFORM;paren;2$;40| (CONS 'AGGLST |l|) $)) 

(DEFUN |OUTFORM;sub;3$;42| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SUB |a| |b|)) 

(DEFUN |OUTFORM;super;3$;43| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SUPERSUB |a| " " |b|)) 

(DEFUN |OUTFORM;presub;3$;44| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SUPERSUB |a| " " " " " " |b|)) 

(DEFUN |OUTFORM;presuper;3$;45| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SUPERSUB |a| " " " " |b|)) 

(DEFUN |OUTFORM;scripts;$L$;46| (|a| |l| $)
  (COND
    ((NULL |l|) |a|)
    ((NULL (CDR |l|))
     (|OUTFORM;sub;3$;42| |a| (SPADCALL |l| (|shellEntry| $ 78)) $))
    (T (CONS 'SUPERSUB (CONS |a| |l|))))) 

(DEFUN |OUTFORM;supersub;$L$;47| (|a| |l| $)
  (SEQ (COND
         ((ODDP (LIST-LENGTH |l|))
          (SETQ |l| (APPEND |l| (LIST (|OUTFORM;empty;$;73| $))))))
       (EXIT (CONS 'ALTSUPERSUB (CONS |a| |l|))))) 

(DEFUN |OUTFORM;hconcat;3$;48| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'CONCAT |a| |b|)) 

(DEFUN |OUTFORM;hconcat;L$;49| (|l| $)
  (DECLARE (IGNORE $))
  (CONS 'CONCAT |l|)) 

(DEFUN |OUTFORM;vconcat;3$;50| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'VCONCAT |a| |b|)) 

(DEFUN |OUTFORM;vconcat;L$;51| (|l| $)
  (DECLARE (IGNORE $))
  (CONS 'VCONCAT |l|)) 

(DEFUN |OUTFORM;~=;3$;52| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '~= |a| |b|)) 

(DEFUN |OUTFORM;<;3$;53| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '< |a| |b|)) 

(DEFUN |OUTFORM;>;3$;54| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '> |a| |b|)) 

(DEFUN |OUTFORM;<=;3$;55| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '<= |a| |b|)) 

(DEFUN |OUTFORM;>=;3$;56| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '>= |a| |b|)) 

(DEFUN |OUTFORM;+;3$;57| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '+ |a| |b|)) 

(DEFUN |OUTFORM;-;3$;58| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '- |a| |b|)) 

(DEFUN |OUTFORM;-;2$;59| (|a| $) (DECLARE (IGNORE $)) (LIST '- |a|)) 

(DEFUN |OUTFORM;*;3$;60| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '* |a| |b|)) 

(DEFUN |OUTFORM;/;3$;61| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '/ |a| |b|)) 

(DEFUN |OUTFORM;**;3$;62| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '** |a| |b|)) 

(DEFUN |OUTFORM;div;3$;63| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '|div| |a| |b|)) 

(DEFUN |OUTFORM;rem;3$;64| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '|rem| |a| |b|)) 

(DEFUN |OUTFORM;quo;3$;65| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '|quo| |a| |b|)) 

(DEFUN |OUTFORM;exquo;3$;66| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '|exquo| |a| |b|)) 

(DEFUN |OUTFORM;and;3$;67| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '|and| |a| |b|)) 

(DEFUN |OUTFORM;or;3$;68| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '|or| |a| |b|)) 

(DEFUN |OUTFORM;not;2$;69| (|a| $)
  (DECLARE (IGNORE $))
  (LIST '|not| |a|)) 

(DEFUN |OUTFORM;SEGMENT;3$;70| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SEGMENT |a| |b|)) 

(DEFUN |OUTFORM;SEGMENT;2$;71| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'SEGMENT |a|)) 

(DEFUN |OUTFORM;binomial;3$;72| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'BINOMIAL |a| |b|)) 

(DEFUN |OUTFORM;empty;$;73| ($) '(NOTHING)) 

(DEFUN |OUTFORM;infix?;$B;74| (|a| $)
  (LET ((|e| (COND
               ((IDENTP |a|) |a|)
               ((STRINGP |a|) (INTERN |a|))
               (T (RETURN-FROM |OUTFORM;infix?;$B;74| NIL)))))
    (NOT (NULL (GET |e| 'INFIXOP))))) 

(DEFUN |OUTFORM;elt;$L$;75| (|a| |l| $)
  (DECLARE (IGNORE $))
  (CONS |a| |l|)) 

(DEFUN |OUTFORM;prefix;$L$;76| (|a| |l| $)
  (COND
    ((NOT (|OUTFORM;infix?;$B;74| |a| $)) (CONS |a| |l|))
    (T (|OUTFORM;hconcat;3$;48| |a|
           (|OUTFORM;paren;2$;40| (CONS 'AGGLST |l|) $) $)))) 

(DEFUN |OUTFORM;infix;$L$;77| (|a| |l| $)
  (COND
    ((NULL |l|) (|OUTFORM;empty;$;73| $))
    ((NULL (CDR |l|)) (SPADCALL |l| (|shellEntry| $ 78)))
    ((|OUTFORM;infix?;$B;74| |a| $) (CONS |a| |l|))
    (T (|OUTFORM;hconcat;L$;49|
           (LIST (SPADCALL |l| (|shellEntry| $ 78)) |a|
                 (|OUTFORM;infix;$L$;77| |a| (CDR |l|) $))
           $)))) 

(DEFUN |OUTFORM;infix;4$;78| (|a| |b| |c| $)
  (COND
    ((|OUTFORM;infix?;$B;74| |a| $) (LIST |a| |b| |c|))
    (T (|OUTFORM;hconcat;L$;49| (LIST |b| |a| |c|) $)))) 

(DEFUN |OUTFORM;postfix;3$;79| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'CONCAT |b| |a|)) 

(DEFUN |OUTFORM;string;2$;80| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'STRING |a|)) 

(DEFUN |OUTFORM;quote;2$;81| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'QUOTE |a|)) 

(DEFUN |OUTFORM;overbar;2$;82| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'OVERBAR |a|)) 

(DEFUN |OUTFORM;dot;2$;83| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'SUPERSUB |a| " " '|.|)) 

(DEFUN |OUTFORM;prime;2$;84| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'SUPERSUB |a| " " '|,|)) 

(DEFUN |OUTFORM;dot;$Nni$;85| (|a| |nn| $)
  (LET ((|s| (MAKE-FULL-CVEC |nn| (SPADCALL "." (|shellEntry| $ 119)))))
    (LIST 'SUPERSUB |a| " " |s|))) 

(DEFUN |OUTFORM;prime;$Nni$;86| (|a| |nn| $)
  (LET ((|s| (MAKE-FULL-CVEC |nn| (SPADCALL "," (|shellEntry| $ 119)))))
    (LIST 'SUPERSUB |a| " " |s|))) 

(DEFUN |OUTFORM;overlabel;3$;87| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'OVERLABEL |a| |b|)) 

(DEFUN |OUTFORM;box;2$;88| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'BOX |a|)) 

(DEFUN |OUTFORM;zag;3$;89| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'ZAG |a| |b|)) 

(DEFUN |OUTFORM;root;2$;90| (|a| $)
  (DECLARE (IGNORE $))
  (LIST 'ROOT |a|)) 

(DEFUN |OUTFORM;root;3$;91| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'ROOT |a| |b|)) 

(DEFUN |OUTFORM;over;3$;92| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'OVER |a| |b|)) 

(DEFUN |OUTFORM;slash;3$;93| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SLASH |a| |b|)) 

(DEFUN |OUTFORM;assign;3$;94| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST '%LET |a| |b|)) 

(DEFUN |OUTFORM;label;3$;95| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'EQUATNUM |a| |b|)) 

(DEFUN |OUTFORM;rarrow;3$;96| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'RARROW |a| |b|)) 

(DEFUN |OUTFORM;differentiate;$Nni$;97| (|a| |nn| $)
  (COND
    ((ZEROP |nn|) |a|)
    ((< |nn| 4) (|OUTFORM;prime;$Nni$;86| |a| |nn| $))
    (T (LET* ((|r| (SPADCALL
                       (|check-subtype| (PLUSP |nn|)
                           '(|PositiveInteger|) |nn|)
                       (|shellEntry| $ 137)))
              (|s| (SPADCALL |r| (|shellEntry| $ 138))))
         (|OUTFORM;super;3$;43| |a| (LIST 'PAREN |s|) $))))) 

(DEFUN |OUTFORM;sum;2$;98| (|a| $)
  (LIST 'SIGMA (|OUTFORM;empty;$;73| $) |a|)) 

(DEFUN |OUTFORM;sum;3$;99| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'SIGMA |b| |a|)) 

(DEFUN |OUTFORM;sum;4$;100| (|a| |b| |c| $)
  (DECLARE (IGNORE $))
  (LIST 'SIGMA2 |b| |c| |a|)) 

(DEFUN |OUTFORM;prod;2$;101| (|a| $)
  (LIST 'PI (|OUTFORM;empty;$;73| $) |a|)) 

(DEFUN |OUTFORM;prod;3$;102| (|a| |b| $)
  (DECLARE (IGNORE $))
  (LIST 'PI |b| |a|)) 

(DEFUN |OUTFORM;prod;4$;103| (|a| |b| |c| $)
  (DECLARE (IGNORE $))
  (LIST 'PI2 |b| |c| |a|)) 

(DEFUN |OUTFORM;int;2$;104| (|a| $)
  (LIST 'INTSIGN (|OUTFORM;empty;$;73| $) (|OUTFORM;empty;$;73| $) |a|)) 

(DEFUN |OUTFORM;int;3$;105| (|a| |b| $)
  (LIST 'INTSIGN |b| (|OUTFORM;empty;$;73| $) |a|)) 

(DEFUN |OUTFORM;int;4$;106| (|a| |b| |c| $)
  (DECLARE (IGNORE $))
  (LIST 'INTSIGN |b| |c| |a|)) 

(DEFUN |OutputForm| ()
  (DECLARE (SPECIAL |$ConstructorCache|))
  (LET ((#0=#:G1530 (HGET |$ConstructorCache| '|OutputForm|)))
    (COND
      (#0# (|CDRwithIncrement| (CDAR #0#)))
      (T (UNWIND-PROTECT
           (PROG1 (CDDAR (HPUT |$ConstructorCache| '|OutputForm|
                               (LIST (CONS NIL
                                      (CONS 1 (|OutputForm;|))))))
             (SETQ #0# T))
           (COND ((NOT #0#) (HREM |$ConstructorCache| '|OutputForm|)))))))) 

(DEFUN |OutputForm;| ()
  (DECLARE (SPECIAL |$ConstructorCache|))
  (LET ((|dv$| '(|OutputForm|)) ($ (|newShell| 150))
        (|pv$| (|buildPredVector| 0 0 NIL)))
    (SETF (|shellEntry| $ 0) |dv$|)
    (SETF (|shellEntry| $ 3) |pv$|)
    (|haddProp| |$ConstructorCache| '|OutputForm| NIL (CONS 1 $))
    (|stuffDomainSlots| $)
    (SETF (|shellEntry| $ 6) "~G")
    $)) 

(MAKEPROP '|OutputForm| '|infovec|
    (LIST '#(NIL NIL NIL NIL NIL NIL '|format| (|String|)
             |OUTFORM;doubleFloatFormat;2S;1| (|Void|)
             |OUTFORM;print;$V;6| (|Boolean|) (0 . |empty?|)
             |OUTFORM;empty;$;73| |OUTFORM;message;S$;7|
             |OUTFORM;messagePrint;SV;8| |OUTFORM;=;2$B;9|
             |OUTFORM;=;3$;10| (|OutputForm|) |OUTFORM;coerce;2$;11|
             (|Integer|) |OUTFORM;outputForm;I$;12| (|Symbol|)
             |OUTFORM;outputForm;S$;13| (|DoubleFloat|)
             |OUTFORM;outputForm;Df$;14| (|Character|) (5 . |quote|)
             (9 . |concat|) (15 . |concat|) |OUTFORM;outputForm;S$;15|
             |OUTFORM;width;$I;16| |OUTFORM;height;$I;17|
             |OUTFORM;subHeight;$I;18| |OUTFORM;superHeight;$I;19|
             |OUTFORM;height;I;20| |OUTFORM;width;I;21| (21 . -)
             (27 . |quo|) |OUTFORM;hspace;I$;29|
             |OUTFORM;hconcat;3$;48| |OUTFORM;center;$I$;22|
             |OUTFORM;left;$I$;23| |OUTFORM;right;$I$;24|
             |OUTFORM;center;2$;25| |OUTFORM;left;2$;26|
             |OUTFORM;right;2$;27| (|NonNegativeInteger|) (33 . |Zero|)
             (37 . |Zero|) (41 . <=) (47 . |One|) (51 . |One|)
             |OUTFORM;vspace;I$;28| |OUTFORM;vconcat;3$;50|
             |OUTFORM;rspace;2I$;30| (|List| $) (|List| 56)
             |OUTFORM;matrix;L$;31| |OUTFORM;pile;L$;32|
             |OUTFORM;commaSeparate;L$;33|
             |OUTFORM;semicolonSeparate;L$;34| (|List| $$)
             (55 . |reverse|) (60 . |append|)
             |OUTFORM;blankSeparate;L$;35| |OUTFORM;brace;2$;36|
             |OUTFORM;brace;L$;37| |OUTFORM;bracket;2$;38|
             |OUTFORM;bracket;L$;39| |OUTFORM;paren;2$;40|
             |OUTFORM;paren;L$;41| |OUTFORM;sub;3$;42|
             |OUTFORM;super;3$;43| |OUTFORM;presub;3$;44|
             |OUTFORM;presuper;3$;45| (66 . |null|) (71 . |rest|)
             (76 . |first|) |OUTFORM;scripts;$L$;46| (81 . |#|)
             (86 . |odd?|) |OUTFORM;supersub;$L$;47|
             |OUTFORM;hconcat;L$;49| |OUTFORM;vconcat;L$;51|
             |OUTFORM;~=;3$;52| |OUTFORM;<;3$;53| |OUTFORM;>;3$;54|
             |OUTFORM;<=;3$;55| |OUTFORM;>=;3$;56| |OUTFORM;+;3$;57|
             |OUTFORM;-;3$;58| |OUTFORM;-;2$;59| |OUTFORM;*;3$;60|
             |OUTFORM;/;3$;61| |OUTFORM;**;3$;62| |OUTFORM;div;3$;63|
             |OUTFORM;rem;3$;64| |OUTFORM;quo;3$;65|
             |OUTFORM;exquo;3$;66| |OUTFORM;and;3$;67|
             |OUTFORM;or;3$;68| |OUTFORM;not;2$;69|
             |OUTFORM;SEGMENT;3$;70| |OUTFORM;SEGMENT;2$;71|
             |OUTFORM;binomial;3$;72| (91 . |false|) (95 . |not|)
             |OUTFORM;infix?;$B;74| |OUTFORM;elt;$L$;75|
             |OUTFORM;prefix;$L$;76| |OUTFORM;infix;$L$;77|
             |OUTFORM;infix;4$;78| |OUTFORM;postfix;3$;79|
             |OUTFORM;string;2$;80| |OUTFORM;quote;2$;81|
             |OUTFORM;overbar;2$;82| |OUTFORM;dot;2$;83|
             |OUTFORM;prime;2$;84| (100 . |char|) (105 . |new|)
             |OUTFORM;dot;$Nni$;85| |OUTFORM;prime;$Nni$;86|
             |OUTFORM;overlabel;3$;87| |OUTFORM;box;2$;88|
             |OUTFORM;zag;3$;89| |OUTFORM;root;2$;90|
             |OUTFORM;root;3$;91| |OUTFORM;over;3$;92|
             |OUTFORM;slash;3$;93| |OUTFORM;assign;3$;94|
             |OUTFORM;label;3$;95| |OUTFORM;rarrow;3$;96|
             (111 . |zero?|) (116 . <) (|PositiveInteger|)
             (|NumberFormats|) (122 . |FormatRoman|)
             (127 . |lowerCase|) |OUTFORM;differentiate;$Nni$;97|
             |OUTFORM;sum;2$;98| |OUTFORM;sum;3$;99|
             |OUTFORM;sum;4$;100| |OUTFORM;prod;2$;101|
             |OUTFORM;prod;3$;102| |OUTFORM;prod;4$;103|
             |OUTFORM;int;2$;104| |OUTFORM;int;3$;105|
             |OUTFORM;int;4$;106| (|SingleInteger|))
          '#(~= 132 |zag| 144 |width| 150 |vspace| 159 |vconcat| 164
             |supersub| 175 |superHeight| 181 |super| 186 |sum| 192
             |subHeight| 210 |sub| 215 |string| 221 |slash| 226
             |semicolonSeparate| 232 |scripts| 237 |rspace| 243 |root|
             249 |right| 260 |rem| 271 |rarrow| 277 |quote| 283 |quo|
             288 |prod| 294 |print| 312 |prime| 317 |presuper| 328
             |presub| 334 |prefix| 340 |postfix| 346 |pile| 352 |paren|
             357 |overlabel| 367 |overbar| 373 |over| 378 |outputForm|
             384 |or| 404 |not| 410 |messagePrint| 415 |message| 420
             |matrix| 425 |left| 430 |latex| 441 |label| 446 |int| 452
             |infix?| 470 |infix| 475 |hspace| 488 |height| 493
             |hconcat| 502 |hash| 513 |exquo| 518 |empty| 524 |elt| 528
             |doubleFloatFormat| 534 |dot| 539 |div| 550
             |differentiate| 556 |commaSeparate| 562 |coerce| 567
             |center| 572 |bracket| 583 |brace| 593 |box| 603
             |blankSeparate| 608 |binomial| 613 |before?| 619 |assign|
             625 |and| 631 SEGMENT 637 >= 648 > 654 = 660 <= 672 < 678
             / 684 - 690 + 701 ** 707 * 713)
          'NIL
          (CONS (|makeByteWordVec2| 1 '(0 0 0 0))
                (CONS '#(|SetCategory&| |BasicType&| NIL NIL)
                      (CONS '#((|SetCategory|) (|BasicType|) (|Type|)
                               (|CoercibleTo| 18))
                            (|makeByteWordVec2| 149
                                '(1 7 11 0 12 0 26 0 27 2 7 0 0 26 28 2
                                  7 0 26 0 29 2 20 0 0 0 37 2 20 0 0 0
                                  38 0 47 0 48 0 20 0 49 2 20 11 0 0 50
                                  0 47 0 51 0 20 0 52 1 62 0 0 63 2 62
                                  0 0 0 64 1 62 11 0 76 1 62 0 0 77 1
                                  62 2 0 78 1 62 47 0 80 1 20 11 0 81 0
                                  11 0 106 1 11 0 0 107 1 26 0 7 119 2
                                  7 0 47 26 120 1 47 11 0 133 2 47 11 0
                                  0 134 1 136 7 135 137 1 7 0 0 138 2 0
                                  0 0 0 85 2 0 11 0 0 1 2 0 0 0 0 125 0
                                  0 20 36 1 0 20 0 31 1 0 0 20 53 1 0 0
                                  56 84 2 0 0 0 0 54 2 0 0 0 56 82 1 0
                                  20 0 34 2 0 0 0 0 73 2 0 0 0 0 141 3
                                  0 0 0 0 0 142 1 0 0 0 140 1 0 20 0 33
                                  2 0 0 0 0 72 1 0 0 0 114 2 0 0 0 0
                                  129 1 0 0 56 61 2 0 0 0 56 79 2 0 0
                                  20 20 55 2 0 0 0 0 127 1 0 0 0 126 1
                                  0 0 0 46 2 0 0 0 20 43 2 0 0 0 0 97 2
                                  0 0 0 0 132 1 0 0 0 115 2 0 0 0 0 98
                                  3 0 0 0 0 0 145 1 0 0 0 143 2 0 0 0 0
                                  144 1 0 9 0 10 1 0 0 0 118 2 0 0 0 47
                                  122 2 0 0 0 0 75 2 0 0 0 0 74 2 0 0 0
                                  56 110 2 0 0 0 0 113 1 0 0 56 59 1 0
                                  0 56 71 1 0 0 0 70 2 0 0 0 0 123 1 0
                                  0 0 116 2 0 0 0 0 128 1 0 0 7 30 1 0
                                  0 24 25 1 0 0 20 21 1 0 0 22 23 2 0 0
                                  0 0 101 1 0 0 0 102 1 0 9 7 15 1 0 0
                                  7 14 1 0 0 57 58 1 0 0 0 45 2 0 0 0
                                  20 42 1 0 7 0 1 2 0 0 0 0 131 3 0 0 0
                                  0 0 148 2 0 0 0 0 147 1 0 0 0 146 1 0
                                  11 0 108 3 0 0 0 0 0 112 2 0 0 0 56
                                  111 1 0 0 20 39 0 0 20 35 1 0 20 0 32
                                  1 0 0 56 83 2 0 0 0 0 40 1 0 149 0 1
                                  2 0 0 0 0 99 0 0 0 13 2 0 0 0 56 109
                                  1 0 7 7 8 1 0 0 0 117 2 0 0 0 47 121
                                  2 0 0 0 0 96 2 0 0 0 47 139 1 0 0 56
                                  60 1 0 18 0 19 1 0 0 0 44 2 0 0 0 20
                                  41 1 0 0 0 68 1 0 0 56 69 1 0 0 56 67
                                  1 0 0 0 66 1 0 0 0 124 1 0 0 56 65 2
                                  0 0 0 0 105 2 0 11 0 0 1 2 0 0 0 0
                                  130 2 0 0 0 0 100 1 0 0 0 104 2 0 0 0
                                  0 103 2 0 0 0 0 89 2 0 0 0 0 87 2 0 0
                                  0 0 17 2 0 11 0 0 16 2 0 0 0 0 88 2 0
                                  0 0 0 86 2 0 0 0 0 94 1 0 0 0 92 2 0
                                  0 0 0 91 2 0 0 0 0 90 2 0 0 0 0 95 2
                                  0 0 0 0 93)))))
          '|lookupComplete|)) 

(MAKEPROP '|OutputForm| 'NILADIC T)