Loading image file :/usr/local/lang/psl/bin/Linux_elf/pslcomp.img 
Portable Standard Lisp Compiler
Usage: PSLCOMP source-file ...
PSL 3.4 Compiler, 10-Nov-19
1 lisp> ""
2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > 2 > (t)
3 > 3 > 3 > 3 > 3 > 3 > 3 > 3 > 3 > 3 > 3 > 3 > 3 > (t)
4 > 4 > 4 > 4 > 4 > 4 > 4 > 4 > 4 > 4 > 4 > 4 > 4 > (t)
5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > 5 > *** numeric-ops already loaded
(t)
6 > 6 > 6 > 6 > 6 > ("$bmexe/" "" "$pl/" "$pll/")
7 > 7 > 7 > ("$bmload/" "$bmexe/" "" "$pl/" "$pll/")
8 > 8 > 8 > *** loading $bmload/slext.b
*** loading $pl/pp.b
*** useful already loaded
*** loading $pl/fast-int.b
*** numeric-ops already loaded
*** fast-int loaded
*** Function `prettyprint' has been redefined
*** Function `pp' has been redefined
*** pp loaded
*** Function `sprint' has been redefined
*** slext loaded
nil
9 > 9 > 9 > nil
10 > ""
11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > 11 > nil
12 > nil
13 > *** Garbage collection starting 
*** GC 1 22-Aug-2007 13:34:19, 0 ms (0%), 80133 occupied, 2044860 free
nil
14 > 14 > 14 > 14 > 14 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
t
15 *DEFN > 15 *DEFN > s!E!Tw!I!T!Hl!I!S!T!S&h!E!L!P setmoduleobject settwomodulesobject 
setfactalgobject setringobject getobjecttype setobjecttype moduleobject 
autoaddrelationstate autoaddrelations noautoaddrelations maybeautoaddrelations 
cancelautoaddrelationssettings setautoaddrelationsstate setlowtermshandling 
getlowtermshandling setquicklowtermshandling setsafelowtermshandling 
setnoresolution setresolutiontype getresolutiontype setringtype getringtype 
commify noncommify elimorder invelimorder invwelimorder homogelimorder 
degleftlexify deglexify purelexify degrevlexify revlexify matrixify getorder 
getcommorder setcommorder getnoncommorder setnoncommorder clearweights 
setweights getweights getweightdps printweights setoddprimesmoduli 
getoddprimesmoduli setordoddcoeff setmodlogoddcoeff setstrategy setprocess 
getprocess setdegreewise setitemwise stabilise destabilise getstability 
setstability densecontents sparsecontents setmindeg getmindeg setmaxdeg 
getmaxdeg getcasesensalgin setcasesensalgin exptsprintmode noexptsprintmode 
getimmediateassocringpbdisplay setimmediateassocringpbdisplay getoverwrite 
setoverwrite getcheckfailuredisplay setcheckfailuredisplay getdegreeprintoutput 
setdegreeprintoutput getitemprintoutput setitemprintoutput getmodeclashlist 
m!O!D!Ep!A!T!H m!O!D!Es!E!T!T!I!N!Gp findmodeclashes findmodeclashes1 
findmodeclashes2 oldecm e!X!T!R!A!C!Tc!U!R!R!E!N!Tm!O!D!E!S e!X!T!R!A!C!Tm!O!D!E 
e!X!T!R!A!C!Ts!O!M!Em!O!D!E!S getsetup printsetup l!I!S!Ts!W!I!T!C!H s!W!I!T!C!Hl!I!S!T 
r!E!S!T!O!R!Em!O!D!E r!E!S!T!O!R!Eo!B!J!E!C!Tt!Y!P!E r!E!S!T!O!R!Er!E!S!O!L!U!T!I!O!Nt!Y!P!E 
r!E!S!T!O!R!Ev!A!R!I!A!B!L!Em!O!D!E!S r!E!S!T!O!R!Es!T!R!A!T!E!G!Ym!O!D!E!S 
r!E!S!T!O!R!Ec!O!E!F!Fd!O!M!A!I!N r!E!S!T!O!R!Eo!U!T!P!U!Tf!O!R!M!A!T 
r!E!S!T!O!R!Ep!R!I!N!Tt!I!M!E!S setsetup getcustdisplay setcustdisplay 
getcuststrategy setcuststrategy getdynamiclogtables setdynamiclogtables 
getimmediatecrit setimmediatecrit getimmediatefullreduction 
setimmediatefullreduction getimmediaterecdefine setimmediaterecdefine 
getnobignum setnobignum getobsoletenamesinform setobsoletenamesinform 
getpbsermode setpbsermode getreductivity setreductivity getsavedegree 
setsavedegree getsaverecvalues setsaverecvalues getactivetracebreaks 
setactivetracebreaks checksetup g!E!Tr!I!N!Gm!O!D!E!S r!E!S!T!O!R!Er!I!N!Gm!O!D!E!S 
pushring popring switchring ringstacklength16 *DEFN > !S!T!A!B!L!E!D!E!Ggroebnerkernel !S!T!A!B!L!E!I!T!E!Mgroebnerkernel 
!I!N!S!T!A!B!L!E!I!T!E!Mgroebnerkernel !S!T!A!B!L!Egroebnerinit 
!I!N!S!T!A!B!L!E!I!T!E!Mgroebnerinit groebnerfinish m!A!I!Ns!T!R!A!T!E!G!Yi!N!I!T 
f!I!Xm!A!I!Ns!T!R!A!Ti!N!I!T s!E!R!I!E!Si!N!I!T d!I!S!P!L!A!Yi!N!I!T f!I!N!Dn!E!W!Cd!E!G 
f!I!N!De!X!T!R!Ang!B!E !D!E!Gf!I!N!Di!N!P!U!Tng!B!E !I!T!E!Mf!I!N!Di!N!P!U!Tng!B!E 
!D!E!Gf!I!N!Dsp2!R !I!T!E!Mf!I!N!Dsp2!R f!I!N!Dc!R!I!Tp!A!I!Rng!B!E f!I!Xg!B!E 
de!Nsp!A!I!R!S !I!T!E!M!Nsp!A!I!R!S f!I!Xe!N!Dd!E!G!R!E!Et!H!I!N!G!S 
!C!O!M!Msp!O!Lp!R!E!P sp!O!L!A!U!T!Op!R!E!P !I!N!S!T!A!B!L!Esp!O!L!A!U!T!Op!R!E!P 
!N!O!N!C!O!M!Msp!O!Lp!R!E!P sp!O!Lp!R!E!P1 !I!N!S!T!A!B!L!Esp!O!Lp!R!E!P1 
!B!M!M!A!I!N!S!T!A!B!L!Es!T!O!R!Espd!A!T!A !B!M!M!A!I!N!I!N!S!T!A!B!L!Es!T!O!R!Espd!A!T!A 
!D!E!Gsp!O!Lp!R!E!Pi!N!S!E!R!T !I!T!E!Msp!O!Lp!R!E!Pi!N!S!E!R!T 
!S!T!A!B!L!Esp!O!Lp!R!E!Pi!N!S!E!R!To!Rp!R!O!L!O!N!G 
!I!N!S!T!A!B!L!Esp!O!Lp!R!E!Pi!N!S!E!R!To!Rp!R!O!L!O!N!G !D!E!Gelimpairs 
!I!T!E!Melimpairs !D!E!Gelimnewpair !I!T!E!Melimnewpair m!A!I!Nd!E!G!R!E!E!W!I!S!E 
m!A!I!Ni!T!E!M!W!I!S!E m!A!I!Ns!T!A!B!I!L!I!S!E m!A!I!Nd!E!S!T!A!B!I!L!I!S!E17 *DEFN > setinvars setoutvars setiovars clearvars getinvars getinvarno getoutvars 
getiovars lispforminput addlispforminput lisppols2input addlisppols2input 
d!E!Gs!O!R!T!Lp!O!L i!T!E!Ms!O!R!T!Lp!O!L lisppol2redand redand2lisppol 
redor2lisppol qpol2lisppol p!O!I!N!T!E!Ro!U!T p!O!I!N!T!E!Rp!R!I!N!T 
output2lisppols bigoutput checkoutfile degreeoutprepare degreeoutput 
enddegreeoutput redandalgout redoralgout qpolalgout printratcf 
printqpolratfactor a!L!Gp!U!R!Em!O!Np!R!I!N!T a!L!Gpm!O!Np!R!I!N!T 
a!L!Gr!E!D!A!N!Dt!E!R!Mp!R!I!N!T a!L!Gf!I!R!S!Tr!E!D!A!N!Dt!E!R!Mp!R!I!N!T 
a!L!Gr!E!D!O!Rt!E!R!Mp!R!I!N!T a!L!Gf!I!R!S!Tr!E!D!O!Rt!E!R!Mp!R!I!N!T monprint 
!S!A!F!Ea!L!Gpm!O!Np!R!I!N!T !I!Oq!U!I!C!Kl!O!Wt!M!S !I!Os!A!F!El!O!Wt!M!S 
setalgoutmode getalgoutmode addalgoutmode a!L!Go!U!Tm!O!D!Es!W!I!T!C!H 
c!H!A!R0a!L!Gf!I!R!S!Tr!E!D!O!Rt!E!R!Mp!R!I!N!T c!H!A!R0a!L!Gr!E!D!O!Rt!E!R!Mp!R!I!N!T 
polintern polalgout redand2lispform redor2lispform puremonprint mapleinput18 *DEFN > getmonaugprop remmonprop lput lget lput-lget !C!O!M!Mmonintern !C!O!M!M!N!Im!O!Ni!N!T!E!R!N 
m!O!Ni!N!S!E!R!T !C!O!M!M!S!T!A!B!L!Emonlessp !C!O!M!Mmonfactorp !C!O!M!Mm!O!Nt!I!M!E!S 
!C!O!M!M!N!Im!O!Nq!U!O!T!I!E!N!T !C!O!M!Mp!R!E!C!I!S!E!N!Im!O!Nq!U!O!T!I!E!N!T 
r!E!Vl!E!X!N!O!M!X!Mlc!O!Rout r!E!Vl!E!X!M!X!Mlc!O!Rout plusnoeval 
!C!O!M!Mm!O!N!O!M!I!A!Li!N!I!T !C!O!M!Mgetvarno getembdim !C!O!M!Mm!O!Ns!I!G!N!I!Fv!A!R 
!C!O!M!Mm!O!Nl!E!A!S!Ts!I!G!N!I!Fv!A!R !C!O!M!Mr!E!S!To!Fm!O!N setvarno 
clearvarno initvarno !C!O!M!M!C!O!L!L!E!X!Pm!O!Na!L!Go!U!T!P!R!E!P 
!C!O!M!M!S!P!R!E!A!Dm!O!Na!L!Go!U!T!P!R!E!P c!O!M!Mc!O!L!L!E!C!Te!X!P!T!S 
c!O!M!Mp!R!I!N!Tn!Oe!X!P!T!S l!E!Xmonlessp !O!R!D!N!O!M!X!Mlc!O!Rout 
!O!R!D!M!X!Mlc!O!Rout g!E!To!R!Dm!A!T!R!I!X getordermatrix setordermatrix 
matrixwiselessp m!A!T!R!I!Xmonlessp !I!N!S!T!A!B!L!Ed!E!Gmonlessp 
!A!L!T!W!E!I!G!H!T!S!C!O!M!Mtotaldegree c!O!M!Mo!R!Dw!E!I!G!H!T!S c!O!M!Ma!L!Tw!E!I!G!H!T!S 
m!O!Nc!O!M!M!I!F!Y m!O!Nm!A!Xd!E!G m!O!Nn!Om!A!Xd!E!G19 *DEFN > !N!O!N!C!O!M!Mmonintern !N!O!N!C!O!M!Mm!O!Ni!N!T!E!R!N1 !N!O!N!C!O!M!Mh!O!Me!L!I!Mmonlessp 
!N!O!N!C!O!M!Mi!N!Ve!L!I!Ml!E!F!Tl!E!Xmonlessp !N!O!N!C!O!M!Mi!N!Vwe!L!I!Ml!E!F!Tl!E!Xmonlessp 
!O!R!D!E!R!E!D!N!O!N!C!O!M!Mi!N!Vwe!L!I!Ml!E!F!Tl!E!Xmonlessp 
!N!O!N!C!O!M!Me!L!I!Ml!E!F!Tl!E!Xmonlessp !N!O!N!C!O!M!Ml!E!Xmonlessp 
!N!O!N!C!O!M!Mallmonquotients !N!O!N!C!O!M!Mmonfactorp !N!O!N!C!O!M!Ml!E!F!Tm!O!Nf!A!C!T!O!Rp 
!N!O!N!C!O!M!Mi!Nm!O!Nf!A!C!T!O!Rp e!A!R!L!Ym!O!Nf!A!C!T!O!Rp 
!N!O!N!C!O!M!Ml!I!S!Tm!O!Nf!A!C!T!O!Rp !N!O!N!C!O!M!Mm!O!Nt!I!M!E!S 
!N!O!N!C!O!M!Mm!O!Np!A!R!Tt!I!M!E!S !N!O!N!C!O!M!Mm!O!Nt!I!M!E!S2 
!N!O!N!C!O!M!Mmontimes2 !N!O!N!C!O!M!Mm!O!Nt!I!M!E!S3 !N!O!N!C!O!M!M!N!Im!O!Nq!U!O!T!I!E!N!T 
!N!O!N!C!O!M!M!N!Im!O!Nq!U!O!T!I!E!N!T1 lc!A!U!T!O !M!X!M!O!R!D!W!E!I!G!H!T!Slc!A!U!T!O 
lc2 !M!X!M!O!R!D!W!E!I!G!H!T!Slc2 ncpuremonlength ncaugmonlength 
!N!O!N!C!O!M!Mm!O!N!O!M!I!A!Li!N!I!T !N!O!N!C!O!M!Mgetvarno 
!N!O!N!C!O!M!Mm!O!Nl!E!A!S!Ts!I!G!N!I!Fv!A!R !N!O!N!C!O!M!Mr!E!S!To!Fm!O!N 
!N!O!N!C!O!M!Mmonlispout !N!O!N!C!O!M!M!S!P!R!E!A!Dm!O!Na!L!Go!U!T!P!R!E!P 
!N!O!N!C!O!M!M!C!O!L!L!E!X!Pm!O!Na!L!Go!U!T!P!R!E!P !A!L!T!W!E!I!G!H!T!Se!A!R!L!Ym!O!Nf!A!C!T!O!Rp 
!M!X!M!A!L!T!W!E!I!G!H!T!Slc!A!U!T!O !M!X!M!A!L!T!W!E!I!G!H!T!Slc2 
!A!L!T!W!E!I!G!H!T!S!N!O!N!C!O!M!Mtotaldegree !S!A!F!E!N!O!N!C!O!M!Mmonintern 
!S!A!F!E!N!O!N!C!O!M!Mmonfactorp !S!A!F!E!N!O!N!C!O!M!Mallmonquotients 
!S!A!F!E!N!O!N!C!O!M!Mm!O!Nt!I!M!E!S !S!A!F!Elc2 !S!A!F!E!N!O!N!C!O!M!Mmonlispout 
!S!A!F!E!N!O!N!C!O!M!M!S!P!R!E!A!Dm!O!Na!L!Go!U!T!P!R!E!P 
!S!A!F!E!N!O!N!C!O!M!M!C!O!L!L!E!X!Pm!O!Na!L!Go!U!T!P!R!E!P n!O!Nc!O!M!Mo!R!Dw!E!I!G!H!T!S 
n!O!Nc!O!M!Ma!L!Tw!E!I!G!H!T!S n!O!Nc!O!M!Mc!O!L!L!E!C!Te!X!P!T!S 
n!O!Nc!O!M!Mp!R!I!N!Tn!Oe!X!P!T!S !N!O!N!C!O!M!Ms!A!F!El!O!Wt!M!S 
!N!O!N!C!O!M!Mq!U!I!C!Kl!O!Wt!M!S m!O!Nn!O!Nc!O!M!M!I!F!Y20 *DEFN > g!B!El!M? !N!O!N!C!O!M!Mi!N!T!E!R!Ni!Fl!E!F!Tn!O!R!M!A!L setlmodnormalmonstarts 
setlmodnormalmonends !N!O!N!C!O!M!M!O!R!D!W!E!I!G!H!T!Sn!O!R!M!A!Lw!O!R!D!S 
xsetproduct internpair21 *DEFN > m!O!Nr!E!C!L!A!I!M !C!O!M!Ma!W!A!Yp !N!O!N!C!O!M!Ma!W!A!Yp r!E!C!L!A!I!Mi!N!I!T 
!C!O!M!Mi!N!I!Tr!E!C!L!A!I!Ml!I!S!T !N!O!N!C!O!M!Mi!N!I!Tr!E!C!L!A!I!Ml!I!S!T 
!C!O!M!Mu!Pd!A!T!Er!E!C!L!A!I!Ml!I!S!T !N!O!N!C!O!M!Mu!Pd!A!T!Er!E!C!L!A!I!Ml!I!S!T 
!C!O!M!Ma!M!P!U!T!Em!O!N!S !N!O!N!C!O!M!Ma!M!P!U!T!Em!O!N!S r!E!C!L!A!I!Mc!O!M!M!I!F!Y 
r!E!C!L!A!I!Mn!O!Nc!O!M!M!I!F!Y22 *DEFN > o!R!D!I!N!A!R!Yc!O!N!Cp!O!Lm!O!Nm!U!L!T s!U!B!T!R!A!C!Tr!E!D!O!R t!E!R!Mi!N!S!E!R!T 
redandmonmult qpolmonmult redand2qpol readpol writepol reducepol printqpols 
hreducepol afterrabbit readtonormalform23 *DEFN > !S!T!A!B!L!Er!E!D!U!C!Ep!O!L !I!N!S!T!A!B!L!Er!E!D!U!C!Ep!O!L !S!T!A!B!L!Enormalform 
!I!N!S!T!A!B!L!Enormalform !S!T!A!B!L!Em!A!Y!B!Er!E!D!U!C!Er!E!D!O!R 
!I!N!S!T!A!B!L!Em!A!Y!B!Er!E!D!U!C!Er!E!D!O!R f!O!R!Msp!O!L !D!E!Gf!I!N!Dg!R!O!E!Bf 
!I!T!E!Mf!I!N!Dg!R!O!E!Bf
*** Garbage collection starting 
*** GC 2 22-Aug-2007 13:34:19, 0 ms (0%), 109959 occupied, 2015031 free
m!A!Y!B!Ef!I!N!Dg!R!O!E!Bf r!E!D!U!C!Td!E!G!R!E!E!W!I!S!E r!E!D!U!C!Ti!T!E!M!W!I!S!E 
r!E!D!U!C!Ts!T!A!B!I!L!I!S!E r!E!D!U!C!Td!E!S!T!A!B!I!L!I!S!E24 *DEFN > *** Init code length is 607
**fasl**initcode**25 > *** Garbage collection starting 
*** GC 3 22-Aug-2007 13:34:19, 0 ms (0%), 146771 occupied, 1978219 free
nil
26 > 26 > 26 > 26 > 26 > 26 > 26 > 26 > 26 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
t
27 *DEFN > bigarithp d!O!M!A!I!Ni!N!I!T setmodulus getmodulus setmodulus228 *DEFN > c!H!A!R0c!F0 c!H!A!R0c!F1 c!H!A!R0c!F0? c!H!A!R0c!F1? c!H!A!R0c!F* c!H!A!R0c!F/ 
c!H!A!R0c!Fl!I!Nc!O!M!B c!H!A!R0c!Fs!E!M!Il!I!Nc!O!M!B c!H!A!R0c!Fn!E!G!A!T!E 
c!H!A!R0c!Fn!E!Gp c!H!A!R0c!F!S2r!Tc!F c!H!A!R0r!Tc!Fn!U!M c!H!A!R0r!Tc!Fd!E!N 
c!H!A!R0r!P!L!A!Cr!Tc!Fn!U!M c!H!A!R0r!P!L!A!Cr!Tc!Fd!E!N c!H!A!R0p!O!Lr!Tc!Fn!U!M 
c!H!A!R0p!O!Lr!Tc!Fd!E!N c!H!A!R0p!U!Tp!O!Lr!Tc!Fn!U!M c!H!A!R0p!U!Tp!O!Lr!Tc!Fd!E!N 
c!H!A!R0c!F!S2qp!O!L c!H!A!R0c!F!S&t!M2qp!O!L c!H!A!R0redandcf+ c!H!A!R0redandcf- 
c!H!A!R0redandcf-- c!H!A!R0redandcf* c!H!A!R0redandcf/ c!H!A!R0redandcfremainder 
c!H!A!R0redandcfdivision c!H!A!R0redandcfnegative c!H!A!R0redandcf2ratcf 
c!H!A!R0ratcf- c!H!A!R0shortenratcf c!H!A!R0integerise c!H!A!R0r!E!D!U!C!El!I!N!Es!T!E!P 
c!H!A!R0p!O!Lc!O!N!T!E!N!T&u!Ns!I!G!Nl!C c!H!A!R0p!O!Lc!O!N!T!E!N!T 
c!H!A!R0p!U!Tp!O!Ln!U!M c!H!A!R0p!U!Tp!O!Ld!E!N c!H!A!R0!M!Kqp!O!L 
c!H!A!R0n!U!M&d!E!N2qp!O!L c!H!A!R0n!U!M&d!E!N&t!M2qp!O!L c!H!A!R0t!M2qp!O!L 
c!H!A!R0qp!O!L2lr!A!Tt!M s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0p!R!E!E!Nr!E!D!A!N!D 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0r!E!D!U!C!Ep!O!Ls!T!E!P 
s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0r!E!D!U!C!Ep!O!Ls!T!E!P 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0n!O!R!M!A!Lf!O!R!Ms!T!E!P 
s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0n!O!R!M!A!Lf!O!R!Ms!T!E!P 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0s!U!B!T!R!A!C!Tr!E!D!A!N!D1 
s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0s!U!B!T!R!A!C!Tr!E!D!A!N!D1 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0s!U!B!T!R!A!C!Tqp!O!L1 
s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0s!U!B!T!R!A!C!Tqp!O!L1 c!H!A!R0r!E!D!O!Rm!O!Nm!U!L!T 
c!H!A!R0i!Nc!O!E!F!F2r!E!D!A!N!Dc!O!E!F!F c!H!A!R0r!E!D!A!N!Dc!O!E!F!F1? 
c!H!A!R0cfmonredandmult d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0d!E!S!T!R!U!C!Tr!E!D!A!N!Ds!I!M!Ps!E!M!Il!I!Nc!O!M!B 
s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0d!E!S!T!R!U!C!Tr!E!D!A!N!Ds!I!M!Ps!E!M!Il!I!Nc!O!M!B 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0d!E!S!T!R!U!C!Tqp!O!Ls!I!M!Ps!E!M!Il!I!Nc!O!M!B 
c!H!A!R0d!E!S!T!R!U!C!Tr!E!D!A!N!Dc!O!E!F!Ft!I!M!E!S c!H!A!R0d!E!S!T!R!U!C!Tqp!O!Lc!O!E!F!Ft!I!M!E!S 
c!H!A!R0d!E!S!T!R!U!C!Tc!H!A!N!G!Er!E!D!A!N!Ds!I!G!N c!H!A!R0d!E!N!S!Ec!O!N!T!E!N!T!S 
c!H!A!R0s!P!A!R!S!Ec!O!N!T!E!N!T!S c!H!A!R0c!O!N!Cp!O!Lnm!U!L!T 
c!H!A!R0p!O!Lp!A!R!Tnm!U!L!T c!H!A!R0p!O!Lp!A!R!Tnm!U!L!Tc!O!N!T!E!N!T 
c!H!A!R0p!O!Lnq!U!O!T c!H!A!R0c!O!N!Cp!O!Lnm!O!Nm!U!L!T 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0p!O!Ll!I!Nc!O!M!B s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0p!O!Ll!I!Nc!O!M!B 
d!E!N!S!Ec!O!N!T!E!N!Tc!H!A!R0s!I!M!Pp!O!Ll!I!Nc!O!M!B 
s!P!A!R!S!Ec!O!N!T!E!N!Tc!H!A!R0s!I!M!Pp!O!Ll!I!Nc!O!M!B c!H!A!R0qp!O!Lq!U!O!Tm!U!L!T 
c!H!A!R0qp!O!Ld!E!Nm!U!L!T gcdn c!H!A!R0c!O!E!F!F!Sgcd:!D c!H!A!R0p!O!Lgcd 
c!H!A!R0np!O!Lgcd unsignlc!'s unsignlc restorechar0 a!D!Dt!O&c!H!A!R0l!I!S!T!S29 *DEFN > p!U!Tl!E!A!Dm!O!Np!T!R p!U!Tl!E!A!Dm!O!Np!T!R!S!I!Np!O!Ll!I!S!T 
p!U!Tl!E!A!Dm!O!Np!T!R!S!I!Np!O!Ld!E!Gl!I!S!T l!E!A!Dm!O!Nl!I!S!T2p!O!Ll!I!S!T 
l!E!A!Dm!O!Nd!E!Gl!I!S!T2p!O!Ld!E!Gl!I!S!T p!O!Ll!I!S!T2l!E!A!Dm!O!Nl!I!S!T 
p!O!Ld!E!Gl!I!S!T2l!E!A!Dm!O!Nd!E!Gl!I!S!T l!E!A!Dm!O!Nl!I!S!T2l!E!A!Dm!O!Nd!E!Gl!I!S!T 
p!O!Ll!I!S!T2p!O!Ld!E!Gl!I!S!T !B!M!S!T!R!S!T!A!B!L!Er!E!T!R!I!E!V!Espd!A!T!A 
!B!M!S!T!R!I!N!S!T!A!B!L!Er!E!T!R!I!E!V!Espd!A!T!A !S!T!A!B!L!E!N!O!N!C!O!M!Msp!O!Li!N!P!U!T!S 
!I!N!S!T!A!B!L!E!N!O!N!C!O!M!Msp!O!Li!N!P!U!T!S calcreductorpriority 
!S!T!A!B!L!E!C!O!M!Msp!O!Li!N!P!U!T!S !I!N!S!T!A!B!L!E!C!O!M!Msp!O!Li!N!P!U!T!S 
p!U!Te!X!T!R!Ang!R!O!E!B !C!O!M!Mg!B!Esp!O!Li!N!P!U!T!S p!R!U!N!Ec!O!M!Mspd!A!T!A 
paireltlist findcomps c!O!N!Ep m!I!Nm!O!N getstrategy setdefaultstrategy 
setrabbitstrategy setsawsstrategy clearcdegreeobstructions clearcdegreegkinput 
!O!R!Df!I!Xn!Cd!E!G !O!R!D!Ng!B!Es!T!R!A!Ti!N!I!T m!A!Y!B!Ep!R!I!N!Ti!T!E!M 
!O!R!Df!I!Xng!B!E !S!T!A!B!L!E!I!T!E!Mf!I!Xng!B!E !I!N!S!T!A!B!L!E!I!T!E!Mf!I!Xng!B!E 
p!U!T!Rg!B!E d!E!P!R!E!S!Sl!I!S!T n!E!Wr!E!D!U!C!Ts!I!G!N!A!T!U!R!E 
!O!R!Ds!T!R!A!Tf!I!X!Cd!E!Ge!N!D ordngbestrategy !H!S!M!I!Nf!I!Xn!Cd!E!G 
!H!S!M!I!N!Ng!B!Es!T!R!A!Ti!N!I!T !H!S!M!I!Nf!I!Xng!B!E !H!S!M!I!Ns!T!R!A!Tf!I!X!Cd!E!Ge!N!D 
minhilblimitstrategy checkinterruptstrategy setinterruptstrategy 
getinterruptstrategy s!T!R!A!Td!E!G!R!E!E!W!I!S!E s!T!R!A!Ti!T!E!M!W!I!S!E 
s!T!R!A!Ts!T!A!B!I!L!I!S!E s!T!R!A!Td!E!S!T!A!B!I!L!I!S!E30 *DEFN > q!U!I!Zi!Dp o!N!Eo!Fa!S!Kr!E!A!D dialogue d!I!A!L!O!G!U!E1 d!I!A!L!O!G!U!E2 
respond h!E!L!Ps!E!A!R!C!Hp!R!I!N!T n!Oh!E!L!Pf!O!U!N!D helpprint sethelpfile 
gethelpfile helpfromfiles internallist31 *DEFN > printpbs printpbsd!O!U!B!L!E printpbst!E!R!M printpbst!E!R!Md!O!U!B!L!E 
changepbs addpoly mn!L!E!S!S!P addvarstopbs addtopbs monlisptotaldegree 
lisppoltoaldegree printlisppol printlist replacefirstvarinmon 
replacefirstvarinpol replacefirstvarinlistpol delete1firstletterinmonom 
deletefirstletter1inpolynom deletefirstletter1inlistpol onelettermonomp 
gbleadmonom oneletterfilter pbsoneletterfilter firstletterfilter 
gbleadmonlfilter puresyzygies syzygiesgb syzygiesmin gbmodule2gen 
!M!I!N!R!E!Scustnewinputgbefind !M!I!N!R!E!Scustenddegree
*** in !M!I!N!R!E!Scustnewcdegfix: Illegal to bind global *custstrategy 
but binding anyway
!M!I!N!R!E!Scustnewcdegfix setminimalresolution l!E!A!V!Eminimalresolution32 *DEFN > *** Init code length is 350
*** in **fasl**initcode**: b declared fluid
*** in **fasl**initcode**: B declared fluid
**fasl**initcode**33 > *** Garbage collection starting 
*** GC 4 22-Aug-2007 13:34:19, 10 ms (3%), 113432 occupied, 2011557 free
nil
34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > 34 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
!C!O!M!Mp!O!La!L!Gr!E!A!D !N!O!N!C!O!M!Mp!O!La!L!Gr!E!A!D algforminput 
addalgforminput u!Nr!A!I!S!E!Da!L!Gi!N redandalgin u!Nr!A!I!S!E!Dr!E!D!A!N!Da!L!Gi!N 
a!L!G!I!Nv!A!R!Sr!E!A!D a!L!G!I!Nr!E!A!De!R!Rm!E!S!S!A!G!E
*** Init code length is 27
**fasl**initcode**
*** Garbage collection starting 
*** GC 5 22-Aug-2007 13:34:19, 0 ms (3%), 89399 occupied, 2035588 free
nil
35 > 35 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
t
36 *DEFN > c!H!A!R2redandcfdivision c!H!A!R2r!E!D!U!C!El!I!N!Es!T!E!P c!H!A!R2n!U!M&d!E!N&t!M2qp!O!L 
c!H!A!R2t!M2qp!O!L c!H!A!R2r!E!D!U!C!Ep!O!Ls!T!E!P c!H!A!R2s!U!B!T!R!A!C!Tr!E!D!A!N!D1 
c!H!A!R2r!E!D!O!Rm!O!Nm!U!L!T c!H!A!R2i!Nc!O!E!F!F2r!E!D!A!N!Dc!O!E!F!F 
c!H!A!R2cfmonredandmult c!H!A!R2d!E!S!T!R!U!C!Tr!E!D!A!N!Ds!I!M!Ps!E!M!Il!I!Nc!O!M!B 
c!H!A!R2d!E!S!T!R!U!C!Tqp!O!Lt!E!R!Mp!L!U!S s!E!Tm!O!D237 *DEFN > *** Init code length is 17
**fasl**initcode**38 > *** Garbage collection starting 
*** GC 6 22-Aug-2007 13:34:19, 10 ms (6%), 87805 occupied, 2037182 free
nil
39 > 39 > 39 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
t
40 *DEFN > alertchan getalertchan getdirectalertclosing setdirectalertclosing filealert 
inpols2gbasis findallcritpairs degreelmoutput getcurrentdegree setcurrentdegree41 *DEFN > homogenp assigninhomogenp ldegree testindata nonhomogindata seterroneouspol 
geterroneouspol seterroneousterm geterroneousterm clearerroritems poldegree 
preparehomogenisation preparedehomogenisation clearhomogenisation 
sethomogvariable gethomogvariable r!E!Vl!E!Xh!O!M!O!Gpm!O!N p!U!R!El!E!Xh!O!M!O!Gpm!O!N 
!N!O!N!C!O!M!Me!L!I!Mh!O!M!O!Gpm!O!N homogenise f!O!R!M!A!Lh!O!M!O!G!E!N!I!S!E 
homogeniseinput i!Nh!O!M!O!Gr!E!D!U!C!Eh!O!Mb!A!S!I!S degreelistputpointers 
r!E!P!L!A!C!El!O!W!E!Rp!O!Lh!O!M!O!Gv!A!Re!X!P r!E!Vl!E!Xhomogvarexp 
r!E!Vl!E!Xlowerhomogvarexp h!O!M!O!Gr!E!Vl!E!X!I!F!Y h!O!M!O!Gd!E!Gl!E!X!I!F!Y 
h!O!M!O!Gp!U!R!El!E!X!I!F!Y h!O!M!O!Gn!O!Nc!O!M!Me!L!I!M c!A!N!C!E!Lc!Fm!O!N!O!M 
c!A!N!C!E!Lh!O!M!O!Gv!A!R h!O!M!O!Gd!E!F!E!C!Tc!Fm!O!N!O!M d!E!G!R!E!El!I!S!Pp!O!L 
c!A!N!C!E!L!I!N!Gp!O!L w!A!R!N!I!N!G!O!Nl!O!Wg!R!A!D c!A!N!C!E!Lp!O!L 
c!A!N!C!E!Li!Nl!I!S!Tp!O!L d!Eh!O!M!O!Gc!Fm!O!N!O!M d!Eh!O!M!O!Gl!I!S!Pp!O!L 
d!Eh!O!M!O!Gqp!O!L c!O!M!M!U!T!A!T!O!R? d!Eh!O!M!O!Gl!I!S!T!O!Fp!O!L42 *DEFN > *** Init code length is 84
**fasl**initcode**43 > *** Garbage collection starting 
*** GC 7 22-Aug-2007 13:34:19, 10 ms (7%), 92840 occupied, 2032146 free
nil
44 > 44 > 44 > 44 > nil
45 > nil
46 > nil
47 > nil
48 > 48 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
t
49 *DEFN > stagtypechecker l!E!A!Dm!O!Nf!A!C!T!O!Ri!N!F!Os!A!V!E l!E!A!Dm!O!Nf!A!C!T!O!Ri!N!F!Ou!N!S!A!V!E50 *DEFN > p!U!Tm!O!Ns!U!B!S=a!C!C51 *DEFN > 52 *DEFN > a!U!T!Or!E!D!U!C!Ef!R!O!Mt!O autoreduceinput a!U!T!Or!E!D!U!C!Ef!I!X 
g!E!N!E!R!A!La!C!C!I!D!E!N!T!A!Lr!E!D!U!C!I!B!L!El!E!A!Dm!O!N 
s!A!V!E!Da!C!C!I!D!E!N!T!A!Lr!E!D!U!C!I!B!L!El!E!A!Dm!O!N !C!O!M!Mt!R!E!Em!O!Nr!E!F!O!R!M 
!C!O!M!Mt!R!E!Em!O!Nr!E!F!O!R!M1t !C!O!M!Mt!R!E!Em!O!Nr!E!F!O!R!M1nil 
!C!O!M!Mm!O!Nr!E!F!O!R!Mt !C!O!M!Mm!O!Nr!E!F!O!R!Mnil a!U!T!Or!E!Dc!O!M!M!I!F!Y 
a!U!T!Or!E!Di!N!I!T priorityinit initprioritydefaults m!A!K!Ep!R!I c!L!E!A!Rp!R!I!O!R!I!T!Y 
i!N!S!E!R!Tp!R!Ig!B!E r!E!F!O!R!Mp!R!I!O!R!I!T!I!E!S p!R!I!O!R!I!T!Yc!O!M!M!I!F!Y 
m!E!M!B!E!Ro!Rs!U!B!S-a!C!Cp!R!Im!O!Ni!N!S!E!R!T s!U!B!S-a!C!Cp!R!Im!O!Ni!N!S!E!R!T 
s!U!B!Sp!R!Im!O!Ni!N!S!E!R!T s!U!B!Sp!R!Ii!T!E!Mi!N!S!E!R!T s!U!B!S!T!A!N!C!Ec!O!M!M!I!F!Y 
r!E!D!U!C!Es!U!B!S!T!A!N!T!I!A!Lp!O!L s!T!A!Gf!O!R!Msp!O!L staggerinitreductions 
i!D!E!A!L!Sc!O!M!M!I!F!Y staggerinit staggerinitsubspri staggerinitprohideals 
staggerinitcritpairs staggerkernel staggerfinish autoreducestaggeroutput 
f!I!Xp!R!O!Hi!D&c!R!I!Tp!A!I!R!S f!I!Xp!R!O!Hi!D&p!R!Ec!R!I!Tp!A!I!R!S 
e!L!I!Mt!R!I!Vo!B!S!T!R!U!C!T!I!O!N s!T!A!Gsp!O!Lp!R!E!P s!T!A!Ge!L!I!M&sp!O!Lp!R!E!P 
s!T!A!Gsp!A!I!Rt!R!A!N!S!F!O!R!M s!T!A!Gc!R!I!T s!T!A!Gf!I!Xn!U!L!Lr!E!D!U!C!E!D 
s!T!A!Gf!I!Xngb!A!Se!L!T g!E!N!E!R!A!Lm!A!R!Ka!C!C!I!D!E!N!T!A!Lr!E!D!U!C!I!B!L!E 
s!A!V!Em!A!R!Ka!C!C!I!D!E!N!T!A!Lr!E!D!U!C!I!B!L!E r!E!N!E!Wp!A!I!R!S@m!O!N 
m!A!K!Et!R!I!Vp!A!I!R@m!O!N f!I!Xna!C!Cgb!A!Se!L!T s!T!A!Gf!I!Xgb!A!Se!L!T 
s!T!A!Gf!I!Xe!N!Dd!E!G!R!E!Et!H!I!N!G!S gmg!E!N!E!R!A!Lc!O!M!M!I!F!Y 
c!H!E!C!Ks!T!Go!R!D!E!R!S gmc!O!M!M!I!F!Y53 *DEFN > d!E!Gl!E!Xt!R!I!Vo!B!S!T!R!U!C!T!I!O!Nf!A!C!T!O!R r!E!Vl!E!Xt!R!I!Vo!B!S!T!R!U!C!T!I!O!Nf!A!C!T!O!R 
s!T!A!Gt!R!I!Vo!B!S!T!R!U!C!T!I!O!Nf!A!C!T!O!R&lc!O!Rout s!T!A!Glc!O!Rout 
monquotient m!O!Ni!N!T!E!R!Nc!O!P!Y r!E!Mp!A!I!Rf!R!O!Mm!O!N s!T!Gm!O!Nd!E!Gl!E!X!I!F!Y 
s!T!Gm!O!Nr!E!Vl!E!X!I!F!Y54 *DEFN > b!I!N!Di!N!I!T s!T!A!N!D!A!R!Db!I!N!Dpm!O!N&t!R!E!E v!E!C!T2!N!Im!O!N 
s!Tbpm!O!Ni!N!T!E!R!N a!L!Tbpm!O!Ni!N!T!E!R!N55 *DEFN > staggerdegreeoutput degreebigoutput p!R!I!N!Tt!R!E!Em!O!N puremon!O!R1print 
p!R!I!N!Tm!O!Np!R!I p!R!I!N!Tm!O!Ns!U!B!S p!R!I!N!Tm!O!Na!C!C p!R!I!N!Tm!O!Ns!U!B!S-a!C!C 
printfullstaggerstatmon p!R!I!N!Tsp2!Ri!T!E!M56 *DEFN > m!O!Ni!D!E!A!Lm!E!M!B!E!R m!O!Ni!D!E!A!Lu!N!I!O!Nn!O!Nm!E!M!B!E!R monidealunion 
m!O!Ni!D!E!A!Lu!N!I!O!Nn!O!Nm!E!M!B!E!R&c!O!L!O!N a!L!T!E!R!N!A!T!I!V!Em!O!Ni!D!E!A!Lu!N!I!O!Nm!O!N 
a!L!T!E!R!N!A!T!I!V!Em!O!Ni!D!E!A!Lu!N!I!O!Nr!I!G!H!T!M!O!S!Tn!O!Nm!E!M!B!E!R 
s!Tbt!R!E!Ea!D!Db!R!A!N!C!H a!L!Tbt!R!E!Ea!D!Db!R!A!N!C!H 
a!L!Tbt!R!E!Ea!D!Db!R!A!N!C!H&p!U!Tpm!O!Nm!O!N!U!Sv!A!L!U!E!S 
a!L!Tbt!R!E!Ea!D!Db!R!A!N!C!H&p!U!Tpm!O!Nm!I!N!U!Sv!A!L!U!E!S57 *DEFN > *** Init code length is 189
**fasl**initcode**58 > *** Garbage collection starting 
*** GC 8 22-Aug-2007 13:34:19, 10 ms (10%), 103859 occupied, 2021123 free
nil
59 > 59 > 59 > nil
60 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
t
61 *DEFN > !C!O!M!Mgbasis2hseriesmonid !C!O!M!Mh!L!Bi!N!I!Tm!O!Ni!D !C!O!M!Mh!L!Bp!R!O!L!O!N!Gn!U!M 
!C!O!M!Mh!L!Bp!R!E!E!Nz!E!R!O!E!S !C!O!M!Mh!L!B1-!Tf!A!C!T!O!Rp 
!C!O!M!Mh!L!Bs!H!O!R!T!E!Nn!U!M !C!O!M!Mh!L!Bn!U!Mq!U!O!T!I!E!N!T1-!T 
!C!O!M!Mh!L!Bn!U!Mp!L!U!St!E!R!M !C!O!M!Mh!L!Bn!U!Ma!D!D0 !C!O!M!Mh!L!Ba!D!Dn!U!Md!E!Nd!E!G2 
!C!O!M!Mh!L!Bn!U!Mt!I!M!E!Sp!O!W!E!R !C!O!M!Mh!L!Bn!U!Mt!I!M!E!St!E!R!M 
!C!O!M!Mh!L!Bn!U!Mt!I!M!E!S2 !C!O!M!Mh!L!Bs!U!P!P!O!R!T !C!O!M!Mh!L!Bi!N!T!E!R!S!E!C!Tm!A!S!K 
!C!O!M!Mh!L!Bs!U!B!S!E!Tm!A!S!K !C!O!M!Mh!L!Bn!O!N!T!R!I!Vu!N!I!O!Nm!A!S!K 
!C!O!M!Mh!L!Bn!Oo!F0m!A!S!K !C!O!M!Mh!L!Bp!R!U!N!E0m!A!S!K!E!Dv!A!R!S1 
!C!O!M!Mh!L!Bp!R!U!N!E0m!A!S!K!E!Dv!A!R!S !C!O!M!Mh!L!Bp!R!U!N!E1m!A!S!K!E!Dv!A!R!S1 
!C!O!M!Mh!L!Bp!R!U!N!E1m!A!S!K!E!Dv!A!R!S !C!O!M!Mh!L!Bp!R!U!N!Ev!A!R1c!O!P!Y 
!C!O!M!Mh!L!Bn!O!Nm!O!Nf!A!C!T!O!Rp !C!O!M!Mh!L!Bm!O!Ng!R!E!A!T!E!Rp 
!C!O!M!Mh!L!Bm!E!R!G!Em!O!Ni!D2 !C!O!M!Mh!L!Btd!E!G !C!O!M!Mh!L!Btd!E!Glcm 
!C!O!M!Mh!L!Blcm !C!O!M!Mh!L!Bl!O!W!E!Rv!A!R1i!Nm!O!Ni!D !C!O!M!Mh!L!Be!X!P!Rn!I!Lf!L!A!G 
!C!O!M!Mh!L!Bm!O!Ni!D2hs!E!R1 !C!O!M!Mh!L!Br!E!D!U!C!Em!O!Ni!D 
!C!O!M!Mh!L!Bb!A!S!I!Cc!A!S!Es!E!R!I!E!S !C!O!M!Mh!L!Bs!P!L!I!Tc!A!S!Es!E!R!I!E!S 
!C!O!M!Mh!L!Bs!P!L!I!Tc!A!S!Es!E!R!I!E!S1 !C!O!M!Mcalcrathilbertseries 
!C!O!M!Mtdegreehseriesout !C!O!M!Mcalcpolringhseries receval recevlis vectplus 
v!E!C!Tp!L!U!S2 !Z2-1 p!U!Tr!E!Cd!E!F r!E!Mr!E!Cd!E!F f!I!N!Dn!E!Wrmf!S 
!O!R!D!W!E!I!G!H!T!Sf!I!N!Dn!E!Wt!O!R2rmf !A!L!T!W!E!I!G!H!T!Sf!I!N!Dn!E!Wt!O!R2rmf 
f!I!N!Dn!E!Wrmf!S> f!I!N!Dn!E!Wrmf!S< f!I!N!Dn!E!Wrmf!S2 
tdegreecalculatepbseries tdegreecalculatepbseries1 !N!O!N!C!O!M!Mtdegreehseriesout 
invert-fpseries-step recevaltd recevlistd calctolimit revertseriescalc 
remlastseriescalc v!A!Ro!Rs!P!A!C!Ep!R!I!N2 wi!N!S!E!R!T algoutlist 
degreepbseriesdisplay p!O!Lo!U!T!P!R!E!P pairpcdr mapcdar preprecdef printrecdef 
printinvrecdef p!R!I!N!Tfps!T!E!P clearpbseries pbinit !N!O!N!C!O!M!Mcalcpolringhseries 
hs!E!R!I!E!Sn!O!Nc!O!M!M!I!F!Y sethseriesminimumdefault sethseriesminima 
gethseriesminimum gethseriesminima clearhseriesminima hs!E!R!I!E!Sc!O!M!M!I!F!Y 
hs!E!R!I!E!So!R!Dw!E!I!G!H!T!S hs!E!R!I!E!Sa!L!Tw!E!I!G!H!T!S62 *DEFN > h!L!Bs!C!R!E!E!Ni!N!P!U!T h!L!Bc!H!E!C!Ki!N!P!U!T h!L!Bc!H!E!C!Ko!U!T!P!U!T 
seriesprinting63 *DEFN > s!C!R!E!E!Ni!N!P!U!T s!C!R!E!E!Ni!N!P!U!T0 s!Y!Zs!C!Ri!N!P!U!T1 s!Y!Zs!T!E!P1 
s!Y!Zs!C!Ri!N!P!U!T2 s!Y!Zs!T!E!P2 i!N!S!E!R!T!N!E!W!V!A!R!S addiovar geniovar 
nones setweightstoone c!H!E!C!Ki!N!P!U!T c!H!E!C!Ki!N!P!U!Tpbs c!H!E!C!Ko!U!T!P!U!Tpbs 
c!H!E!C!Ko!U!T!P!U!Tgb c!H!E!C!Ko!U!T!P!U!Th!S c!H!A!N!N!E!Lw!R!I!T!E 
c!H!A!N!N!E!Ln!E!Wl!I!N!E d!O!U!B!L!Ep!R!I!N!T d!O!U!B!L!En!E!Wl!I!N!E p!R!I!N!Tp!A!R!A 
p!R!I!N!Ts!E!R!I!E!S o!U!Ts!P!A!C!E!S p!R!E!T!T!Y!P!R!I!N!T!O!U!T!V!A!R!S 
p!R!I!N!Tf!O!Ra!N!I!C!K r!E!Vc!O!P!Ym!O!N r!E!Vc!O!P!Yp!O!L s!H!I!F!Tc!O!P!Ym!O!N 
shiftc!O!P!Yp!O!L shiftc!O!P!Yl!I!S!Tp!O!L r!E!Vs!H!I!F!Tc!O!P!Yl!I!S!Tp!O!L 
!R!E!V!N!O!N!C!O!M!Mp!O!La!L!Gr!E!A!D n!E!W!I!N!D!E!X n!E!W!I!N!D!E!X!I!Ncar 
n!E!W!I!N!D!E!X!I!Nm!O!N!O!M n!E!W!I!N!D!E!X!I!Nt!E!R!M n!E!W!I!N!D!E!X!I!Np!O!L!Y!N!O!M 
n!E!W!I!N!D!E!X!I!Nl!I!S!T n!E!W!I!N!D!E!X!C!H!A!N!G!E n!E!W!I!N!D!E!X!I!Nv!A!R 
v!E!R!Ys!H!O!R!Tm!O!N!O!M s!H!O!R!Tm!O!N!O!M m!O!N!O!M!P!O!L b!I!N!O!M 
i!N!S!E!R!Tn!E!W!V!A!Rm!O!N!O!M i!N!S!E!R!Tn!E!W!V!A!R!Si!Nl!I!S!T 
i!N!S!E!R!Tn!E!W!V!A!R!S!I!Ni!N!D!E!Gl!I!S!T b!I!N!O!M!Sf!O!Rf!A!C!T!O!Ra!L!G!E!B!R!A 
b!I!N!O!M!Sf!O!Rnch!O!M!O!G!E!N!I!S!A!T!I!O!N b!I!N!O!M!Sf!O!Rh!O!C!H!S!H!I!L!D 
syzygiesadditionalrelations newsyzygiesadditionalrelations 
factalgadditionalrelations hochadditionalrelations64 *DEFN > !S!E!Rp!O!La!D!D0 !S!E!Rp!O!Lt!I!M!E!St!E!R!M !S!E!Rp!O!Lt!I!M!E!S2 nl!E!N!G!T!H 
m!A!Xp!A!R!Al!E!N!G!T!H !S!E!Rm!A!Xl!E!N!G!T!H c!H!A!N!G!Es!I!G!N !P!O!Wc!H!A!N!G!Es!I!G!N 
renewseries calcmodhseries65 *DEFN > *** Init code length is 248
**fasl**initcode**66 > *** Garbage collection starting 
*** GC 9 22-Aug-2007 13:34:20, 0 ms (8%), 111824 occupied, 2013152 free
nil
67 > 67 > 67 > 67 > 67 > FASLOUT: (DSKIN files) or type in expressions
When all done execute (FASLEND)
modexpt decide1 skip strongprimfac sqrt sqrt1 primfac quadrrest2p quadrrestp 
quadrrest1p quadrrest3p f!I!R!S!Tp!R!I!M!I!T!I!V!Er!O!O!T modsmartexpt binlist 
nomodexpts1 m!A!K!Eexp&logvect!S s!T!R!I!Pe!X!P!L!O!D!E l!I!S!T2s!T!R!I!N!G 
setprog writeprog setvectprog writevectprog plupdate appendnumbertostring
*** Init code length is 44
**fasl**initcode**
nil
68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 68 > 
Quitting