~trn/reduce-algebra

1037ed4f65991c3d795299e386f4f1c57a2ce740 — Jeffrey H. Johnson a month ago 8f99816 + c246719
Merge branch 'svn/trunk'
973 files changed, 4284 insertions(+), 352 deletions(-)

M csl/cslbase/bytes2.cpp
M csl/cslbase/version.h
M packages/alg/alg-form.red
M packages/alg/alg.red
M packages/alg/algbool.red
M packages/alg/algdcl.red
M packages/alg/coeff.red
M packages/alg/depend.red
M packages/alg/elem.red
M packages/alg/eqn.red
M packages/alg/exptchk.red
M packages/alg/extout.red
M packages/alg/fac.red
M packages/alg/farith.red
M packages/alg/forall.red
M packages/alg/gcdchk.red
M packages/alg/general.red
M packages/alg/intro.red
M packages/alg/lifted.red
M packages/alg/linop.red
M packages/alg/logsort.red
M packages/alg/map.red
M packages/alg/maxmin.red
M packages/alg/mkgroup.red
M packages/alg/nestrad.red
M packages/alg/nssimp.red
M packages/alg/numsup.red
M packages/alg/opmtch.red
M packages/alg/order.red
M packages/alg/part.red
M packages/alg/prep.red
M packages/alg/reval.red
M packages/alg/rmsubs.red
M packages/alg/showrule.red
M packages/alg/simp.red
M packages/alg/simplog.red
M packages/alg/simptrig.red
M packages/alg/spcfnint.red
M packages/alg/str.red
M packages/alg/sub.red
M packages/alg/weight.red
M packages/alg/zfactor.red
M packages/algint/abasic.red
M packages/algint/afactor.red
M packages/algint/algfn.red
M packages/algint/algint.red
M packages/algint/algnums.red
M packages/algint/antisubs.red
M packages/algint/coates.red
M packages/algint/coatesid.red
M packages/algint/findmagc.red
M packages/algint/findres.red
M packages/algint/finitise.red
M packages/algint/fixsubf.red
M packages/algint/fracdi.red
M packages/algint/genus.red
M packages/algint/hidden.red
M packages/algint/intbasis.red
M packages/algint/inttaylr.red
M packages/algint/jhddiff.red
M packages/algint/jhdriver.red
M packages/algint/linrel.red
M packages/algint/log2atan.red
M packages/algint/maninp.red
M packages/algint/modify.red
M packages/algint/modlineq.red
M packages/algint/nagell.red
M packages/algint/nbasis.red
M packages/algint/phantoms.red
M packages/algint/places.red
M packages/algint/precoats.red
M packages/algint/primes.red
M packages/algint/removecm.red
M packages/algint/sqfrnorm.red
M packages/algint/substns.red
M packages/algint/torsionb.red
M packages/algint/wstrass.red
M packages/algint/zmodule.red
M packages/arith/arith.red
M packages/arith/bfauxil.red
M packages/arith/bfelem.red
M packages/arith/comprd.red
M packages/arith/crelem.red
M packages/arith/load.red
M packages/arith/math.red
M packages/arith/paraset.red
M packages/arith/rdelem.red
M packages/arith/rounded.red
M packages/arith/smlbflot.red
M packages/arnum/arinv.red
M packages/arnum/arnum.red
M packages/arnum/bath.red
M packages/assert/assert.red
M packages/assist/assist.red
M packages/assist/auxitens.red
M packages/assist/backtrck.red
M packages/assist/baglist.red
M packages/assist/cantens.red
M packages/assist/checkind.red
M packages/assist/control.red
M packages/assist/contrtns.red
M packages/assist/ctintro.red
M packages/assist/dummy.red
M packages/assist/dummycnt.red
M packages/assist/genpurfn.red
M packages/assist/gentens.red
M packages/assist/grassman.red
M packages/assist/hcvctors.red
M packages/assist/helpasst.red
M packages/assist/matrext.red
M packages/assist/opertens.red
M packages/assist/partitns.red
M packages/assist/perms.red
M packages/assist/polyexns.red
M packages/assist/sl2psl.red
M packages/assist/spaces.red
M packages/assist/switchxt.red
M packages/assist/transfns.red
M packages/assist/vectorop.red
M packages/atensor/atensor.red
M packages/atensor/basis.red
M packages/atensor/dummy1.red
M packages/atensor/dummy2.red
M packages/atensor/perm1.red
M packages/atensor/pvector.red
M packages/atensor/tensor.red
M packages/atensor/tensor1.red
M packages/atensor/tensorio.red
M packages/avector/avector.red
M packages/bibasis/bibasis.red
M packages/bibasis/bibasis_interface.red
M packages/bibasis/bibasis_involutive.red
M packages/bibasis/bibasis_janet_tree.red
M packages/bibasis/bibasis_monom.red
M packages/bibasis/bibasis_polynom.red
M packages/bibasis/bibasis_qset.red
M packages/bibasis/bibasis_triple.red
M packages/bibasis/bibasis_tset.red
M packages/cali/bas.red
M packages/cali/bcsf.red
M packages/cali/cali.red
M packages/cali/calimat.red
M packages/cali/dpmat.red
M packages/cali/dpoly.red
M packages/cali/groeb.red
M packages/cali/groebf.red
M packages/cali/hf.red
M packages/cali/intf.red
M packages/cali/lf.red
M packages/cali/matop.red
M packages/cali/mo.red
M packages/cali/moid.red
M packages/cali/odim.red
M packages/cali/prime.red
M packages/cali/quot.red
M packages/cali/red.red
M packages/cali/res.red
M packages/cali/ring.red
M packages/cali/scripts.red
M packages/cali/triang.red
M packages/camal/camal.red
M packages/camal/fourdom.red
M packages/camal/fourplus.red
M packages/camal/hdiff.red
M packages/camal/hsub.red
M packages/camal/makefour.red
M packages/cde/cde.red
M packages/cde/cde_ansatz.red
M packages/cde/cde_cdcalc.red
M packages/cde/cde_cdiff.red
M packages/cde/cde_diffcon.red
M packages/cde/cde_init.red
M packages/cde/cde_jetspace.red
M packages/cde/cde_parametric.red
M packages/cde/cde_superfun.red
M packages/cde/cde_tools.red
M packages/cde/cde_totalder.red
M packages/cde/cde_varcalc.red
M packages/cde/cde_vectorfield.red
M packages/cde/cde_weaklynl.red
M packages/cde/examples/bou_ell1.red
M packages/cde/examples/bou_lho1.red
M packages/cde/examples/bur_hsy1.red
M packages/cde/examples/bur_hsy2.red
M packages/cde/examples/dn2d_sb1.red
M packages/cde/examples/kdv_ell1.red
M packages/cde/examples/kdv_hsy1.red
M packages/cde/examples/kdv_lcl1.red
M packages/cde/examples/kdv_lcl2.red
M packages/cde/examples/kdv_lho1.red
M packages/cde/examples/kdv_lho2.red
M packages/cde/examples/kdv_lho3.red
M packages/cde/examples/kdv_nlcl1.red
M packages/cde/examples/kdv_nlho1.red
M packages/cde/examples/kdv_ro1.red
M packages/cde/examples/kp_lho1.red
M packages/cde/examples/ple_nlcl1.red
M packages/cde/examples/ple_nlho1.red
M packages/cde/examples/wdvv_biham1.red
M packages/cde/examples_book/bou_csy1.red
M packages/cde/examples_book/bou_ell1.red
M packages/cde/examples_book/bou_ho1.red
M packages/cde/examples_book/bou_lcl1.red
M packages/cde/examples_book/bou_ro1.red
M packages/cde/examples_book/bou_roc1.red
M packages/cde/examples_book/bou_sh1.red
M packages/cde/examples_book/bou_sympl1.red
M packages/cde/examples_book/bur_hsy1.red
M packages/cde/examples_book/bur_hsy2.red
M packages/cde/examples_book/bur_jbr1.red
M packages/cde/examples_book/cde_add.red
M packages/cde/examples_book/ch_csy1.red
M packages/cde/examples_book/ch_ell1.red
M packages/cde/examples_book/ch_ell2.red
M packages/cde/examples_book/ch_ho1.red
M packages/cde/examples_book/ch_hsy1.red
M packages/cde/examples_book/ch_hsy2.red
M packages/cde/examples_book/ch_ro1.red
M packages/cde/examples_book/ch_roc1.red
M packages/cde/examples_book/ch_sympl1.red
M packages/cde/examples_book/dn2d_sb1.red
M packages/cde/examples_book/gh_ell1.red
M packages/cde/examples_book/gh_sympl1.red
M packages/cde/examples_book/gt_csy1.red
M packages/cde/examples_book/gt_csy2.red
M packages/cde/examples_book/gt_lcl1.red
M packages/cde/examples_book/h_nb1.red
M packages/cde/examples_book/hh_ell1.red
M packages/cde/examples_book/hh_nlv1.red
M packages/cde/examples_book/hh_roc1.red
M packages/cde/examples_book/kdv_csy1.red
M packages/cde/examples_book/kdv_ell1.red
M packages/cde/examples_book/kdv_ho1.red
M packages/cde/examples_book/kdv_ho2.red
M packages/cde/examples_book/kdv_ho3.red
M packages/cde/examples_book/kdv_ho4.red
M packages/cde/examples_book/kdv_hsy1.red
M packages/cde/examples_book/kdv_hsy2.red
M packages/cde/examples_book/kdv_hsy3.red
M packages/cde/examples_book/kdv_lcl1.red
M packages/cde/examples_book/kdv_lcl2.red
M packages/cde/examples_book/kdv_nlcl1.red
M packages/cde/examples_book/kdv_ro1.red
M packages/cde/examples_book/kdv_ro2.red
M packages/cde/examples_book/kdv_roc1.red
M packages/cde/examples_book/kdv_tcl1.red
M packages/cde/examples_book/kn_ell1.red
M packages/cde/examples_book/kn_sympl1.red
M packages/cde/examples_book/kp_ell1.red
M packages/cde/examples_book/kp_ho1.red
M packages/cde/examples_book/kp_tan1.red
M packages/cde/examples_book/kpev_ell1.red
M packages/cde/examples_book/kpev_ho1.red
M packages/cde/examples_book/kpev_tan1.red
M packages/cde/examples_book/pav_ell1.red
M packages/cde/examples_book/pav_hsy1.red
M packages/cde/examples_book/pav_ro1.red
M packages/cde/examples_book/pkz_csy1.red
M packages/cde/examples_book/pkz_lcl1.red
M packages/cde/examples_book/ple_ell1.red
M packages/cde/examples_book/ple_nlv1.red
M packages/cde/examples_book/ple_ro1.red
M packages/cde/examples_book/rddym_ro1.red
M packages/cde/examples_book/tfh_ell1.red
M packages/cde/examples_book/tfh_ho1.red
M packages/cde/examples_book/uh_csy1.red
M packages/cde/examples_book/uh_lcl1.red
M packages/cde/examples_book/uh_ro1.red
M packages/cde/examples_book/uh_sym1.red
M packages/cde/examples_book/wdvv_ell1.red
M packages/cde/examples_book/wdvv_sympl1.red
M packages/cde/examples_compHO/class_3c.red
M packages/cdiff/cdiff.red
M packages/cdiff/cdiffx.red
M packages/cdiff/integrator.red
M packages/cdiff/supervf.red
M packages/cdiff/tools21.red
M packages/cgb/bcint.red
M packages/cgb/cgb.red
M packages/cgb/dp.red
M packages/cgb/gb.red
M packages/cgb/gbsc.red
M packages/cgb/smartev.red
M packages/cgb/svdp.red
M packages/cgb/vecev.red
M packages/crack/applysym.red
M packages/crack/conlaw.red
M packages/crack/conlaw0.red
M packages/crack/conlaw1.red
M packages/crack/conlaw2.red
M packages/crack/conlaw3.red
M packages/crack/conlaw4.red
M packages/crack/crack.red
M packages/crack/crdec.red
M packages/crack/crdiffelim.red
M packages/crack/crequsol.red
M packages/crack/crgb.red
M packages/crack/crgensep.red
M packages/crack/crhomalg.red
M packages/crack/crident.red
M packages/crack/crineq.red
M packages/crack/crinit.red
M packages/crack/crint.red
M packages/crack/crintfix.red
M packages/crack/crlinalg.red
M packages/crack/crmain.red
M packages/crack/crorder.red
M packages/crack/crpvm.red
M packages/crack/crresu.red
M packages/crack/crsep.red
M packages/crack/crshort.red
M packages/crack/crsimp.red
M packages/crack/crsimpso.red
M packages/crack/crstart.red
M packages/crack/crstruc.red
M packages/crack/crsubsys.red
M packages/crack/crtrafo.red
M packages/crack/crunder.red
M packages/crack/crutil.red
M packages/crack/dev.red
M packages/crack/fixes2.red
M packages/crack/liepde.red
M packages/crack/v3tools.red
M packages/defint/defint.red
M packages/defint/defint0.red
M packages/defint/definta.red
M packages/defint/defintb.red
M packages/defint/defintc.red
M packages/defint/defintd.red
M packages/defint/definte.red
M packages/defint/defintf.red
M packages/defint/defintg.red
M packages/defint/definth.red
M packages/defint/definti.red
M packages/defint/defintj.red
M packages/defint/defintk.red
M packages/defint/defintx.red
M packages/dipoly/a2dip.red
M packages/dipoly/bcoeff.red
M packages/dipoly/condense.red
M packages/dipoly/dip2a.red
M packages/dipoly/dipoly.red
M packages/dipoly/dipoly1.red
M packages/dipoly/dipprint.red
M packages/dipoly/dipvars.red
M packages/dipoly/expvec.red
M packages/dipoly/torder.red
M packages/dipoly/vdp2dip.red
M packages/dipoly/vdp2dip1.red
M packages/dipoly/vdp3dip.red
M packages/dipoly/vdpcom.red
M packages/eds/contact.red
M packages/eds/disjoin.red
M packages/eds/eds.red
M packages/eds/edsaux.red
M packages/eds/edscfrm.red
M packages/eds/edsequiv.red
M packages/eds/edseval.red
M packages/eds/edsexptl.red
M packages/eds/edsnorml.red
M packages/eds/edspatch.red
M packages/eds/edspde.red
M packages/eds/edssolve.red
M packages/eds/edsuser.red
M packages/eds/element.red
M packages/eds/invol.red
M packages/eds/prolong.red
M packages/eds/pullback.red
M packages/eds/restrict.red
M packages/eds/systems.red
M packages/eds/tableaux.red
M packages/eds/transfrm.red
M packages/excalc/degform.red
M packages/excalc/exaux.red
M packages/excalc/excalc.red
M packages/excalc/exdf.red
M packages/excalc/exintro.red
M packages/excalc/exlists.red
M packages/excalc/forder.red
M packages/excalc/frames.red
M packages/excalc/hodge.red
M packages/excalc/idexf.red
M packages/excalc/indices.red
M packages/excalc/indsymm.red
M packages/excalc/indxprin.red
M packages/excalc/innerprd.red
M packages/excalc/killing_vector.red
M packages/excalc/liedf.red
M packages/excalc/lievalfm.red
M packages/excalc/partdf.red
M packages/excalc/partitsf.red
M packages/excalc/vardf.red
M packages/excalc/vecanlys.red
M packages/excalc/wedge.red
M packages/factor/alphas.red
M packages/factor/bigmodp.red
M packages/factor/coeffts.red
M packages/factor/degsets.red
M packages/factor/ezgcd.red
M packages/factor/ezgcdf.red
M packages/factor/facmisc.red
M packages/factor/facmod.red
M packages/factor/facprim.red
M packages/factor/facstr.red
M packages/factor/factor.red
M packages/factor/facuni.red
M packages/factor/imageset.red
M packages/factor/interfac.red
M packages/factor/linmodp.red
M packages/factor/mhensfns.red
M packages/factor/modpoly.red
M packages/factor/multihen.red
M packages/factor/pfacmult.red
M packages/factor/pfactor.red
M packages/factor/unihens.red
M packages/factor/vecpoly.red
M packages/fide/approx.red
M packages/fide/charpol.red
M packages/fide/discret.red
M packages/fide/expres.red
M packages/fide/fide.red
M packages/fide/fide1.red
M packages/fide/hurwp.red
M packages/fide/iimet.red
M packages/fide/linband.red
M packages/foreign/cuba/alg_intf.red
M packages/foreign/cuba/cuba.red
M packages/foreign/cuba/cuba_main.red
M packages/foreign/nlopt/alg_intf.red
M packages/foreign/nlopt/nlopt.red
M packages/foreign/nlopt/nlopt_main.red
M packages/gcref/gcref.red
M packages/gentran/gentran.red
M packages/gentran/goutput.red
M packages/gentran/gparser.red
M packages/gentran/intrfc.red
M packages/gentran/lspc.red
M packages/gentran/lspfor.red
M packages/gentran/lsppasc.red
M packages/gentran/lsprat.red
M packages/gentran/pre.red
M packages/gentran/redlsp.red
M packages/gentran/segmnt.red
M packages/gentran/templt.red
M packages/gentran/utils.red
M packages/geometry/geoprover.red
M packages/geometry/old-geometry.red
M packages/groebner/buchbg.red
M packages/groebner/glexconv.red
M packages/groebner/greduo.red
M packages/groebner/grinter2.red
M packages/groebner/grinterf.red
M packages/groebner/groebcri.red
M packages/groebner/groebfac.red
M packages/groebner/groebidq.red
M packages/groebner/groebman.red
M packages/groebner/groebmes.red
M packages/groebner/groebner.red
M packages/groebner/groebnr2.red
M packages/groebner/groebopt.red
M packages/groebner/groebres.red
M packages/groebner/groebrst.red
M packages/groebner/groebsea.red
M packages/groebner/groebsor.red
M packages/groebner/groebspa.red
M packages/groebner/groebtra.red
M packages/groebner/groesolv.red
M packages/groebner/groeweak.red
M packages/groebner/groext.red
M packages/groebner/hggroeb.red
M packages/groebner/hilbert2.red
M packages/groebner/hilbertp.red
M packages/groebner/hilberts.red
M packages/groebner/hille.red
M packages/groebner/ideals.red
M packages/groebner/kredelw.red
M packages/groebner/kuechl.red
M packages/groebner/traverso.red
M packages/guardian/guardian.red
M packages/hephys/cvit.red
M packages/hephys/cvitmap.red
M packages/hephys/evalmaps.red
M packages/hephys/hephys.red
M packages/hephys/intfierz.red
M packages/hephys/map2strn.red
M packages/hephys/noncom2.red
M packages/hephys/physop.red
M packages/hephys/red2cvit.red
M packages/int/contents.red
M packages/int/csolve.red
M packages/int/df2q.red
M packages/int/dint.red
M packages/int/distrib.red
M packages/int/divide.red
M packages/int/driver.red
M packages/int/hacksqrt.red
M packages/int/halfangl.red
M packages/int/ibasics.red
M packages/int/idepend.red
M packages/int/int-table.red
M packages/int/int.red
M packages/int/intfac.red
M packages/int/isolve.red
M packages/int/jpatches.red
M packages/int/makevars.red
M packages/int/ratint.red
M packages/int/reform.red
M packages/int/simpsqrt.red
M packages/int/sqrtf.red
M packages/int/symint.red
M packages/int/tidysqrt.red
M packages/int/trcase.red
M packages/int/trialdiv.red
M packages/int/vect.red
M packages/invbase/invbase.red
M packages/invbase/invbcomp.red
M packages/invbase/invbint.red
M packages/laplace/laplace.red
M packages/lessons/less1.red
M packages/lessons/less2.red
M packages/lessons/less3.red
M packages/lessons/less4.red
M packages/lessons/less5.red
M packages/lessons/less6.red
M packages/lessons/less7.red
M packages/libreduce/libreduce.red
M packages/linalg/cholesky.red
M packages/linalg/fsimplex.red
M packages/linalg/gramschm.red
M packages/linalg/lamatrix.red
M packages/linalg/linalg.red
M packages/linalg/ludecom.red
M packages/linalg/simplex.red
M packages/linalg/svd.red
M packages/linalg/tadjoint.red
M packages/listvecops/listvecops.red
M packages/mathml/ir2om.red
M packages/mathml/mathml.red
M packages/mathml/mathml_1.red
M packages/mathml/mathmlom.red
M packages/mathml/mml_ir.red
M packages/mathml/mtables.red
M packages/mathml/om2ir.red
M packages/mathml/tools.red
M packages/mathpr/dfprin.red
M packages/mathpr/fortpri.red
M packages/mathpr/mathpr.red
M packages/mathpr/mintro.red
M packages/mathpr/mprint.red
M packages/mathpr/prend.red
M packages/mathpr/ratprin.red
M packages/mathpr/specprin.red
M packages/mathpr/sqprint.red
M packages/mathpr/xprint.red
M packages/matrix/bareiss.red
M packages/matrix/brsltnt_bmap.red
M packages/matrix/cofactor.red
M packages/matrix/det.red
M packages/matrix/extops.red
M packages/matrix/glmat.red
M packages/matrix/matpri.red
M packages/matrix/matpri2.red
M packages/matrix/matproc.red
M packages/matrix/matrix.red
M packages/matrix/matsm.red
M packages/matrix/nestdom.red
M packages/matrix/nullsp.red
M packages/matrix/rank.red
M packages/matrix/resultnt.red
M packages/misc/boolean.red
M packages/misc/cedit.red
M packages/misc/changevr.red
M packages/misc/coeff2.red
M packages/misc/comfac.red
M packages/misc/compact.red
M packages/misc/compactf.red
M packages/misc/dfpart.red
M packages/misc/ftr.red
M packages/misc/lie.red
M packages/misc/lie1234.red
M packages/misc/liendmc1.red
M packages/misc/limits.red
M packages/misc/misc.red
M packages/misc/mv.red
M packages/misc/mvmatch.red
M packages/misc/odeex.red
M packages/misc/pf.red
M packages/misc/randpoly.red
M packages/misc/rcref.red
M packages/misc/reacteqn.red
M packages/misc/reddom.red
M packages/misc/redio.red
M packages/misc/reset.red
M packages/misc/rlfi.red
M packages/misc/sets.red
M packages/misc/trigd/trigd.red
M packages/mrvlimit/expon.red
M packages/mrvlimit/mrvlimit.red
M packages/ncpoly/ncdip.red
M packages/ncpoly/ncenv.red
M packages/ncpoly/ncfactor.red
M packages/ncpoly/ncgroeb.red
M packages/ncpoly/ncout.red
M packages/ncpoly/ncpoly.red
M packages/normform/froben.red
M packages/normform/jordan.red
M packages/normform/jordsymb.red
M packages/normform/matarg.red
M packages/normform/nestdom.red
M packages/normform/normform.red
M packages/normform/ratjord.red
M packages/normform/smithex.red
M packages/normform/smithex1.red
M packages/numeric/bounds.red
M packages/numeric/chebysh.red
M packages/numeric/gauss.red
M packages/numeric/newton.red
M packages/numeric/numeric.red
M packages/numeric/numeval.red
M packages/numeric/numfit.red
M packages/numeric/numint.red
M packages/numeric/numsolve.red
M packages/numeric/rungeku.red
M packages/numeric/steepstd.red
M packages/occal/assume.red
M packages/occal/occal.red
M packages/occal/ocdispl.red
M packages/occal/ocinterf.red
M packages/occal/ocparse.red
M packages/occal/ocpriprg.red
M packages/occal/ocread.red
M packages/occal/ocstruct.red
M packages/occal/ocvars.red
M packages/occal/oczusatz.red
M packages/occal/regex.red
M packages/occal/signpref.red
M packages/odesolve/odeintfc.red
M packages/odesolve/odelin.red
M packages/odesolve/odenon1.red
M packages/odesolve/odenonn.red
M packages/odesolve/odepatch.red
M packages/odesolve/odesolve.red
M packages/odesolve/odespcfn.red
M packages/odesolve/odetop.red
M packages/orthovec/orthovec.red
M packages/pgauss/pgauss.red
M packages/pgauss/pgcond.red
M packages/pgauss/pgsm.red
M packages/plot/gnuintfc.red
M packages/plot/gnupldrv.red
M packages/plot/gnuplot.red
M packages/plot/parray.red
M packages/plot/plot.red
M packages/plot/plotexp2.red
M packages/plot/plotexp3.red
M packages/plot/plotimp2.red
M packages/plot/plotimp3.red
M packages/plot/plotnum.red
M packages/plot/plotsynt.red
M packages/plot/pltpara.red
M packages/plot/turtle.red
M packages/plot/xvect.red
M packages/pm/pattdefn.red
M packages/pm/pattperm.red
M packages/pm/pm.red
M packages/pm/pmintrfc.red
M packages/pm/pmpatch.red
M packages/pm/pmrules.red
M packages/pm/pmrules2.red
M packages/pm/unify.red
M packages/poly/compopr.red
M packages/poly/conj.red
M packages/poly/cpxrn.red
M packages/poly/decompos.red
M packages/poly/diff.red
M packages/poly/dmode.red
M packages/poly/dmodeop.red
M packages/poly/exptf.red
M packages/poly/facform.red
M packages/poly/gcd.red
M packages/poly/gint.red
M packages/poly/heugcd.red
M packages/poly/homog.red
M packages/poly/horner.red
M packages/poly/interpol.red
M packages/poly/kernel.red
M packages/poly/kronf.red
M packages/poly/mksp.red
M packages/poly/modular.red
M packages/poly/polrep.red
M packages/poly/poly.red
M packages/poly/polydiv.red
M packages/poly/polyop.red
M packages/poly/primfac.red
M packages/poly/quotf.red
M packages/poly/rational.red
M packages/poly/reord.red
M packages/poly/rnelem.red
M packages/poly/specfac.red
M packages/poly/subs2q.red
M packages/poly/subs3q.red
M packages/poly/subs4q.red
M packages/poly/tdconv.red
M packages/qsum/qsum.red
M packages/rataprx/cfutil.red
M packages/rataprx/contfr.red
M packages/rataprx/contfrac.red
M packages/rataprx/decrep.red
M packages/rataprx/pade.red
M packages/rataprx/primitive.red
M packages/rataprx/rataprx.red
M packages/ratint/convert.red
M packages/ratint/ratint.red
M packages/redlog/ofsf/ofsfcadproj-redundant.red
M packages/redlog/ofsf/ofsfvslists-alists.red
M packages/reduce4/block4.red
M packages/reduce4/forall4.red
M packages/reduce4/form4.red
M packages/reduce4/forstat4.red
M packages/reduce4/matrix4.red
M packages/reduce4/package4.red
M packages/reduce4/proc4.red
M packages/reduce4/ranks.red
M packages/reduce4/rankstat.red
M packages/reduce4/reduce4.red
M packages/reduce4/reval4.red
M packages/reduce4/simp4.red
M packages/reduce4/struct4.red
M packages/reduce4/table1.red
M packages/reduce4/table2.red
M packages/reduce4/table3.red
M packages/reduce4/tables.red
M packages/reduce4/tower.red
M packages/residue/residue.red
M packages/rlisp/array.red
M packages/rlisp/block.red
M packages/rlisp/form.red
M packages/rlisp/forstat.red
M packages/rlisp/infix.red
M packages/rlisp/inter.red
M packages/rlisp/io.red
M packages/rlisp/list.red
M packages/rlisp/loops.red
M packages/rlisp/lpri.red
M packages/rlisp/mkset.red
M packages/rlisp/module.red
M packages/rlisp/newtok.red
M packages/rlisp/parser.red
M packages/rlisp/proc.red
M packages/rlisp/rintro-txt.red
M packages/rlisp/rlisp.red
M packages/rlisp/rsupport.red
M packages/rlisp/slfns.red
M packages/rlisp/statmisc.red
M packages/rlisp/superv.red
M packages/rlisp/switch.red
M packages/rlisp/tok.red
M packages/rlisp/unwanted-module-dist.red
M packages/rlisp/vector.red
M packages/rlisp/where.red
M packages/rlisp/xmodule.red
M packages/rlisp/xread.red
M packages/rlisp88/bquote.red
M packages/rlisp88/for88.red
M packages/rlisp88/inspect.red
M packages/rlisp88/loops88.red
M packages/rlisp88/mstruct.red
M packages/rlisp88/records.red
M packages/rlisp88/rlisp88.red
M packages/rlisp88/rvector.red
M packages/roots/allroot.red
M packages/roots/bfdoer.red
M packages/roots/bfdoer2.red
M packages/roots/complxp.red
M packages/roots/multroot.red
M packages/roots/nrstroot.red
M packages/roots/realroot.red
M packages/roots/rootaux.red
M packages/roots/roots.red
M packages/roots/roots2.red
M packages/rprint/fmprint.red
M packages/rprint/pretty.red
M packages/rprint/rprint.red
M packages/rtools/charname.red
M packages/rtools/general.red
M packages/rtools/genmod.red
M packages/rtools/pretty.red
M packages/rtools/random.red
M packages/rtools/rprintf.red
M packages/rtools/rtools.red
M packages/rtools/rtrace.red
M packages/rtools/smallmod.red
M packages/rtools/sort.red
M packages/rtrace/rdebug.red
M packages/rubi_red/rubi_parse.red
M packages/rubi_red/rubi_red.red
M packages/rubi_red/rubi_rules.red
M packages/scope/codad1.red
M packages/scope/codad2.red
M packages/scope/codctl.red
M packages/scope/coddec.red
M packages/scope/coddom.red
M packages/scope/codgen.red
M packages/scope/codhrn.red
M packages/scope/codmat.red
M packages/scope/codopt.red
M packages/scope/codpri.red
M packages/scope/codstr.red
M packages/scope/minlngth.red
M packages/scope/restore.red
M packages/scope/scope.red
M packages/solve/desir.red
M packages/solve/glsolve.red
M packages/solve/ineq.red
M packages/solve/linineq.red
M packages/solve/liqsimp1.red
M packages/solve/liqsimp2.red
M packages/solve/modroots.red
M packages/solve/modsolve.red
M packages/solve/modsqrt.red
M packages/solve/modsr.red
M packages/solve/nonlnr.red
M packages/solve/polineq.red
M packages/solve/ppsoln.red
M packages/solve/quartic.red
M packages/solve/rsolve.red
M packages/solve/solve.red
M packages/solve/solve1.red
M packages/solve/solvealg.red
M packages/solve/solvelnr.red
M packages/solve/solvetab.red
M packages/sparse/sparse.red
M packages/sparse/sparsmat.red
M packages/sparse/spchlsky.red
M packages/sparse/spgrmshm.red
M packages/sparse/splinalg.red
M packages/sparse/spludcmp.red
M packages/sparse/spmateig.red
M packages/sparse/spsvd.red
M packages/spde/spde.red
M packages/specfn/constre.red
M packages/specfn/dilog.red
M packages/specfn/fps.red
M packages/specfn/ghyper.red
M packages/specfn/harmonic.red
M packages/specfn/hgrsolve.red
M packages/specfn/jsymbols.red
M packages/specfn/linrec.red
M packages/specfn/meijerg.red
M packages/specfn/ratalgo.red
M packages/specfn/recsimpl.red
M packages/specfn/sfairy.red
M packages/specfn/sfbdata.red
M packages/specfn/sfbern.red
M packages/specfn/sfbes.red
M packages/specfn/sfbinom.red
M packages/specfn/sfconsts.red
M packages/specfn/sfellip.red
M packages/specfn/sfellipi.red
M packages/specfn/sfgamm.red
M packages/specfn/sfgamma.red
M packages/specfn/sfgen.red
M packages/specfn/sfigamma.red
M packages/specfn/sfint.red
M packages/specfn/sfkummer.red
M packages/specfn/sfother.red
M packages/specfn/sfpolys.red
M packages/specfn/sfpsi.red
M packages/specfn/sfrules.red
M packages/specfn/sfsums.red
M packages/specfn/sftheta.red
M packages/specfn/sfweier.red
M packages/specfn/simpfact.red
M packages/specfn/simplede.red
M packages/specfn/specbess.red
M packages/specfn/specfaux.red
M packages/specfn/specfn.red
M packages/specfn/specfn2.red
M packages/specfn/substexp.red
M packages/sstools/sstools.red
M packages/sum/complx.red
M packages/sum/prod.red
M packages/sum/sum.red
M packages/sum/sum2.red
M packages/sum/zeilberg.red
M packages/support/autopatch.red
M packages/support/build.red
M packages/support/clrend.red
M packages/support/compat.red
M packages/support/csl.red
M packages/support/cslprolo.red
M packages/support/entry.red
M packages/support/fastmath.red
M packages/support/fastmod.red
M packages/support/patches.red
M packages/support/psl.red
M packages/support/pslprolo.red
M packages/support/pslrend.red
M packages/support/remake.red
M packages/support/revision.red
M packages/support/smacros.red
M packages/support/smacros0.red
M packages/support/support.red
M packages/susy2/susy2.red
M packages/symmetry/symatvec.red
M packages/symmetry/symaux.red
M packages/symmetry/symcheck.red
M packages/symmetry/symchrep.red
M packages/symmetry/symdata1.red
M packages/symmetry/symdata2.red
M packages/symmetry/symhandl.red
M packages/symmetry/symmetry.red
M packages/symmetry/sympatch.red
M packages/symmetry/symwork.red
M packages/taylor/taybasic.red
M packages/taylor/tayconv.red
M packages/taylor/taydiff.red
M packages/taylor/tayexpnd.red
M packages/taylor/tayfns.red
M packages/taylor/tayfront.red
M packages/taylor/taygamma.red
M packages/taylor/tayimpl.red
M packages/taylor/tayintrf.red
M packages/taylor/tayintro.red
M packages/taylor/taylor.red
M packages/taylor/taypart.red
M packages/taylor/tayprint.red
M packages/taylor/tayrevrt.red
M packages/taylor/taysimp.red
M packages/taylor/taysubst.red
M packages/taylor/tayutils.red
M packages/tps/tps.red
M packages/tps/tpscomp.red
M packages/tps/tpsconv.red
M packages/tps/tpsdom.red
M packages/tps/tpseval.red
M packages/tps/tpsfns.red
M packages/tps/tpsmisc.red
M packages/tps/tpsrev.red
M packages/tps/tpssum.red
M packages/tri/tri.red
M packages/trigint/trigint.red
M packages/trigsimp/otrgsimp.red
M packages/trigsimp/otrgsmp1.red
M packages/trigsimp/otrgsmp2.red
M packages/trigsimp/trigsimp.red
M packages/trigsimp/trigsmp1.red
M packages/trigsimp/trigsmp2.red
M packages/utf8/utf8.red
M packages/vas/vas.red
M packages/wu/wu.red
M packages/xcolor/cface.red
M packages/xcolor/xcolor.red
M packages/xideal/xaux.red
M packages/xideal/xcrit.red
M packages/xideal/xexcalc.red
M packages/xideal/xgroeb.red
M packages/xideal/xideal.red
M packages/xideal/xpowers.red
M packages/xideal/xreduct.red
M packages/xideal/xstorage.red
M packages/ztrans/ztrans.red
M packages/ztrans/ztrrules.red
M scripts/test1.sh
M scripts/testall.sh
M web/htdocs/web-reduce/DerivativeTemplate.inc
M web/htdocs/web-reduce/ExpLogFunctions.inc
A web/htdocs/web-reduce/GammaEtcFunctions.inc
M web/htdocs/web-reduce/IntegralTemplate.inc
M web/htdocs/web-reduce/README.md
M web/htdocs/web-reduce/UserGuide.php
M web/htdocs/web-reduce/about.php
M web/htdocs/web-reduce/index.php
M csl/cslbase/bytes2.cpp => csl/cslbase/bytes2.cpp +16 -9
@@ 1631,7 1631,7 @@ next_opcode:   // This label is so that I can restart what I am doing
// single operand byte.  Cases where the offset does not fit into this
// will go via BIGCALL.
// Note that the argument count can only ever be 0, 1, 2, 3 or 4, so
// codes 5, 6 and 7 ar enot used. Hmmm I could provide a JCALL2R option
// codes 5, 6 and 7 are not used. Hmmm I could provide a JCALL2R option
// if I wanted!
                w = next_byte;
                fname = w & 0x1f;


@@ 1676,8 1676,15 @@ next_opcode:   // This label is so that I can restart what I am doing
                    stack = entry_stack;
                    ppc = BPS_DATA_OFFSET;
#ifndef NO_BYTECOUNT
                    incCount(basic_elt(litvec, 0),
                             profile_count_mode ? 1 : 10);
// Here I treat this in the statistics as a single increment of the
// counter whether I am counting just function entries or the total
// number of bytes executed. Well it is a little more complicated than
// that. If this is a "JCALL self" and I am only counting function entries
// then I will not increment the count, because this just counts as a jump
// back to the top of the current procedure. However a JCALL to any other
// function will be counted.
                    if (!profile_count_mode || fname != 0)
                        incCount(basic_elt(litvec, 0));
#endif
                    continue;
                }


@@ 1721,8 1728,8 @@ next_opcode:   // This label is so that I can restart what I am doing
                    *++stack = A_reg;
                    ppc = BPS_DATA_OFFSET;
#ifndef NO_BYTECOUNT
                    incCount(basic_elt(litvec, 0),
                             profile_count_mode ? 1 : 10);
                    if (!profile_count_mode || fname != 0)
                      incCount(basic_elt(litvec, 0));
#endif
                    continue;
                }


@@ 1766,8 1773,8 @@ next_opcode:   // This label is so that I can restart what I am doing
                    *++stack = B_reg; *++stack = A_reg;
                    ppc = BPS_DATA_OFFSET;
#ifndef NO_BYTECOUNT
                    incCount(basic_elt(litvec, 0),
                             profile_count_mode ? 1 : 10);
                    if (!profile_count_mode || fname != 0)
                        incCount(basic_elt(litvec, 0));
#endif
                    continue;
                }


@@ 1811,8 1818,8 @@ next_opcode:   // This label is so that I can restart what I am doing
                    *++stack = r2; *++stack = B_reg; *++stack = A_reg;
                    ppc = BPS_DATA_OFFSET;
#ifndef NO_BYTECOUNT
                    incCount(basic_elt(litvec, 0),
                             profile_count_mode ? 1 : 10);
                    if (!profile_count_mode || fname != 0)
                        incCount(basic_elt(litvec, 0));
#endif
                    continue;
                }

M csl/cslbase/version.h => csl/cslbase/version.h +1 -1
@@ 39,7 39,7 @@
// (scripts/commit.sh) that is used to update the subversion repository to
// update the revision number here.

#define REVISION 5870
#define REVISION 5872

#endif // header_version_h


M packages/alg/alg-form.red => packages/alg/alg-form.red +1 -0
@@ 27,6 27,7 @@ module alg!-form;   % Some particular algebraic mode analysis functions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(inputbuflis!* resultbuflis!* ws);


M packages/alg/alg.red => packages/alg/alg.red +1 -0
@@ 25,6 25,7 @@ module alg;  % Header module for alg package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(alg alg!-form intro lifted farith numsup zfactor
                  reval algbool simp exptchk simplog logsort sub

M packages/alg/algbool.red => packages/alg/algbool.red +1 -0
@@ 27,6 27,7 @@ module algbool; % Evaluation functions for algebraic boolean operators.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

symbolic procedure evalequal(u,v);
   begin scalar x;

M packages/alg/algdcl.red => packages/alg/algdcl.red +1 -0
@@ 27,6 27,7 @@ module algdcl;  % Various declarations.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(preclis!* ws);


M packages/alg/coeff.red => packages/alg/coeff.red +1 -0
@@ 29,6 29,7 @@ module coeff;  % Routines for finding coefficients of forms.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*ratarg);


M packages/alg/depend.red => packages/alg/depend.red +1 -0
@@ 28,6 28,7 @@ module depend; % Defining and checking expression dependency.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(alglist!* depl!* frlis!*);


M packages/alg/elem.red => packages/alg/elem.red +1 -0
@@ 28,6 28,7 @@ module elem; % Simplification rules for elementary functions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*!*sqrt !*complex !*keepsqrts !*precise !*precise_complex
        !*rounded dmode!* !*elem!-inherit);

M packages/alg/eqn.red => packages/alg/eqn.red +1 -0
@@ 27,6 27,7 @@ module eqn;   % Support for equations as top level structures.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% At the moment "EQUAL" is the tag for such structures.


M packages/alg/exptchk.red => packages/alg/exptchk.red +1 -0
@@ 27,6 27,7 @@ module exptchk;   % Check expt products for further simplification.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*combineexpt);


M packages/alg/extout.red => packages/alg/extout.red +1 -0
@@ 27,6 27,7 @@ module extout; % Extended output package for expressions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*allfac !*div !*mcd !*noequiv !*pri !*rat factors!* kord!*
  !*combinelogs wtl!*);

M packages/alg/fac.red => packages/alg/fac.red +1 -0
@@ 25,6 25,7 @@ module fac;  % Support "factor" as an operator.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(!*micro!-version);


M packages/alg/farith.red => packages/alg/farith.red +1 -0
@@ 25,6 25,7 @@ module farith;  % Operators for fast arithmetic.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

symbolic procedure iplus2(u,v); u+v;


M packages/alg/forall.red => packages/alg/forall.red +1 -0
@@ 28,6 28,7 @@ module forall; % FOR ALL and LET-related commands.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*resimp !*sub2 alglist!* arbl!* asymplis!* frasc!* wtl!*);


M packages/alg/gcdchk.red => packages/alg/gcdchk.red +1 -0
@@ 25,6 25,7 @@ module gcdchk;   % Check for a unit gcd using modular arithmetic.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Modifications by: Anthony C. Hearn.


M packages/alg/general.red => packages/alg/general.red +1 -0
@@ 27,6 27,7 @@ module general;   % General functions for the support of REDUCE.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(!!arbint);


M packages/alg/intro.red => packages/alg/intro.red +1 -0
@@ 27,6 27,7 @@ module intro;  % Introductory material for algebraic mode.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*cref !*exp !*factor !*fort !*ifactor !*intstr !*lcm !*mcd
        !*msg !*mode !*nat !*nero !*period !*precise !*pri !*protfg

M packages/alg/lifted.red => packages/alg/lifted.red +2 -0
@@ 27,6 27,8 @@ module lifted;   % Functions previously defined in multiple modules
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% In earlier versions of Reduce there were various functions where the
% definition were replicated in several places. When these are pure
% duplicates it seems good to lift the definitions to here so that they

M packages/alg/linop.red => packages/alg/linop.red +1 -0
@@ 27,6 27,7 @@ module linop; % Linear operator package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*intstr);


M packages/alg/logsort.red => packages/alg/logsort.red +1 -0
@@ 25,6 25,7 @@ module logsort;  % Combine sums of logs.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(domainlist!*);


M packages/alg/map.red => packages/alg/map.red +1 -0
@@ 25,6 25,7 @@ module map;  % Mapping univariate functions to composite objects.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Syntax: map(unary-function,linear-structure-or-matrix)
%

M packages/alg/maxmin.red => packages/alg/maxmin.red +1 -0
@@ 25,6 25,7 @@ module maxmin;  % Support for generalized MAX and MIN.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Provide support for the MAX and MIN functions to allow:-
%     any number domain;

M packages/alg/mkgroup.red => packages/alg/mkgroup.red +3 -0
@@ 1,3 1,4 @@
% alg/mkgroup.red

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:


@@ 22,6 23,8 @@
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

symbolic procedure mkgroup;
   %Expects a list of statements terminated by a >>;
   begin scalar lst,delim;

M packages/alg/nestrad.red => packages/alg/nestrad.red +1 -0
@@ 25,6 25,7 @@ module nestrad; % Simplify nested square roots.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Modifications by: A. C. Hearn:


M packages/alg/nssimp.red => packages/alg/nssimp.red +1 -0
@@ 27,6 27,7 @@ module nssimp;  % Simplification functions for non-scalar quantities.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*div frlis!* subfg!*);


M packages/alg/numsup.red => packages/alg/numsup.red +1 -0
@@ 27,6 27,7 @@ module numsup;   % Numerical support for basic algebra package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%  Numerical greatest common divisor.


M packages/alg/opmtch.red => packages/alg/opmtch.red +1 -0
@@ 28,6 28,7 @@ module opmtch; % Functions that apply basic pattern matching rules.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*uncached frlis!* matchlength!* subfg!*);


M packages/alg/order.red => packages/alg/order.red +1 -0
@@ 27,6 27,7 @@ module order; % Functions for internal ordering of expressions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(kord!*);
global '(!*physop!-loaded);

M packages/alg/part.red => packages/alg/part.red +1 -0
@@ 27,6 27,7 @@ module part;  % Access and updates parts of an algebraic expression.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*intstr);


M packages/alg/prep.red => packages/alg/prep.red +1 -0
@@ 27,6 27,7 @@ module prep; % Functions for converting canon. forms into prefix forms.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*bool !*intstr);


M packages/alg/reval.red => packages/alg/reval.red +1 -0
@@ 27,6 27,7 @@ module reval; % Functions for algebraic evaluation of prefix forms.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*combineexpt !*exp !*intstr !*listargs !*mcd !*resimp alglist!*
        dmode!* subfg!* varstack!* frlis!*);

M packages/alg/rmsubs.red => packages/alg/rmsubs.red +1 -0
@@ 27,6 27,7 @@ module rmsubs;   % Remove system wide standard quotient substitutions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(alglist!*);


M packages/alg/showrule.red => packages/alg/showrule.red +1 -2
@@ 26,11 26,10 @@ module showrule; % Display rules for an operator.
% POSSIBILITY OF SUCH DAMAGE.
%


% Modified by: Francis J. Wright <F.J.Wright@Maths.QMW.ac.uk>
% Time-stamp: <10 November 1998>

% $Id: showrule.red 1.2 1998-11-10 08:33:09+00 fjw Exp $
% $Id$

global '(!*match);


M packages/alg/simp.red => packages/alg/simp.red +1 -0
@@ 30,6 30,7 @@ module simp; % Functions to convert prefix forms into canonical forms.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*allfac !*div);


M packages/alg/simplog.red => packages/alg/simplog.red +1 -0
@@ 25,6 25,7 @@ module simplog;  % Simplify logarithms.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*intflag!* !*noneglogs !*expandlogs);


M packages/alg/simptrig.red => packages/alg/simptrig.red +5 -3
@@ 1,6 1,6 @@
module simptrig; % Simplification for trigonometric and hyperbolic functions.

% Author: Alan Barnes, Rainer Sch�pf, Eberhard Schruefer and others.
% Author: Alan Barnes, Rainer Schvpf, Eberhard Schruefer and others.

% Copyright (c) 2015 Reduce developers



@@ 27,9 27,11 @@ module simptrig; % Simplification for trigonometric and hyperbolic functions.
% POSSIBILITY OF SUCH DAMAGE.
%

comment First attempt to define simplification functions for trigonometric functions;
% $Id$

comment remove the rules replaced by simpfn ;
% First attempt to define simplification functions for trigonometric functions.

% remove the rules replaced by simpfn ;

algebraic;


M packages/alg/spcfnint.red => packages/alg/spcfnint.red +1 -0
@@ 25,6 25,7 @@ module spcfnint; % Simplification rules for special functions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

symbolic;


M packages/alg/str.red => packages/alg/str.red +1 -0
@@ 27,6 27,7 @@ module str;  % Routines for structuring expressions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*fort !*nat !*savestructr scountr svar svarlis);


M packages/alg/sub.red => packages/alg/sub.red +1 -0
@@ 27,6 27,7 @@ module sub; % Functions for substituting in standard forms.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*nosqrts asymplis!* dmode!* errmsg!* ncmp!* sublist!* wtl!*);


M packages/alg/weight.red => packages/alg/weight.red +1 -0
@@ 27,6 27,7 @@ module weight; % Asymptotic command package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Modified by F.J. Wright@Maths.QMW.ac.uk, 18 May 1994,
% mainly to return the previous settings rather than nothing.

M packages/alg/zfactor.red => packages/alg/zfactor.red +1 -0
@@ 27,6 27,7 @@ module zfactor;  % Integer factorization.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

exports nextprime, primep, zfactor, zfactor1, nrootnn;


M packages/algint/abasic.red => packages/algint/abasic.red +1 -0
@@ 25,6 25,7 @@ module abasic;   % Basic definitions for algebraic function integrator.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Modifications by: Anthony C. Hearn.


M packages/algint/afactor.red => packages/algint/afactor.red +1 -0
@@ 25,6 25,7 @@ module afactor;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*galois !*noextend !*sqfree !*trfield afactorvar listofnewsqrts
        monicpart varlist zlist sqrtlist sqrtflag indexlist);

M packages/algint/algfn.red => packages/algint/algfn.red +1 -0
@@ 25,6 25,7 @@ module algfn;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Check if an expression is in a pure algebraic extension of
% Q(all "constants")(var).

M packages/algint/algint.red => packages/algint/algint.red +1 -0
@@ 25,6 25,7 @@ module algint; % Header for REDUCE algebraic integration package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(algint afactor algfn antisubs coates coatesid findmagc
                  findres finitise fixsubf fracdi genus intbasis jhddiff

M packages/algint/algnums.red => packages/algint/algnums.red +1 -0
@@ 25,6 25,7 @@ module algnums;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

exports denr!-algno;


M packages/algint/antisubs.red => packages/algint/antisubs.red +1 -0
@@ 25,6 25,7 @@ module antisubs;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

exports antisubs;


M packages/algint/coates.red => packages/algint/coates.red +1 -0
@@ 25,6 25,7 @@ module coates;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra !*trmin !*galois intvar magiclist nestedsqrts
        previousbasis sqrt!-intvar taylorasslist thisplace

M packages/algint/coatesid.red => packages/algint/coatesid.red +1 -0
@@ 25,6 25,7 @@ module coatesid;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra intvar magiclist taylorasslist taylorvariable);


M packages/algint/findmagc.red => packages/algint/findmagc.red +1 -0
@@ 25,6 25,7 @@ module findmagc;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra magiclist);


M packages/algint/findres.red => packages/algint/findres.red +1 -0
@@ 25,6 25,7 @@ module findres;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*gcd
        !*tra

M packages/algint/finitise.red => packages/algint/finitise.red +1 -0
@@ 25,6 25,7 @@ module finitise;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra intvar);


M packages/algint/fixsubf.red => packages/algint/fixsubf.red +1 -0
@@ 25,6 25,7 @@ module fixsubf;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*nosubs asymplis!* dmode!* ncmp!*);


M packages/algint/fracdi.red => packages/algint/fracdi.red +1 -0
@@ 25,6 25,7 @@ module fracdi;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(basic!-listofallsqrts basic!-listofnewsqrts expsub intvar
    sqrt!-intvar);

M packages/algint/genus.red => packages/algint/genus.red +1 -0
@@ 25,6 25,7 @@ module genus;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*galois
        !*tra

M packages/algint/hidden.red => packages/algint/hidden.red +1 -0
@@ 25,6 25,7 @@ module hidden;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*trint
        !*trjhd

M packages/algint/intbasis.red => packages/algint/intbasis.red +1 -0
@@ 25,6 25,7 @@ module intbasis;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra !*trmin excoatespoles intvar previousbasis taylorasslist
        taylorvariable);

M packages/algint/inttaylr.red => packages/algint/inttaylr.red +1 -0
@@ 25,6 25,7 @@ module inttaylr;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(const taylorasslist taylorvariable);


M packages/algint/jhddiff.red => packages/algint/jhddiff.red +1 -0
@@ 25,6 25,7 @@ module jhddiff;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Differentiation routines for algebraic expressions;
symbolic procedure !*diffsq(u,v);

M packages/algint/jhdriver.red => packages/algint/jhdriver.red +1 -0
@@ 25,6 25,7 @@ module jhdriver;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*algint
    !*backtrace

M packages/algint/linrel.red => packages/algint/linrel.red +1 -0
@@ 25,6 25,7 @@ module linrel;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

symbolic procedure firstlinearrelation(m,n);
% Returns vector giving first linear relation between

M packages/algint/log2atan.red => packages/algint/log2atan.red +1 -0
@@ 25,6 25,7 @@ module log2atan;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Modified by:  Anthony C. Hearn.


M packages/algint/maninp.red => packages/algint/maninp.red +1 -0
@@ 25,6 25,7 @@ module maninp;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(intvar);


M packages/algint/modify.red => packages/algint/modify.red +1 -0
@@ 25,6 25,7 @@ module modify;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra intvar);


M packages/algint/modlineq.red => packages/algint/modlineq.red +1 -0
@@ 25,6 25,7 @@ module modlineq;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra !*trmin current!-modulus sqrts!-mod!-prime);


M packages/algint/nagell.red => packages/algint/nagell.red +1 -0
@@ 25,6 25,7 @@ module nagell;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra !*trmin intvar);


M packages/algint/nbasis.red => packages/algint/nbasis.red +1 -0
@@ 25,6 25,7 @@ module nbasis;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra nestedsqrts sqrt!-intvar taylorasslist);


M packages/algint/phantoms.red => packages/algint/phantoms.red +1 -0
@@ 25,6 25,7 @@ module phantoms;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*trint cancellationlist inequalitystack lhs magiclist nindex
        termsused);

M packages/algint/places.red => packages/algint/places.red +26 -1
@@ 1,6 1,31 @@
module places;

% Author: James H. Davenport.
% Author: James H Davenport

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(basic!-listofallsqrts
        basic!-listofnewsqrts

M packages/algint/precoats.red => packages/algint/precoats.red +1 -0
@@ 25,6 25,7 @@ module precoats;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra
        basic!-listofallsqrts

M packages/algint/primes.red => packages/algint/primes.red +1 -0
@@ 25,6 25,7 @@ module primes;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% exports nextprime,jhd!-primep;
% JHD!-PRIMEP replaced by the primep from "module zfactor" 8.Sept.1988

M packages/algint/removecm.red => packages/algint/removecm.red +1 -0
@@ 25,6 25,7 @@ module removecm;  % Routines to remove constant factors from expresions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(intvar);


M packages/algint/sqfrnorm.red => packages/algint/sqfrnorm.red +1 -0
@@ 25,6 25,7 @@ module sqfrnorm;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*pvar listofallsqrts);


M packages/algint/substns.red => packages/algint/substns.red +1 -0
@@ 25,6 25,7 @@ module substns;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

exports xsubstitutep,xsubstitutesq,substitutevec,substitutesq,subzero,
        subzero2,pvarsub;

M packages/algint/torsionb.red => packages/algint/torsionb.red +1 -0
@@ 25,6 25,7 @@ module torsionb;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*tra !*trmin intvar nestedsqrts);


M packages/algint/wstrass.red => packages/algint/wstrass.red +1 -0
@@ 25,6 25,7 @@ module wstrass;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*exp
        !*gcd

M packages/algint/zmodule.red => packages/algint/zmodule.red +1 -0
@@ 25,6 25,7 @@ module zmodule;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*galois
        !*tra

M packages/arith/arith.red => packages/arith/arith.red +1 -0
@@ 23,6 23,7 @@ module arith;  % Header module for real arith package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Last updated Dec 14, 1992


M packages/arith/bfauxil.red => packages/arith/bfauxil.red +1 -0
@@ 29,6 29,7 @@ module bfauxil; % Support for the roots package and ROUNDED domain.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT   support for modules allroot and isoroot, and for ROUNDED
 domain logic;

M packages/arith/bfelem.red => packages/arith/bfelem.red +1 -0
@@ 27,6 27,7 @@ module bfelem;  % Bigfloat elementary constants and functions.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Modifications by: Anthony C. Hearn, Jed B. Marti, Stanley L. Kameny.
% Changed for binary arithmetic by Iain Beckingham and Rainer M. Schoepf

M packages/arith/comprd.red => packages/arith/comprd.red +1 -0
@@ 29,6 29,7 @@ module comprd; % *** Support for Complex Rounded Arithmetic.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT this module defines a complex rounded as:


M packages/arith/crelem.red => packages/arith/crelem.red +2 -0
@@ 23,6 23,8 @@ module crelem; % Complex elementary functions for complex rounded.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

imports !*rd2cr, bflessp, bfminusp, cr!:differ, cr!:minus, cr!:plus,
        cr!:quotient, cr!:times, cr!:zerop, cr2i!*, crhalf!*, cri!*,
        cri!/2, crprcd, crrl, deg2rad!*, gf2cr!:, gfsqrt, i2cr!*,

M packages/arith/load.red => packages/arith/load.red +2 -0
@@ 22,6 22,8 @@
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

on comp;

off usermode;

M packages/arith/math.red => packages/arith/math.red +1 -0
@@ 33,6 33,7 @@ module math;  % Mathematical Package for REDUCE.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%*******************************************************************
%**                                                               **

M packages/arith/paraset.red => packages/arith/paraset.red +1 -0
@@ 25,6 25,7 @@ module paraset;   % Parameter determining module.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Last change date: 25 June 2015.


M packages/arith/rdelem.red => packages/arith/rdelem.red +1 -0
@@ 23,6 23,7 @@ module rdelem;  % Elementary functions in rounded domain.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

exports deg2rad!*, quotient!:, rad2deg!*, rdacos!*, rdacosd!*,
        rdacosh!*, rdacot!*, rdacotd!*, rdacoth!*, rdacsc!*, rdacscd!*,

M packages/arith/rounded.red => packages/arith/rounded.red +1 -0
@@ 29,6 29,7 @@ module rounded; % *** Support for Arbitrary Rounded Arithmetic.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT this module defines a rounded object as a list with two fields:


M packages/arith/smlbflot.red => packages/arith/smlbflot.red +1 -0
@@ 30,6 30,7 @@ module smlbflot;   % Basic support for bigfloat arithmetic.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Last change made Oct 6, 1999.


M packages/arnum/arinv.red => packages/arnum/arinv.red +1 -0
@@ 25,6 25,7 @@ module arinv;   % Routines for inversion of algebraic numbers.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(dmode!*);


M packages/arnum/arnum.red => packages/arnum/arnum.red +1 -0
@@ 25,6 25,7 @@ module arnum;  % Support for algebraic rationals.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(arnum arinv),'(contrib arnum));


M packages/arnum/bath.red => packages/arnum/bath.red +2 -0
@@ 31,6 31,8 @@
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

this is a short guide to the installation and use of the algebraic number
package.  some familiarity with terms from galois Theory is assumed as is
familiarity with reduce. the routines were developed under reduce 3.1 and

M packages/assert/assert.red => packages/assert/assert.red +2 -2
@@ 1,8 1,6 @@
module assert;

% ----------------------------------------------------------------------
% $Id$
% ----------------------------------------------------------------------
% Copyright (c) 2010-2017 T. Sturm
% ----------------------------------------------------------------------
% Redistribution and use in source and binary forms, with or without


@@ 30,6 28,8 @@ module assert;
% OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(assert assertcheckfn assertproc),nil);

fluid '(assert_functionl!*);

M packages/assist/assist.red => packages/assist/assist.red +1 -0
@@ 23,6 23,7 @@ module assist; % Header Module valid for REDUCE versions from 3.5 to 3.7.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(assist sl2psl switchxt baglist hcvctors genpurfn
                  control polyexns transfns vectorop grassman matrext

M packages/assist/auxitens.red => packages/assist/auxitens.red +1 -0
@@ 23,6 23,7 @@ module auxitens;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% this module introduces basic manipulation functions
% for handling indices and tensor structure

M packages/assist/backtrck.red => packages/assist/backtrck.red +1 -0
@@ 23,6 23,7 @@ module backtrck;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(g_skip_to_level);


M packages/assist/baglist.red => packages/assist/baglist.red +1 -0
@@ 23,6 23,7 @@ module baglist$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global('(!:flaglis !:proplis));


M packages/assist/cantens.red => packages/assist/cantens.red +1 -0
@@ 23,6 23,7 @@ module cantens; % header module tested for REDUCE 3.6 and 3.7.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(cantens ctintro auxitens gentens spaces
                   partitns checkind opertens contrtns),

M packages/assist/checkind.red => packages/assist/checkind.red +1 -0
@@ 23,6 23,7 @@ module checkind;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% This modules contains procedures to detect indices,
% check the coherence (variance) of expressions (sum), (free indices)

M packages/assist/control.red => packages/assist/control.red +1 -0
@@ 23,6 23,7 @@ module control;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*revpri);


M packages/assist/contrtns.red => packages/assist/contrtns.red +1 -0
@@ 23,6 23,7 @@ module contrtns;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(dimex!* sgn!*  signat!* spaces!* numindxl!* pair_id_num!*) ;


M packages/assist/ctintro.red => packages/assist/ctintro.red +1 -0
@@ 23,6 23,7 @@ module ctintro;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid('(dummy_id!* g_dvnames));


M packages/assist/dummy.red => packages/assist/dummy.red +1 -0
@@ 23,6 23,7 @@ module dummy; % Header Module for REDUCE versions from 3.5 to 3.7.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(dummy perms backtrck dummycnt),'(contrib assist));


M packages/assist/dummycnt.red => packages/assist/dummycnt.red +1 -0
@@ 23,6 23,7 @@ module dummycnt;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(g_dvnames g_dvbase g_sc_ve g_init_stree g_skip_to_level
        !*distribute);

M packages/assist/genpurfn.red => packages/assist/genpurfn.red +1 -0
@@ 23,6 23,7 @@ module genpurfn;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

inline procedure be_last u;
delete(lastcar u, u);

M packages/assist/gentens.red => packages/assist/gentens.red +1 -0
@@ 23,6 23,7 @@ module gentens;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% This module defines the characteristics of 'generic' tensors.
% 'generic' means: any nimbers of indices, no transformation

M packages/assist/grassman.red => packages/assist/grassman.red +1 -0
@@ 23,6 23,7 @@ module grassman;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% fichier de manipulation des variables de Grassmann.
% RATIONAL functions involving Grasman variables inside the

M packages/assist/hcvctors.red => packages/assist/hcvctors.red +1 -0
@@ 23,6 23,7 @@ module hcvctors;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% The following set of symbolic procedures allow to manipulate
% indices of vectors in the same way as for lists. Coercion from array

M packages/assist/helpasst.red => packages/assist/helpasst.red +1 -0
@@ 23,6 23,7 @@ module helpasst;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

algebraic procedure assist();
<<write " Argument of ASSISTHELP must be an integer between 3 and 14. ";

M packages/assist/matrext.red => packages/assist/matrext.red +1 -0
@@ 23,6 23,7 @@ module matrext;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% This module defines additional utility functions for manipulating
% matrices.  Coercions to BAG and LIST structures are defined.

M packages/assist/opertens.red => packages/assist/opertens.red +1 -0
@@ 23,6 23,7 @@ module opertens;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% This module generalizes CANONICAL to make it active
% on expressions which are arguments of OPERATORS. The typical

M packages/assist/partitns.red => packages/assist/partitns.red +1 -0
@@ 23,6 23,7 @@ module partitns;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% definitions of particular tensors.


M packages/assist/perms.red => packages/assist/perms.red +1 -0
@@ 23,6 23,7 @@ module perms;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% returns product of two permutations


M packages/assist/polyexns.red => packages/assist/polyexns.red +1 -0
@@ 23,6 23,7 @@ module polyexns;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Additional functions which manipulate polynomials.


M packages/assist/sl2psl.red => packages/assist/sl2psl.red +1 -0
@@ 23,6 23,7 @@ module sl2psl; % Definitions of functions in PSL but not SL.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% Some of these are already in the standard REDUCE now.


M packages/assist/spaces.red => packages/assist/spaces.red +1 -0
@@ 24,6 24,7 @@ module spaces; % definition and general properties
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

lisp remflag(list 'minus,'intfn);


M packages/assist/switchxt.red => packages/assist/switchxt.red +1 -0
@@ 23,6 23,7 @@ module switchxt;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

switch distribute;


M packages/assist/transfns.red => packages/assist/transfns.red +1 -0
@@ 23,6 23,7 @@ module transfns;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

algebraic;


M packages/assist/vectorop.red => packages/assist/vectorop.red +1 -0
@@ 23,6 23,7 @@ module vectorop;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% This small module makes basic operation between EXPLICIT
% vectors available. They are assumed to be represented by

M packages/atensor/atensor.red => packages/atensor/atensor.red +1 -0
@@ 23,6 23,7 @@ module atensor; % Header module for atensor package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%======================================================
%       Author:         A.Kryukov (kryukov@theory.npi.msu.su)

M packages/atensor/basis.red => packages/atensor/basis.red +1 -0
@@ 41,6 41,7 @@ module basis$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%===================================
% basis ::= (v1 v2 ...)

M packages/atensor/dummy1.red => packages/atensor/dummy1.red +1 -0
@@ 31,6 31,7 @@ module dummy1$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(!*basis)$


M packages/atensor/dummy2.red => packages/atensor/dummy2.red +1 -0
@@ 33,6 33,7 @@ module dummy2$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(!*basis); fluid '(!*debug)$


M packages/atensor/perm1.red => packages/atensor/perm1.red +1 -0
@@ 32,6 32,7 @@ module perm1$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(!*ppacked)$
!*ppacked:=t$

M packages/atensor/pvector.red => packages/atensor/pvector.red +1 -0
@@ 39,6 39,7 @@ module pvector$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%       p-vector is a list of b-vectors.
%       b-vector is a <coeff> . <permutation>.

M packages/atensor/tensor.red => packages/atensor/tensor.red +1 -0
@@ 35,6 35,7 @@ module tensor$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

fluid '(!*debug)$
switch debug$

M packages/atensor/tensor1.red => packages/atensor/tensor1.red +1 -0
@@ 34,6 34,7 @@ module tensor1$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(!*basis)$
global '(pv_den)$

M packages/atensor/tensorio.red => packages/atensor/tensorio.red +1 -0
@@ 34,6 34,7 @@ module tensorio$
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%=====================================================
%       blist::=((th . pv_list) ...)

M packages/avector/avector.red => packages/avector/avector.red +1 -0
@@ 23,6 23,7 @@ module avector;   % Vector algebra and calculus package.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(avector),'(contrib avector));


M packages/bibasis/bibasis.red => packages/bibasis/bibasis.red +1 -0
@@ 33,6 33,7 @@ module bibasis; % Comput boolean involutive basis of polynomial ideal.
% POSSIBILITY OF SUCH DAMAGE.

create!-package('(bibasis bibasis_monom bibasis_polynom
% $Id$
                  bibasis_triple bibasis_janet_tree bibasis_qset
                  bibasis_tset bibasis_involutive bibasis_interface), 
                nil);

M packages/bibasis/bibasis_interface.red => packages/bibasis/bibasis_interface.red +1 -0
@@ 33,6 33,7 @@ module bibasis_interface;
% POSSIBILITY OF SUCH DAMAGE.


% $Id$
inline procedure mk_sq(a); list('!*sq, a, t);



M packages/bibasis/bibasis_involutive.red => packages/bibasis/bibasis_involutive.red +1 -0
@@ 32,6 32,7 @@ module bibasis_involutive;
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAG

% $Id$

expr procedure init();
begin integer i;

M packages/bibasis/bibasis_janet_tree.red => packages/bibasis/bibasis_janet_tree.red +3 -1
@@ 30,9 30,11 @@ module bibasis_janet_tree;
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAG
% POSSIBILITY OF SUCH DAMAGE.


% $Id$

%----------------------------------------------------------------------------
% JanetTreeNode = (degree . triple) . (nextdeg . nextvar)
%   integer   degree

M packages/bibasis/bibasis_monom.red => packages/bibasis/bibasis_monom.red +1 -0
@@ 33,6 33,7 @@ module bibasis_monom;
% POSSIBILITY OF SUCH DAMAGE.


% $Id$
inline procedure bibasis_insert(y, x); rplaca(rplacd(y, car(y) . cdr(y)), x);
inline procedure bibasis_remove(y); rplacd(rplaca(y, cadr(y)), cddr(y));


M packages/bibasis/bibasis_polynom.red => packages/bibasis/bibasis_polynom.red +1 -0
@@ 33,6 33,7 @@ module bibasis_polynom;
% POSSIBILITY OF SUCH DAMAGE.


% $Id$
%----------------------------------------------------------------------------
% poly k_1 + ... k_n = k_1 . ... . k_n . (nil . nil)


M packages/bibasis/bibasis_qset.red => packages/bibasis/bibasis_qset.red +3 -1
@@ 30,7 30,9 @@ module bibasis_qset;
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAG
% POSSIBILITY OF SUCH DAMAGE.

% $Id$

%----------------------------------------------------------------------------
% Q = triple_1 . ... . triple_n . (nil . nil) and triple_i <= triple_(i+1)

M packages/bibasis/bibasis_triple.red => packages/bibasis/bibasis_triple.red +3 -1
@@ 30,7 30,9 @@ module bibasis_triple;
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAG
% POSSIBILITY OF SUCH DAMAGE.

% $Id$


%----------------------------------------------------------------------------

M packages/bibasis/bibasis_tset.red => packages/bibasis/bibasis_tset.red +3 -1
@@ 30,7 30,9 @@ module bibasis_tset;
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAG
% POSSIBILITY OF SUCH DAMAGE.

% $Id$

%----------------------------------------------------------------------------
% T = triple_1 . ... . triple_n . (nil . nil) and triple_i >= triple_(i+1)

M packages/cali/bas.red => packages/cali/bas.red +1 -0
@@ 23,6 23,7 @@ module bas;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/bcsf.red => packages/cali/bcsf.red +1 -0
@@ 23,6 23,7 @@ module bcsf;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/cali.red => packages/cali/cali.red +1 -0
@@ 26,6 26,7 @@ module cali;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

% terpri(); write "CALI 2.2.1 Last update June 22, 1995"; terpri();


M packages/cali/calimat.red => packages/cali/calimat.red +1 -0
@@ 23,6 23,7 @@ module calimat;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/dpmat.red => packages/cali/dpmat.red +1 -0
@@ 23,6 23,7 @@ module dpmat;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/dpoly.red => packages/cali/dpoly.red +1 -0
@@ 23,6 23,7 @@ module dpoly;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/groeb.red => packages/cali/groeb.red +1 -0
@@ 23,6 23,7 @@ module groeb;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/groebf.red => packages/cali/groebf.red +1 -0
@@ 23,6 23,7 @@ module groebf;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/hf.red => packages/cali/hf.red +1 -0
@@ 23,6 23,7 @@ module hf;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/intf.red => packages/cali/intf.red +1 -0
@@ 23,6 23,7 @@ module intf;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/lf.red => packages/cali/lf.red +1 -0
@@ 23,6 23,7 @@ module lf;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT
              ###############################

M packages/cali/matop.red => packages/cali/matop.red +1 -0
@@ 23,6 23,7 @@ module matop;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/mo.red => packages/cali/mo.red +1 -0
@@ 58,6 58,7 @@ END COMMENT;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% ----------- manipulations of the degree part --------------------

symbolic procedure mo!=sprod(a,b);

M packages/cali/moid.red => packages/cali/moid.red +1 -0
@@ 23,6 23,7 @@ module moid;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/odim.red => packages/cali/odim.red +1 -0
@@ 23,6 23,7 @@ module odim;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/prime.red => packages/cali/prime.red +1 -0
@@ 23,6 23,7 @@ module prime; % corrected version | 15.6.1995
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$


COMMENT

M packages/cali/quot.red => packages/cali/quot.red +1 -0
@@ 23,6 23,7 @@ module quot;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/red.red => packages/cali/red.red +1 -0
@@ 23,6 23,7 @@ module red;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/res.red => packages/cali/res.red +1 -0
@@ 23,6 23,7 @@ module res;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/ring.red => packages/cali/ring.red +1 -0
@@ 23,6 23,7 @@ module ring;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/scripts.red => packages/cali/scripts.red +1 -0
@@ 23,6 23,7 @@ module scripts;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/cali/triang.red => packages/cali/triang.red +1 -0
@@ 23,6 23,7 @@ module triang;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

COMMENT


M packages/camal/camal.red => packages/camal/camal.red +1 -0
@@ 25,6 25,7 @@ module camal;  % Package for calculations in celestial mechanics.
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

create!-package('(camal fourdom fourplus makefour hsub hdiff),
                '(contrib camal));

M packages/camal/fourdom.red => packages/camal/fourdom.red +1 -0
@@ 25,6 25,7 @@ module fourdom; % Domain definitions for angles and fourier series
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

global '(domainlist!*);


M packages/camal/fourplus.red => packages/camal/fourplus.red +1 -0
@@ 23,6 23,7 @@ module fourplus;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%% ARITHMETIC


M packages/camal/hdiff.red => packages/camal/hdiff.red +1 -0
@@ 23,6 23,7 @@ module hdiff;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%% Harmonic differentiation and Integration.


M packages/camal/hsub.red => packages/camal/hsub.red +1 -0
@@ 23,6 23,7 @@ module hsub;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%% Harmonic substitution: the CAMAL HSUB operation, as well as other
%% substitutions.

M packages/camal/makefour.red => packages/camal/makefour.red +1 -0
@@ 23,6 23,7 @@ module makefour;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$

%% User interface; all rather iffy at present


M packages/cde/cde.red => packages/cde/cde.red +1 -0
@@ 23,6 23,7 @@ module cde; % CDE package main file
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_ansatz.red => packages/cde/cde_ansatz.red +1 -0
@@ 24,6 24,7 @@ module cde_ansatz;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_cdcalc.red => packages/cde/cde_cdcalc.red +1 -0
@@ 23,6 23,7 @@ module cde_cdcalc; % CDE package, calculus with C-differential operators
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_cdiff.red => packages/cde/cde_cdiff.red +1 -0
@@ 23,6 23,7 @@ module cde_cdiff; % CDE package, data structure for C-differential operators
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_diffcon.red => packages/cde/cde_diffcon.red +1 -0
@@ 24,6 24,7 @@ module cde_diffcon; % CDE package, computation of the
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_init.red => packages/cde/cde_init.red +1 -0
@@ 23,6 23,7 @@ module cde_init; % CDE package initialization file
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_jetspace.red => packages/cde/cde_jetspace.red +1 -0
@@ 23,6 23,7 @@ module cde_jetspace; % CDE package, routines for the definition of jetspace
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_parametric.red => packages/cde/cde_parametric.red +1 -0
@@ 24,6 24,7 @@ module cde_parametric; % CDE package, routines for the computation
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_superfun.red => packages/cde/cde_superfun.red +1 -0
@@ 23,6 23,7 @@ module cde_superfun; % CDE package, data structure for superfunctions
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_tools.red => packages/cde/cde_tools.red +1 -0
@@ 23,6 23,7 @@ module cde_tools; % CDE package, procedures of general utility
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_totalder.red => packages/cde/cde_totalder.red +1 -0
@@ 23,6 23,7 @@ module cde_totalder; % CDE package, definition of total derivatives
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_varcalc.red => packages/cde/cde_varcalc.red +1 -0
@@ 24,6 24,7 @@ module cde_varcalc; % CDE package, calculus of variations
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_vectorfield.red => packages/cde/cde_vectorfield.red +1 -0
@@ 24,6 24,7 @@ module cde_vectorfield;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Author and maintainer: Raffaele Vitolo
% Dipartimento di Matematica, Universita' del Salento (Lecce, Italy)

M packages/cde/cde_weaklynl.red => packages/cde/cde_weaklynl.red +1 -0
@@ 27,6 27,7 @@ module cde_weaklynl;
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id$
% % *****************************************************************
% Authors and maintainers: M. Casati, P. Lorenzoni, D. Valeri, R. Vitolo
% web: https://gdeq.org/Weakly_nonlocal_Poisson_brackets

M packages/cde/examples/bou_ell1.red => packages/cde/examples/bou_ell1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: linearization and adjoint
% 2014-12-22
% Raffaele Vitolo


% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $

load_package cde;


M packages/cde/examples/bou_lho1.red => packages/cde/examples/bou_lho1.red +27 -1
@@ 1,6 1,32 @@
% Dispersionless Boussinesq equation: three local Hamiltonian operators
% 2015-10-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $

load_package cde;


M packages/cde/examples/bur_hsy1.red => packages/cde/examples/bur_hsy1.red +28 -1
@@ 1,6 1,33 @@
% Burgers equation: higher symmetries (dimensional analysis approach)
% 2015-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/bur_hsy2.red => packages/cde/examples/bur_hsy2.red +28 -1
@@ 1,6 1,33 @@
% Burgers equation: higher symmetries (CRACK's approach)
% 2010-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/dn2d_sb1.red => packages/cde/examples/dn2d_sb1.red +27 -0
@@ 2,6 2,33 @@
% of Dubrovin-Novikov type (homogeneous) in two independent variables
% 2015.10.10 R. Vitolo

% Author: R Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $

load_package cde;

% Initialization

M packages/cde/examples/kdv_ell1.red => packages/cde/examples/kdv_ell1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: linearization and its adjoint
% 2015-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_hsy1.red => packages/cde/examples/kdv_hsy1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: higher symmetries
% 2012-01-19
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_lcl1.red => packages/cde/examples/kdv_lcl1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: local conservation laws
% 2015-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_lcl2.red => packages/cde/examples/kdv_lcl2.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: local conservation laws, search for non-trivial c.l.
% 2015-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_lho1.red => packages/cde/examples/kdv_lho1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: local Hamiltonian operators
% 2015-10-07
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_lho2.red => packages/cde/examples/kdv_lho2.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: local Hamiltonian operators
% 2015-10-08
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_lho3.red => packages/cde/examples/kdv_lho3.red +28 -1
@@ 1,7 1,34 @@
% KdV equation: local Hamiltonian operators, verification of skew-adjointness
% and computation of Schouten bracket
% 2015-10-08
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


%% on comp, echo, backtrace;
load_package cde;

M packages/cde/examples/kdv_nlcl1.red => packages/cde/examples/kdv_nlcl1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: non-local conservation laws on the cotangent covering
% 2015-10-10
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_nlho1.red => packages/cde/examples/kdv_nlho1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: non-local Hamiltonian operators
% 2015-10-10
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kdv_ro1.red => packages/cde/examples/kdv_ro1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: recursion operator
% 2015-10-10
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/kp_lho1.red => packages/cde/examples/kp_lho1.red +28 -1
@@ 1,6 1,33 @@
% KP equation: local Hamiltonian operators
% 2015-10-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/ple_nlcl1.red => packages/cde/examples/ple_nlcl1.red +55 -1
@@ 1,7 1,61 @@
% Plebanski equation: conservation laws on the cotangent covering
%    for non-local variables.
% 2015-10-10
% Raffaele Vitolo

% Author: % Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $



% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples/ple_nlho1.red => packages/cde/examples/ple_nlho1.red +28 -1
@@ 3,7 3,34 @@
% from the paper by Neyzi, Nutku, Sheftel (2005).
%
% 2015-10-10
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


% on comp, echo, backtrace;
load_package cde;

M packages/cde/examples/wdvv_biham1.red => packages/cde/examples/wdvv_biham1.red +29 -0
@@ 2,6 2,35 @@
% See Ferapontov, Galvao, Mokhov, Nutku, Comm. Math. Phys. 
% 2015-10-09

% Author: R Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $



% File biham1: checking that
% 1 - the third-order operator aa2 fulfills [aa2,aa2]=0.
% 2 - the first-order operator aa1 fulfills [aa1,aa1]=0.

M packages/cde/examples_book/bou_csy1.red => packages/cde/examples_book/bou_csy1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: conservation laws
% 2015-11-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_ell1.red => packages/cde/examples_book/bou_ell1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: linearization and adjoint
% 2015-11-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_ho1.red => packages/cde/examples_book/bou_ho1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: three local Hamiltonian operators
% 2016-01-12
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_lcl1.red => packages/cde/examples_book/bou_lcl1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: conservation laws
% 2015-11-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_ro1.red => packages/cde/examples_book/bou_ro1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: three local Hamiltonian operators
% 2016-01-12
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_roc1.red => packages/cde/examples_book/bou_roc1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: three local Hamiltonian operators
% 2016-01-12
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_sh1.red => packages/cde/examples_book/bou_sh1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: shadows of symmetries
% 2015-12-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bou_sympl1.red => packages/cde/examples_book/bou_sympl1.red +28 -1
@@ 1,6 1,33 @@
% Dispersionless Boussinesq equation: three local Hamiltonian operators
% 2016-01-12
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bur_hsy1.red => packages/cde/examples_book/bur_hsy1.red +28 -1
@@ 1,6 1,33 @@
% Burgers equation: higher symmetries (dimensional analysis approach)
% 2015-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bur_hsy2.red => packages/cde/examples_book/bur_hsy2.red +28 -1
@@ 1,6 1,33 @@
% Burgers equation: higher symmetries (CRACK's approach)
% 2010-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/bur_jbr1.red => packages/cde/examples_book/bur_jbr1.red +28 -1
@@ 1,6 1,33 @@
% Burgers equation: Jacobi bracket of higher symmetries.
% 2017-10-01
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


%on comp, echo, backtrace;
load_package cde;

M packages/cde/examples_book/cde_add.red => packages/cde/examples_book/cde_add.red +29 -0
@@ 1,5 1,34 @@
% Procedures for the Nijenhuis bracket of two recursion operators

% Author: R Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $



symbolic procedure ev_superfun_even(superf1,superf_scal);
  % Computes the even summand of the Nijenhuis bracket.
  % The superfunctions must have been checked in the procedure

M packages/cde/examples_book/ch_csy1.red => packages/cde/examples_book/ch_csy1.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: cosymmetries
% 2016-08-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_ell1.red => packages/cde/examples_book/ch_ell1.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: linearization and adjoint
% 2015-11-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_ell2.red => packages/cde/examples_book/ch_ell2.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: linearization and adjoint
% 2015-11-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_ho1.red => packages/cde/examples_book/ch_ho1.red +55 -1
@@ 1,6 1,60 @@
% Camassa-Holm equation: recursion operator
% 2016-01-13
% Raffaele Vitolo

% Author: % Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $



% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_hsy1.red => packages/cde/examples_book/ch_hsy1.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: higher symmetries
% 2016-01-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_hsy2.red => packages/cde/examples_book/ch_hsy2.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: higher symmetries
% 2016-01-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_ro1.red => packages/cde/examples_book/ch_ro1.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: recursion operator
% 2016-01-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_roc1.red => packages/cde/examples_book/ch_roc1.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: recursion operator
% 2016-01-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/ch_sympl1.red => packages/cde/examples_book/ch_sympl1.red +28 -1
@@ 1,6 1,33 @@
% Camassa-Holm equation: symplectic operator
% 2016-01-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/dn2d_sb1.red => packages/cde/examples_book/dn2d_sb1.red +28 -1
@@ 1,6 1,33 @@
% Checking Schouten bracket of three first-order operators
% of Dubrovin-Novikov type (homogeneous) in two independent variables
% 2015.10.10 R. Vitolo
% 2015.10.10 
% Author: R. Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/gh_ell1.red => packages/cde/examples_book/gh_ell1.red +28 -1
@@ 1,6 1,33 @@
% General Heavenly equation: symplectic operators
% 2017-10-11
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/gh_sympl1.red => packages/cde/examples_book/gh_sympl1.red +28 -1
@@ 1,6 1,33 @@
% General Heavenly equation, evolutionary form: local symplectic operator
% 2017-10-11
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/gt_csy1.red => packages/cde/examples_book/gt_csy1.red +28 -1
@@ 1,6 1,33 @@
% Gibbons-Tsarev equation: cosymmetries
% 2017-08-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/gt_csy2.red => packages/cde/examples_book/gt_csy2.red +28 -1
@@ 1,6 1,33 @@
% Gibbons-Tsarev equation: conservation laws from cosymmetries
% 2017-08-13
% Raffaele Vitolo

% Author: % Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/gt_lcl1.red => packages/cde/examples_book/gt_lcl1.red +28 -1
@@ 1,6 1,33 @@
% Gibbons-Tsarev equation: local conservation laws
% 2017-08-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/h_nb1.red => packages/cde/examples_book/h_nb1.red +28 -1
@@ 1,6 1,33 @@
% Heat equation: Nijenhuis bracket of the recursion operator
% 2017-10-22
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/hh_ell1.red => packages/cde/examples_book/hh_ell1.red +28 -1
@@ 1,6 1,33 @@
% Husain Heavenly equation (\epsilon=+1): recursion operator for cosymmetries
% 2017-10-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/hh_nlv1.red => packages/cde/examples_book/hh_nlv1.red +28 -1
@@ 1,7 1,34 @@
% Husain Heavenly equation, evolutionary form:
% recursion operator for cosymmetries
% 2017-10-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/hh_roc1.red => packages/cde/examples_book/hh_roc1.red +28 -1
@@ 1,7 1,34 @@
% Husain Heavenly equation, evolutionary form:
% recursion operator for cosymmetries
% 2017-10-13
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_csy1.red => packages/cde/examples_book/kdv_csy1.red +27 -0
@@ 1,6 1,33 @@
% KdV equation: cosymmetries
% 2015-12-01
% Raffaele Vitolo
% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_ell1.red => packages/cde/examples_book/kdv_ell1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: linearization and its adjoint
% 2015-10-05
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_ho1.red => packages/cde/examples_book/kdv_ho1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: local Hamiltonian operators
% 2015-10-07
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_ho2.red => packages/cde/examples_book/kdv_ho2.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: local Hamiltonian operators - crack approach
% 2015-10-08
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_ho3.red => packages/cde/examples_book/kdv_ho3.red +28 -1
@@ 1,7 1,34 @@
% KdV equation: local Hamiltonian operators, verification of skew-adjointness
% and computation of Schouten bracket
% 2015-10-08
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_ho4.red => packages/cde/examples_book/kdv_ho4.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: non-local Hamiltonian operators
% 2015-10-10
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_hsy1.red => packages/cde/examples_book/kdv_hsy1.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: higher symmetries
% 2012-01-19
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
% CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
% SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
% INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
% CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
% ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% POSSIBILITY OF SUCH DAMAGE.
%

% $Id: $


load_package cde;


M packages/cde/examples_book/kdv_hsy2.red => packages/cde/examples_book/kdv_hsy2.red +28 -1
@@ 1,6 1,33 @@
% KdV equation: higher symmetries using CRACK
% 2015-12-09
% Raffaele Vitolo

% Author: Raffaele Vitolo

% Redistribution and use in source and binary forms, with or without
% modification, are permitted provided that the following conditions are met:
%
%    * Redistributions of source code must retain the relevant copyright
%      notice, this list of conditions and the following disclaimer.
%    * Redistributions in binary form must reproduce the above copyright
%      notice, this list of conditions and the following disclaimer in the
%      documentation and/or other materials provided with the distribution.
%
% THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
% AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
% THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
% PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNERS OR
% CONTRIBUTORS
% BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,