Real-time collaboration for Jupyter Notebooks, Linux Terminals, LaTeX, VS Code, R IDE, and more,
all in one place.
Real-time collaboration for Jupyter Notebooks, Linux Terminals, LaTeX, VS Code, R IDE, and more,
all in one place.
| Download
GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
Project: cocalc-sagemath-dev-slelievre
Views: 418346/home/barakat/maple/lib/10/jets.lib ............................................................................................................................................................................................................................ }�C���� ets jetsT jetsA jets/compiled jets/version jets/init jetsA/init jetsT/init diff/_jD jets/AdjointF jets/Curl jets/Der2map jets/Div jets/E1codim jets/E1def jets/E1dim jets/Euler jets/F1coorMat jets/F1coor jets/F1dim jets/GEuler jets/GOrdEuler jets/Ginterprod jets/Helmholtz2 jets/Helmholtz jets/LDsolve jets/Ldsolve jets/LieFormG jets/LieForm jets/OrdEuler jets/Poisson jets/Qcheck jets/Qinverse jets/Qsubs jets/SEPARATE jets/Takens jets/addcon jets/addmat jets/adrep jets/affpart jets/alljets jets/appad jets/apphh jets/appitr jets/appmat jets/appmt jets/apptrn jets/aprolf jets/aprolif jets/asadj jets/bascoeff jets/casimop jets/cchchr jets/cchcmp jets/cchcnj jets/cchcon jets/cchcur jets/cchdop20 jets/cchdop jets/cchfnc jets/cchfrm .p"z���M7R0 I,jets/Qcheckf*6%%"QG%"lG%%dvarG6#%#_QG6#%inCopyright~(C)~2000-2002~by~Gehrt~Ha rtjen.~All~rights~reserved.G6"C&>8$-%,jets/mklistG6#9$@$-%$hasG6$-%%subsG6$/9%" "!F/9&-%&ERRORG6#%`qThe~path~function~does~not~fulfill~the~criterion~of~indepen dency~of~the~dependent~variables~for~l=0~!G@$0-%)simplifyG6#-F96$/F<"""F/F>-F@6 #%^qThe~path~function~does~not~fulfill~the~criterion~of~identity~with~the~depen dent~variables~for~l=1~!G-%'RETURNG6#%%trueGF,F,F,F,, Q.jets/Qcheck.mF, M7R0 I,jets/addmatf*6%'%%mat1G%'matrixG'%%mat2GF'%%ivarG6)%"AG%#rmG%#cmG%"iG%"jG%"aG %"bG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C(> 8%-%#opG6$7$"""""#7#-F:6$F>-%%evalG6#9$>8&-F:6$7$F>F>F?@$50-F:6$F<7#-F:6$F>-FC6 #9%F80-F:6$FJFPFG-%&ERRORG6#%LThe~matrices~must~have~the~same~dimensions!G>8$-F '6$F8FG@%2""$9#?(8'F=F=F8%%trueG?(8(F=F=FGFao>&Fhn6$F`oFco-%,jets/addconG6&&FEF fo&FUFfo9&&9"6#""%?(F`oF=F=F8Fao?(FcoF=F=FGFao>Feo-Fho6%FjoF[pF\p-%%copyG6#FhnF 5F5F5F5, Q.jets/addmat.mF5 M7R0 I+jets/apphhf*6&%#SSG%#QQG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF)-%+jets/appmtG6&-%0jets/Helmholtz2G6%9$9&9'9 %F3F4F)F)F)F), Q-jets/apphh.mF) M7R0 I,jets/cchsrcf*6"6,%#arG%%itrlG%%dtrlG%$srcG%%ivarG%%dvarG%"nG%"mG%%nsrcG%$resG 6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C/>8$-% ,jets/inpcchG6#9">8%&F46#""">8&&F46#""#>8'-%,jets/mklistG6#&F46#""$>8(&F46#""%> 8)&F46#""&>FD-%$mapG6$f*6#%"aGF$F$F$@%-%%typeG6$9$%"=G,&-%$lhsG6#FjnF=-%$rhsGF_ o!""FjnF$F$F$FD>8*-%%nopsG6#FL>8+-Ffo6#FQ@$0-Ffo6#FDFio-%&ERRORG6#%^oThe~souce~ form~must~have~as~many~components~as~dependent~variables!G>8,-%,jets/cchjetG6'F :F?FDFLFQ>8--%+jets/jsimpG6$-%+jets/appmtG6&-%.jets/AdjointFG6%-%-jets/jacobifG 6&F:F?FLFQFLFQFepFLFQFQ@%-Fhn6$FH%%listGFjp-%#opG6#FjpF$F$F$F$, Q.jets/cchsrc.mF$ M7R0 I-jets/charactf*6$%%ivarG%%dvarG6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Barak at.~All~rights~reserved.G%'systemG%)rememberGF'-%$mapG6$f*6#%"xGF'6$%)operatorG %&arrowGF',&&%$etaG6#9$"""-%$sumG6$*&.&F96#&T$6#%"kGF:.&%#xiGFAF:/.FE;F:-%%nops G6#FC!""F'F'6$F%F99%F'F'F'F', Q/jets/charact.mF' M7R0 I1jets/christoffelf*6$%#ggG%%dvarG6+%$tauG%"mG%"VG%$geoG%#ZMG%&GammaG%"iG%"jG%" kG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)>8% -%%nopsG6#9%>8&-%.jets/totalderG6&F:8$7#F@F:>8'-%.jets/geodesicG6%9$.F@F:>8(-%' matrixG6%F6F6""!>8)7#-%$seqG6$-%%copyG6#FJ/8*;"""F6?(8+FenFenF6%%trueG?(8,FenFe nFgnFhn?(FYFenFenF6Fhn@%/FgnFjn>&&FP6#Fgn6$FYFjn,$-%,jets/jcoeffG6%-%$rhsG6#&FC 6#FY*&&F<FaoFen&F<6#FjnFenF<!""C$>F_o,$Fdo#F`p""#>&&FPF_p6$FYFgnF_oFPF3F3F3F3, Q3jets/christoffel.mF3 M7R0 I+jets/gendlf*6$%%ivarG%%dvarG6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat .~All~rights~reserved.G%'systemG%)rememberGF'6$-%#opG6#9$-F.6#-%$mapG6$f*6#%"xG F'6$%)operatorG%&arrowGF'-F06#-F.6#T$F'F'6$F%F09%F'F'F'F', Q-jets/gendl.mF' M7R0 I.jets/ichdop20f*6"6*%#arG%%itrlG%%dtrlG%$dopG%%ivarG%%dvarG%&oivarG%&odvarG6#% fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserved.GF$C,@%32""%9#-%%t ypeG6$&9"6#!""%'stringG>8$-%,jets/inpcchG6#&F:6#;"""!"#>F?-FA6#F:>8%&F?6#FF>8&& F?6#""#>8'&F?6#""$>8(&F?6#F4>8)&F?6#""&>8*-%$mapG6$%$lhsGFL>8+-F_o6$FaoFP-%,jet s/cchinvG6%7$-%#opG6#FL-F[p6#FPFZFhn@%F2-%.jets/cchdop20G6'%"%GFUF]oFcoQ&JanetF $-Fap6&FcpFUF]oFcoF$F$F$F$, Q0jets/ichdop20.mF$ M7R0 I,jets/ichvecf*6"6*%#arG%%itrlG%%dtrlG%$vecG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchvecG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichvec.mF$ M7R0 I-jets/ind2smbf*6$%$anyG%%lvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.GF'-%%subsG6$-%$mapG6$f*6#%"xGF'6$%)operatorG%&arrowGF'/ 9$-%(convertG6$F7%'symbolGF'F'F'9%F7F'F'F'F', Q/jets/ind2smb.mF' M7R0 I-jets/inf2finf*6$%$vecG%%ivarG6'%%dvarG%%lvarG%%pvecG%%jvarG%&jvar_G6#%[oCopyr ight~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@%2""#9#>8$-%,j ets/mklistG6#&9"6#""$>F67">8%-%-jets/alljetsG6%""!9%F6>8&-%-jets/sortconG6$9$FA @'/-%-jets/getiordG6$FHF6FE-%,jets/intgeoG6$FHFA3/FO"""/-%%nopsG6#F6FWC%>FA-FC6 %FWFFF6>FH-FJ6$-%-jets/prolvecG6&FHFWFFF6FA@%FVC%>8'-%-jets/jetcoorGFin>8(-%$ma pG6%%(convertGFco%'symbolG-%%subsG6$-%*jets/ezipG6$FgoFco-FS6#-%#opG6#-F^p6$-Fa p6$FcoFgo7$FHFA-%&ERRORG6#%inthis~is~not~an~infinitesimal~geometric/contact~tra nsformation!GF]q-F[p6$%"%G%(radicalGF/F/F/F/, Q/jets/inf2fin.mF/ M7R0 I.jets/jpdesolvf*6%%%leqnG%&fivarG%&fdvarG6"6#%[oCopyright~(C)~2000-2003~by~Moh amed~Barakat.~All~rights~reserved.GF(C$@$4-%)assignedG6#%(pdesolvG-%&ERRORG6#%c qThe~function~'pdesolv'~is~not~defined.~Please~load~the~package~desolv~(or~Deso lv)~and~then~reload~jets!!G@%2""$9#-F16&9$9&9%&9"6#""%-F16%F<F=F>F(F(F(F(, Q0jets/jpdesolv.mF( M7R0 I-jets/lddop20f*6&%$vecG%#_SG%%ivarG%%dvarG6%%"QG%#dqG%"SG6#%[oCopyright~(C)~20 00-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@%-%,jets/chkvecG6#9$>8$-% .jets/vec2charG6%F59&9'C$>F7-%,jets/mklistGF4@$-%%typeG6$&F76#"""%"=G>F7-%$mapG 6$f*6#%"aGF/6$%)operatorG%&arrowGF/,&-%$lhsGF4FG-%$rhsGF4!""F/F/F/F7>8%-%.jets/ frechetcG6%F7F;F<@%-%,jets/chkdopG6#9%>8&-%+jets/mkmatG6#7#7#F\o>F^oF\o-%,jets/ submatG6%-Ffo6%-%+jets/lddopG6&-%/jets/char2evolG6$F7F<-%%copyG6#F^oF;F<-%,jets /cmpdopG6&-Fap6#FZF`pF;F<F;-Fdp6&F`p-%.jets/AdjointFG6%FfpF;F<F;F<F;@%Fin&%"%G6 $FGFGF_qF/F/F/F/, Q/jets/lddop20.mF/ M7R0 I.jets/lieapplyf*6%%%operG%%exprG%%lvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF(-%-jets/smb2indG6$-%)simplifyG6#-%'expandG6# -%%subsG6$/-%$_PPG6#-%#opG6#-%$mapG6%%(convertG9&%'symbolG-%-jets/ind2smbG6$9%F B9$FBF(F(F(F(, Q0jets/lieapply.mF( M7R0 I-jets/ohamvecf*6%%%funcG%%ivarG%%dvarG6#%#ttG6#%[oCopyright~(C)~2000-2002~by~M ohamed~Barakat.~All~rights~reserved.G6"C%>8$&9%6#"""@$0-%%nopsG6#F1F3-%&ERRORG6 #%Eivar~contains~more~than~one~variableG-%-jets/simpconG6%7$-%#opG6#-%$mapG6$f* 6#%"xGF,6$%)operatorG%&arrowGF,7$-%-jets/partderG6&T$&9$6#T%7#FUT(7#FSF,F,6(F%F SF)F/F'9&FZ-FB6#-FE6$f*FHF,FJF,7$,$-FO6&FQFSFVFW!""7#FRF,F,FYFZ-%-jets/alljetsG 6%F3F1FZFZF,F,F,F,, Q/jets/ohamvec.mF, M7R0 I-jets/oporderf*6%%"aG%"bG%%ivarG6%%"iG%"pG%"qG6#%inCopyright~(C)~2000-2002~by~ Gehrt~Hartjen.~All~rights~reserved.G6"@'2-%%nopsG6#&9$6#""#-F26#&9%F6-%'RETURNG 6#%%trueG2F8F1-F=6#%&falseGC$?(8$"""FGF1F?C&-%'memberG6%&F56$F7FF9&.8%-FJ6%&F;F MFN.8&@$2FPFUF<@$2FUFPFAF<F.F.F.F., Q/jets/oporder.mF. M7R0 I-jets/pol2indf*6$%$polG%&_ivarG6$%%ivarG%"dG6#%[oCopyright~(C)~2000-2002~by~Mo hamed~Barakat.~All~rights~reserved.G6"C'>8$-%,jets/mklistG6#9%@%2""#9#>8%-F16#& 9"6#""$>F97#.%"uG@&333-%%typeG6$9$%%listG4-FI6$FK%)listlistG0-%%nopsG6#F9"""/-F S6#FKFR-%'RETURNG6#-%(convertG6$-%$mapG6$f*6#%"aGF,6$%)operatorG%&arrowGF,-F"6% &T$FXT%&T'FXF,F,6(F%FKF(F/F)F97#-%"$G6#;FUFR%"+G-FI6$FK<$FL%$setG-FZ6#-Fjn6&F"F KF/F9>F9&F96#FU-Fgn6$-%$zipG6%f*6$F^o%"bGF,F,F,C$-%.jets/mult2indG6$-Fjn6$f*6#% "iGF,F_oF,-%'degreeG6$FeoFKF,F,6$FbqF3T#F`r@%0%"%G%%NULLG*&FKFU&Ffo6#FcrFU*&FKF UFfoFUF,F,6&F(F/F)F97#-%'coeffsG6%-%(collectG6%-%'expandGFXF/%,distributedGF/.% $_t_G7#FesF_pF,F,F,F,, Q/jets/pol2ind.mF, M7R0 I-jets/prd2eqnf*6%%$prdG%%ivarG%%dvarG62%%_prdG%"pG%$eqnG%#zzG%&_ivarG%&_dvarG% 'ivdvarG%"nG%"mG%"iG%"jG%"kG%&seq_dG%"CG%$terG%$mulG6#%[oCopyright~(C)~2000-200 2~by~Mohamed~Barakat.~All~rights~reserved.G6"C/@%-%%typeG6$9$%)listlistG>8$FA>F D7#FA>8%-%%nopsG6#FD>8&7#-%"$G6$""!FH>8+-FJ6#9%>8,-FJ6#9&>80-%$seqG6$&%"DG6#8-/ F_o;"""FT>8'7#-FP6$FRFZ>8)Fdo>8*Fdo@%32""$9#4-F?6$&9"6#""%%'stringG>8(Fdp>FjpFW ?(F_oFboFboFZ%%trueG@%-F?6$&FfnF^o%)functionGC%>Fio-%'subsopG6$/F_o-%#opG6$FRFa qFio>F[p-Ffq6$/F_o7#-Fjq6#FaqF[p@'32-FJ6#&F[pF^o-FJ6#Fjp-%-jets/sublistG6$FhrFj pF;3/FfrFirF[sF;-%&ERRORG6$Faq%9has~the~wrong~variables!GC$>Fio-Ffq6$/F_oFaqFio >F[p-Ffq6$/F_oFWF[p?(8/FboFboFHF]qC$?(8.FboFboFYF]q@$0&&FD6$F^tFbo6#FatFRC%>817 #-%'coeffsG6%-%(collectG6%Fdt7#Fhn%,distributedGFbu.82>Feu7#Feu?(F_oFboFbo-FJ6# FjtF]q@%/&FeuF^oFbo>FM-Ffq6$/F^t,&&FM6#F^tFbo*&&FjtF^oFbo-&FioFgt6#-Fjq6#&F[pFg tFboFboFMC$>837#-%.jets/mult2indG6$-%$mapG6$f*6#%"aGF;6$%)operatorG%&arrowGF;-% 'degreeG6$&T#6#T%FAF;F;6&F7FeuF2F_oFbuFjp>FM-Ffq6$/F^t,&FcvFbo*&FfvFbo-%%diffG6 $FgvF_wFboFboFM>FM-Ffq6$/F^t,&FcvFbo&FD6$F^t""#FboFM@%-F?6$&Fep6#F`pFhp@%F]p7&F MFWFfnFjp7%FMFWFfn@%F>FM-Fjq6#FMF;F;F;F;, Q/jets/prd2eqn.mF; M7R0 I.jets/sortjetsf*6%%$varG%%ivarG%%dvarG6"6%%[pCopyright~(C)~2000-2005~by~Mohame d~Barakat~and~Arne~Lorenz.~All~rights~reserved.G%'systemG%)rememberGF(@%32""$9# -%%typeG6$&9"6#""%%'stringG-%.jets/srtbylstG6$9$-%+jets/hjetsG6%-%-jets/getiord G6%F=9&Q!F(9%FD-F;6$F=-%-jets/alljetsGF@F(F(F(F(, Q0jets/sortjets.mF( M7R0 I/jets/storecasef*6#%%expnG6%%'resultG%$facG%%teqnG6#%>Copyright~(c)~1997~by~Kh ai~VuG6"@$4-%%typeG6$9$%(numericGC%>8&-%'factorG6#F2@%-F06$F6%"*GC$>8$%%NULLG?& 8%F6%%trueG@$4-F06$FCF3>F@6$F@FC>F@F6@%-%)assignedG6#%0desolv_nzassumeG>FP-%&un ionG6$FP<#F@>FPFUF,FOF,F,, Q1jets/storecase.mF, M7R0 I,jets/subconf*6%%%vec1G%%vec2G%%ivarG6#%%dvarG6#%[oCopyright~(C)~2000-2002~by~ Mohamed~Barakat.~All~rights~reserved.G6"C$@%2""$9#>8$&9"6#""%>F3%%NULLG-%,jets/ addconG6&9$-%,jets/mulconG6&!""9%9&F3FCF3F,F,F,F,, Q.jets/subcon.mF, M7R0 I.jets/compiled"-T@I75?6", Q0jets/compiled.mF$ M7R0 I*jets/initf*6"6#%*ini_printG6#%fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~ri ghts~reserved.GF$@$50%1jets/initializedG.%%trueG32""!9#-%%typeG6$&9"6#""".%%lis tGC%>8$f*F$F$F$F$@$0%0_Env_jets_printG%&falseG-%&printG6#F7F$F$F$>F,F--%%withG6 #%&jetsTGF$6#F,F$F$, Q,jets/init.mF$ M7R0 I/jets/F1coorMatf*6'%#_RG%%_numG%&_ivarG%&_DvarG%%_varG6/%"RG%$numG%$posG%%ivar G%%DvarG%%wvarG%%uvarG%"qG%%jvarG%#RpG%&ujvarG%$InvG%$kerG6#%fnCopyright~(C)~20 05~by~Mohamed~Barakat.~All~rights~reserved.G6"C.@%-%%typeG6$9%%'posintG>8%F@>FC """@%-F>6$&9"6#""#%(numericG>8&FE>FO""!>8'-%,jets/mklistG6#&FJ6#,&FLFEFOFE>8(-F U6#&FJ6#,&""$FEFOFE@%-%,jets/chkvecG6#9$C%>8*-FU6#&FJ6#,&""%FEFOFE>8$-%-jets/eq n2indG6%F`oFSFen>F[p-%$mapG6$f*6#%"aGF:6$%)operatorG%&arrowGF:,$F`o!""F:F:F:-%. jets/vec2charG6%F[pFSFcoC'>8)Fdo@%29#""&@%/-%%nopsG6#F`qFE>Fco7#%"uG>Fco-Fap6$f *FdpF:FfpF:-%$catG6$F\rF`oF:F:F:7#-%"$G6#;FEFgq>Fco-FU6#&FJ6#,&FdqFEFOFE>F[p-Fa p6$f*FdpF:FfpF:@%-F>6$F`o%"=G,&-%$lhsGF_oFE-%$rhsGF_oFjpF`oF:F:F:-FUF_o>F[p-F]p 6%F[pFSF`q>F[p-%%subsG6$-%*jets/ezipG6$F`qFcoF[p@$55/F[p7"/F[p7#FQ/F[p7#-Ffr6$F Q-Fhq6#F[p-%'RETURNG6#F[u>8+-%-jets/getiordG6$F[pFen>8-&-%-jets/prolsysG6(F[pFC FSFenFcoQ!F:6#;FE,&-Fhq6#FcoFjpFjpFE>8,-%-jets/jetcoorG6%7#-Ffr6#;,&FhuFEFEFE,& FhuFEFCFEFSFen>Fiv-Fap6$f*FdpF:FfpF:&T#6#FipF:F:6$F3Fiv7#-Ffr6#;FE-Fhq6#Fiv>8.& -F`v6'FcoFCFSFcoFbvFcv-Fap6'%-jets/extderpGF]vFivFSFenF:F:F:F:, Q1jets/F1coorMat.mF: M7R0 I,jets/F1coorf*6'%#_RG%%_numG%&_ivarG%&_DvarG%%_varG66%"RG%)get_varsG%$numG%$po sG%%ivarG%%DvarG%%wvarG%%uvarG%$invG%%SUBSG%%dvarG%"qG%%jvarG%#RpG%&ujvarG%$Inv G%$kerG%%coorG%$affG%%aff2G6#%[oCopyright~(C)~2004-2005~by~Mohamed~Barakat.~All ~rights~reserved.G6"C2@$-%%typeG6$&9"6#!""%'stringG>8%f*6#F/6)F5%#arG%$LHSGF3%% lvarGF2F4FAFA@%2""&9#C(@%2""'FWC$>8$&FH6#!"&-%'assignG6$FGFhn-%&ERRORG6#%3I~can 't~find~dvar!G>FM-%,jets/mklistG6#&FH6#""#@'-FE6$FM-%%listG6#%"=GC$>8)-%$mapG6$ %$lhsGFM@%3-%-jets/chkdvarG6$Fcp9$/-%-jets/getindsG6%FcpFhnQ!FA7"C%>8'FM>8(-%;j ets/get_vars_to_eliminateG6%FfqF]qFhn>8*&-%-jets/nrsolveG6$FfqFhq6#"""-F`o6#%en I'm~not~able~to~extract~abstract~names~for~the~invariants!G2""(FWC%>FcpFM>FM-Fe o6#&FH6#""$@%F[p@%/FdpFcpC%>FfqFM>FhqFiq>F]rF^rC$>F]rFM>Ffq&-F`r6$F]rFcpFbrC%>F fq-%*jets/ezipG6$FcpFM>Fhq-Fjq6%FMF]qFhn>F]rF^r-F`o6#%OSomething~went~wrong.~Ma ybe~too~few~arguments!G-F]o6$&FH6#!"%Fcp-F]o6$&FH6#!"$Ffq-F]o6$&FH6#!"#F]r-F`o6 #%3I~can't~find~uvar!GFAFAFA@%-FE6$9%%'posintG>8&F_v>FbvFcr@%-FE6$Fgo%(numericG >FfqFcr>Ffq""!>Fhq-Feo6#&FH6#,&FioFcrFfqFcr>Fcp-Feo6#&FH6#,&F`sFcrFfqFcr@%-%,je ts/chkvecG6#F]qC%@%FD-FM6(Fhq&FH6#;,&""%FcrFfqFcrFhu8+8,8-8.>Fdx-Feo6#&FH6#Fbx> Fhn-%-jets/eqn2indG6%F]qFhqFcp>Fhn-Fep6$f*6#%"aGFA6$%)operatorG%&arrowGFA,$F]qF JFAFAFA-%.jets/vec2charG6%FhnFhqFdxC'>F]rFix@%2FWFV@%/-%%nopsG6#F]rFcr>Fdx7#%"u G>Fdx-Fep6$f*FeyFAFgyFA-%$catG6$FizF]qFAFAFA7#-%"$G6#;FcrFdz@%FD-FM6(Fhq&FH6#;, &FVFcrFfqFcrFhuFdxFexFfxFgx>Fdx-Feo6#&FH6#F\\l>Fhn-Fep6$f*FeyFAFgyFA@%-FE6$F]qF `p,&-FgpFjwFcr-%$rhsGFjwFJF]qFAFAFA-FeoFjw>Fhn-F_y6%FhnFhqF]r>Fhn-%%subsG6$-Fat 6$F]rFdxFhn@$55/FhnFcq/Fhn7#Fjv/Fhn7#-Fc[l6$Fjv-Fez6#Fhn-%'RETURNG6#Fcq>8/-%-je ts/getiordG6$FhnFcp>81&-%-jets/prolsysG6(FhnFbvFhqFcpFdxFbq6#;Fcr,&-Fez6#FdxFJF JFcr>80-%-jets/jetcoorG6%7#-Fc[l6#;,&Fg^lFcrFcrFcr,&Fg^lFcrFbvFcrFhqFcp>Fg_l-Fe p6$f*FeyFAFgyFA&T#6#FjyFAFA6$F7Fg_l7#-Fc[l6#;Fcr-Fez6#Fg_l>82&-F__l6'FdxFbvFhqF dxFbqFa_l>83-%+jets/mkmatG6#-Fep6'%-jets/extderpGF\_lFg_lFhqFcp>84-Fep6$Feo-Feo 6#-%+jets/jsimpG6%-Feo6#FealFdx-%"@G6$&%'linalgG6#%'kernelG&F[cl6#%*transposeG> 85-Fep6%%+jets/dprodGF]blF`al@%FDC&>Fbcl-Fep6$f*FeyFAFgyFAFjyFAFAFAFbcl>86-%+je ts/jsubsG6'FexFbclFhqFdxFgx?(FAFcrFcrFA0-F`q6%F]dlFgxFbqFcq>F]dl-Fep6$f*FeyFAFg yFA-Fcbl6$-Fc]l6$Ff`lF]qT%FAFA6&F4FfxF5FgxF]dl-%$zipG6%f*6$Ffy%"bGFAFgyFA,&F]qF crF_vFJFAFAFAFbclF]dl-Fep6$f*FeyFAFgyFAFjyFAFAFAFbclFAFAFAFA, Q.jets/F1coor.mFA M7R0 I0jets/Ginterprodf*6'%#Q2G%#Q1G%#SSG'%%ivarG%%listG'%%dvarGF*64%$_Q2G%$_Q1G%$_S SG%"nG%"mG%"lG%"aG%"iG%"jG%"kG%#ikG%"MG%"SG%"AG%#ISG%"JG%#poG%#ELG6#%[oCopyrigh t~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C1>8$-%,jets/mklistG 6#9$>8%-FG6#9%>8&-FG6#9&>8)-%%nopsG6#FP>8'-FW6#9'>8(-FW6#9(@$0-FW6#FKFU-%&ERROR G6#%hpThe~length~of~the~the~2nd~argument~must~agree~with~the~length~of~the~equa tion~(3rd~argument)!G@$0-FW6#FEFin-Fbo6#/%eoThe~length~of~the~characteristic~(1 st~argument)~must~agree~with~nops(dvar)GFin>817#-%$seqG6$""!/8+;"""FZ>8/-%$mapG 6$f*6#%"xGFB6$%)operatorG%&arrowGFB7#-%#opGFHFBFBFB-%-jets/getindsG6$FKF\o>82<" ?&FepFip%%trueGC$>80-&%)combinatG6#%(subsetsG6#Fep?(FBFgpFgpFB4&F`r6#%)finished G>Fjq-%&unionG6$Fjq<#-&F`r6#%*nextvalueGFB>Fjq-%&minusG6$Fjq<#7"?&83FjqF]rC%>85 -F[q6'%,jets/GEulerGFNFgnF\oF\t>8.7#-%.jets/ind2multG6$F\tFgn?(8-FgpFgpFZF]r@$- %'memberG6%&Fgn6#FjtF\t.84>&F^pF`u,&FduFgp*(&FdtF`uFgp-FW6#F\t!""-%.jets/totald erG6&-%$addG6$-F_v6$*&&FE6#8*Fgp--%,jets/diffopG6%&F_t6$%"bGFfvFgnF\o6#&FP6#F]w Fgp/Ffv;FgpFin/F]w;FgpFU-%'subsopG6$/Fbu%%NULLGF\tFgnF\oFgpFgpF^pFBFBFBFB, Q2jets/Ginterprod.mFB M7R0 I,jets/apptrnf*6"6-%#arG%&trnsfG%%funcG%%ivarG%%dvarG%"nG%$x2_G%"iG%$prbG%$solG %$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C .>8$-%,jets/inptrnG6#9">8%&F56#""">8&&F56#""#>8'&F56#""$>8(&F56#""%>8)-%%nopsG6 #FE>8*-%$mapG6$f*6#%"aGF$6$%)operatorG%&arrowGF$/9$-%-jets/ind2subG6#FinF$F$F$F E@%-%%typeG6$&F@F=%"=G>F;-FV6$f*FYF$FenF$/-%$lhsGF\o-%%subsG6$T#-%+jets/QsubsG6 &-FV6$%$rhsGT%-FcpF\oT'T)F$F$6*F,FTF(F@F)FEF*FJF;>F;-FV6$f*FYF$FenF$/Fho-F[p6$F ]pFepF$F$6$F,FTF;>8,6$<#-%$seqG6$&F;6#8+/Fjq;F>FO-%+jets/mksetG6#-FV6$FcpFT>8-- %-jets/nrsolveG6#Fbq@%30FJ7"2FO-FQ6#F;>8.-FV6$f*FYF$FenF$-F[p6$Fin7#-Ffq6$&F]p6 #Fdp/Fdp;,&FfpF>F>F>,&FfpF>-FQ6#FgpF>F$F$6*F'F;F-FjqF+FOF(F@Fcr>F_s-FV6$f*FYF$F enF$-F[p6$Fin-F[p6$F]pFdpF$F$6&F,FTF(F@Fcr-%#opG6#-%'expandG6#-%)simplifyG6#F_s F$F$F$F$, Q.jets/apptrn.mF$ M7R0 I,jets/cchconf*6"6:%#arG%%itrlG%%dtrlG%$conG%$psiG%'oframeG%%ivarG%%dvarG%"aG%" nG%"mG%&oivarG%%nconG%$jacG%%ijacG%+new_oframeG%$jetG%&ncon2G%$addG%%_conG%%rco nG%"iG%"jG%"kG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reser ved.GF$C7>8$-%,jets/inpcchG6#9">8%&FB6#""">8&&FB6#""#@+-%%typeG6$&FB6#""$%'matr ixG>8'7#FU-FS6$FU%)listlistG@'-FS6$&FUFJFhn>FZFU-FS6$F\o%%listG>FZ7#-%+jets/mkm atG6#FU-%&ERRORG6#%FThe~connection~form~has~wrong~syntax!G3333-FS6$FUF`o/-%%nop sGFeoFPF^o-FS6$&F\oFJFX-FS6$&FUFOFXC$>FZF\o>8(-%%copyG6#Fhp33333F^p/FapFWF^oFcp Ffp-FS6$&FUFVF`oC%>FZF\o>F\qF]q>8)Fhq>FZFU>8*&FB6#""%>8+&FB6#""&>8,-&%'linalgG6 #%'coldimG6#&FZFJ>8--Fbp6#F`r>8.-Fbp6#Fer>8/-%$mapG6$%$lhsGFH>80-%,jets/cchjetG 6'FHFMFZF`rFer@%-%)assignedG6#F\q>81F\q>Fjt-%,jets/jacobiG6%FHF`rFer>82-%+jets/ jsimpG6$-Fbu6%FjtFer&F]s6#%(inverseGFer@%-Fgt6#F]r>83-F]t6$f*6#%"xGF$6$%)operat orG%&arrowGF$-%,jets/cchvecG6'T#T%9$T'T)F$F$6*F'FHF(FMF,F`rF-FerF]r>F]v-F]t6$f* FavF$FcvF$FfvF$F$F^w-F]t6$f*FavF$FcvF$7#7$FK7#F[wF$F$F$F[t>84-F]t6$f*FavF$FcvF$ -F]t6$f*6#%"bGF$FcvF$-Fbu6$-%+jets/ldjetG6&T$F[wFjvF\wF\wF$F$6(FbvF[wF,FjvF-F\w FivF$F$6(F3FjtF,F`rF-FerF]v>85-F]t6$f*6#F.F$FcvF$-Fbu6$-%&evalmG6#-%#&*G6$F[wFi vFjvF$F$6&F3FjtF-FerFat>86-F]t6$f*FavF$FcvF$-Fbu6$-Fdy6#,&&F[wFJFK&F[wFOFKFivF$ F$6$F-Fer-%*jets/pzipG6$F\yFjw>87-F]t6$f*FavF$FcvF$-Fbu6$-Fdy6#-Fgy6$FivF[wFjvF $F$6&F4F`uF-FerF[z>887#-%$seqG6$-F^q6#-FX6%FjrFjr""!/8:;FKFcs?(Fb\lFKFKFcs%%tru eG?(8;FKFKFjrFe\l?(89FKFKFjrFe\l>&&Fg[l6#Fb\l6$Fi\lFg\l-Fbu6$-%(convertG6$-F]t6 $f*6#%"sGF$FcvF$*&&&Fiv6#F[w6$FjvF\wFK&F]w6$F[wT+FKF$F$6,F9F[[lF;Fi\lF=Fg\lF3Fj tF<Fb\l7#-%"$G6#Fc\l%"+GFer-F^q6#Fg[lF$F$F$F$, Q.jets/cchcon.mF$ M7R0 I2jets/conservationf*6&%"QG%"LG%%ivarG%%dvarG6#%#_QG6#%inCopyright~(C)~2000-200 2~by~Gehrt~Hartjen.~All~rights~reserved.G6"C%@%-%,jets/chkvecG6#9$>8$-%.jets/ve c2charG6%F39&9'>F5-%,jets/mklistGF2@$0-%%nopsG6#F5-FA6#F:-%&ERRORG6#%aoThe~char acteristic~must~have~as~many~components~as~dependent~variablesG@%32""%9#-%%type G6$&9"6#""&%*nonnegintG&-%.jets/homotopyG6%-%+jets/dprodG6$F5-%+jets/EulerG6%9% F9F:F9F:6#FQFWF-F-F-F-, Q4jets/conservation.mF- M7R0 I,jets/diffvff*6$%$vecG%%ivarG6%%%dvarG%%DvarG%$cmdG6#%[oCopyright~(C)~2000-200 2~by~Mohamed~Barakat.~All~rights~reserved.G6"C%@%2""#9#C$>8$-%,jets/mklistG6#&9 "6#""$>8%F5C$>F5%%NULLG>F>7"@%2F<F2>8&&F:6#""%>FG%'expandG-%%subsG6%/%$_JSG%+je ts/jsimpG/%%_JSCGFG-FN6$/%$_FFG%(partderG-%(unapplyG6$-FQ6%-%(convertG6$-%$mapG 6$f*6#%#zzGF-6$%)operatorG%&arrowGF-*&&9$6#"""Fio-FX6&%#_aG&Fgo6#F1T$T%FioF-F-6 &F&9%F(F5Fgo%"+GF>FTF\pF-F-F-F-, Q.jets/diffvf.mF- M7R0 I-jets/getcondf*6%%&_leqnG%'_funcsG%&_ivarG61%%ivarG%%dvarG%%leqnG%&funcsG%&fna meG%$f2sG%$s2fG%&fivarG%&fjvarG%$s2iG%$varG%%jvarG%$rstG%$i2sG%$cndG6#%[oCopyri ght~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C8>8$-%,jets/mklis tG6#9&@%2""$9#>8%-F?6#&9"6#""%>FG7">8&-%$mapG6$f*6#%"aGF:F:F:@%-%%typeG6$9$%"=G ,&-%$lhsG6#Ffn"""-%$rhsGF[o!""FfnF:F:F:-F?F[o>FQ-FS6$f*FVF:F:F:@$0Ffn""!FfnF:F: F:FQ>8'-F?6#9%>Fio-FS6$f*FVF:F:F:@$FfoFfnF:F:F:Fio>8(-FS6$%.jets/funcnameGFio>8 )-%*jets/ezipG6$Fcp-FS6%%(convertGFcp%'symbolG>8*-FS6$f*FVF:6$%)operatorG%&arro wGF:/F]oFinF:F:F:Fhp>8+-%.jets/sortjetsG6%-F?6#-%+jets/mksetG6#-FS6$f*FVF:F:F:@ $-FZ6$Ffn%)functionG-%#opGF[oF:F:F:FioF=FG>8,-%*jets/restG6$Fjq7$-F[s6#F=-F[s6# FG>8--Fjp6$-FS6$%-jets/ind2subGF]sF]s>8.7$Fbs-F[s6#-F\r6%-%-jets/getindsG6%FQFG Q!F:F=FG>8/-F_s6$F^tFas>81-Fjp6$Fit-FS6$F\tFit>80-F_s6$F^tFjq>Fcu-%%subsG6$F]uF cu>FQ-Fhu6%F]uFhpFQ>82-FS6%%-jets/jcoeffsGFQFcu>F^v-FS6%%+jets/rmfacG-Far6#F^v- Fhu6$FhpFio>F^v-F?Fgv6&-Fhu6$FaqF^v-Fhu6$F]uFjq-Fhu6$F]uFioFgsF:F:F:F:, Q/jets/getcond.mF: M7R0 I.jets/jet2formf*6&%%exprG%)ind2formG%%ivarG%%dvarG6#%(lstIndsG6#%XCopyright~(C )~2005~by~Arne~Lorenz.~All~rights~reserved.G6"C%>8$-%-jets/getindsG6%9$9'Q!F->F 0-%$mapG6$f*6#%"aGF-6$%)operatorG%&arrowGF-/F4-T(6%F4T$T&F-F-6(F'9&F(F5F&9%F06$ -%%subsG6$F0F4-F96$f*F<F-F>F-/-%$rhsG6#F4-%$lhsGFTF-F-F-F0F-F-F-F-, Q0jets/jet2form.mF- M7R0 I-jets/prolcchf*6"6+%#arG%%itrlG%%dtrlG%$numG%%ivarG%%dvarG%%evarG%&oivarG%&odv arG6#%[oCopyright~(C)~2000-2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C-@% -%%typeG6$&9"6#!""%'stringG>8$-%,jets/inpccvG6#&F76#;"""!"#>F<-F>6#F7>8%&F<6#FC >8&&F<6#""#>8'&F<6#""$>8(&F<6#""%>8)&F<6#""&@%2Fin-%%nopsG6#7#F<>8*&F<6#""'>Fao %%NULLG>8+-%$mapG6$%$lhsGFI>8,-Fjo6$F\pFM6(FIFMFao-%-jets/alljetsG6%FRFhoF^pFWF fn@%F3C$-%+jets/prolcG6#%"%G-%+jets/jsimpG6%FjpFfn%'expandGFgpF$F$F$F$, Q/jets/prolcch.mF$ M7R0 I,jets/prolcvf*6"66%#arG%%itrlG%%dtrlG%&ojvarG%%ivarG%%IvarG%%dvarG%&oivarG%&od varG%&_itrlG%&_dtrlG%$jacG%%ijacG%%replG%#poG%$chnG%"iG%"jG%%SUBSG%"kG6#%[oCopy right~(C)~2004-2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C2@%-%%typeG6$&9 "6#!""%'stringG>8$-%,jets/inpcchG6#&FB6#;"""!"#>FG-FI6#FB>8%&FG6#FN>8&&FG6#""#> 8'-%,jets/mklistG6#&FG6#""$>8+&FG6#""%>8*&FG6#""&>8(-%$mapG6$%$lhsGFT>8,-F[p6$F ]pFX>8)-F[p6$f*6#%"aGF$6$%)operatorG%&arrowGF$-%$catG6%%"_G9$F_qF$F$F$Fio>8--F[ p6$%$rhsGFT>8.-F[p6$FeqFX>8/.F[r>80.F^r>81%%NULLG?&84Fgn%%trueGC$@'-%'memberG6% FdrFio.82>83&Fbq6#F\s-Fir6%FdrF_pF[s>F^s&FgqF`sC&>F^s&Fgq6#-%,jets/getposG6$-%# opG6$""!FdrF_p@$4-%)assignedG6#F[rC$>F[r-%,jets/jacobiG6$FTF_o>F^r-%-jets/ijaco biGFit>86-F[p6$f*6#%"bGF$FipF$-F]t6#-%*jets/ezipG6$-F[p6$f*FgpF$FipF$&&T#6#T&6# F`qF$F$6&F-T'FcuF`qF^v-Fin6#-&%'linalgG6#%$rowG6$T%F`qF$F$6(F+FcpF2F^rF-F_o7#-% "$G6#;FN-%%nopsG6#F_o?&85-F]t6#FdrFerC%>87-Fjs6$FgwF_o>F^s-%+jets/chainG6)F^sF\ xFTFcp7$-F]tFew-F]t6#FdoQ!F$F[r>F^s-%%subsG6$F^uF^s>Far6$Far/FdrF^s-%+jets/jsim pG6$-Fjx6$-Fgu6$FcpFio7#FarFdoF$F$F$F$, Q.jets/prolcv.mF$ M7R0 I-jets/prolfinf*6&%&trnsfG%$numG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by ~Mohamed~Barakat.~All~rights~reserved.GF)-%+jets/prolfG6&9$-%-jets/alljetsG6%9% 9&9'F4F5F)F)F)F), Q/jets/prolfin.mF) M7R0 I-jets/scl2mopf*6#%%exprG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All ~rights~reserved.GF&@+4-%%typeG6$9$<%%'matrixG%&arrayG%%listG@%/F.""!F57#7$F.7" -F,6$F.<$F0F1-%$mapG6$f*6#%"aGF&6$%)operatorG%&arrowGF&@%F4F5F6F&F&F&F.-F,6$F.% )listlistGC$@$/F.7#F8-%&ERRORG6#%5[[]]~is~a~bad~input!G-F=6$f*F@F&FBF&-F"6#F.F& F&F&F.-F,6$F.F2C$@$/F.F8-FN6#%3[]~is~a~bad~input!G-F=6$f*F@F&FBF&@%F4F5F6F&F&F& F.-FN6$%-wrong~input:GF.F&F&F&F&, Q/jets/scl2mop.mF& M7R0 I,jets/setNewf*6"F$6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~reserved.G F$C$-%'printfG6#Q/Nothing~to~do!F$O%%NULLGF$6#%,jets/genvecGF$F$, Q.jets/setNew.mF$ M7R0 I)jets/totf*6$%$vecG%%ivarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~A ll~rights~reserved.GF'-%-jets/simpconG6$9$9%F'F'F'F', Q+jets/tot.mF' M7R0 I)diff/_jDf*6"6$%'lstDerG%)lstDummyG6%%XCopyright~(C)~2005~by~Arne~Lorenz.~All~ rights~reserved.G%'systemG%)rememberGF$C&>8$7$-%#opG6#&9"6#""#-F16#&F46#;""%!"" >8%&F46#""$>F?-%$mapG6$f*6#%"aGF$6$%)operatorG%&arrowGF$@$/-%'memberG6$9$T#%&fa lseGFRF$F$6$F&F.F?-%$_jDG6%&F46#"""F.F?F$F$F$F$, Q+diff/_jD.mF$ M7R0 I-jets/LieFormf*6&%"RG%%ivarG%%dvarG%%DvarG6#%$invG6#%fnCopyright~(C)~2004~by~M ohamed~Barakat.~All~rights~reserved.G6"C$>8$-%/jets/invtargetG6$9"Q!F--%,jets/i nv2LFG6%F09%9&F-F-F-F-, Q/jets/LieForm.mF- M7R0 I.jets/OrdEulerf*6%%%exprG%%ivarG%%dvarG6(%%heulG%$eulG%#ddG%%jcorG%#jjG%%pvarG 6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C&@$-%%ty peG6$9$%%listG-%&ERRORG6#%Jwe~do~not~expect~a~list~as~first~argumentG>8$%%NULLG ?&8&9&%%trueGC)@$3-%)assignedG6#&%*infolevelG6#%&EulerG2""!FJ-%&printG6#/%=OrdE uler:~dependent~variableGFA>8%-%-jets/partderG6&F7FA9%FB>8'-%-jets/getindsG6$F7 7#FA@$FF-FQ6#/%BOrdEuler:~list~of~jet~coordinatesGFfn?&8(FfnFCC%@$FF-FQ6#/%9Ord Euler:~jet~coordinateGFao@%5/9#""$-F56$&9"6#""%%'stringG>8)7#-%#opG6#Fao>Fep-%' removeG6%%$hasGFfpF_p>FV,&FV"""*&)!""-%%nopsG6#FepFaq-%.jets/totalderG6&-FX6&F7 FaoFZFBFepFZFBFaqFaq@$FF-FQ6#/%4OrdEuler:~done~withGFfn@%-F56$&F`p6#FdqFcp>F>6$ F>FV>F>6$F>-%'expandG6#-%+jets/jsimpG6$FVFB7#F>F1F1F1F1, Q0jets/OrdEuler.mF1 M7R0 I.jets/SEPARATEf*6%%$eqnG%$lfnG%%lvarG6(%%leqnG%)new_eqnsG%#iiG%'occfnsG%(occva rsG%%seqnG6#%>Copyright~(c)~1997~by~Khai~VuG6"C&>8$7#-%'expandG6#9$>8%%%NULLG?( F1"""F>F12""!-%%nopsG6#F4C$>8&F@?&8)F4%%trueGC&>FF,&FFF>F>F>>8'-%-jets/fmemberG 6$FH9%>8(-%'selectG6&f*6%%"aG%"bG%"cGF1F1F13-%$hasG6$FRF94-Fin6$9&F9F1F1F1F^oFH FN@%/-FB6#FTF@C$>F;6$F;FH@$1FAFF>F4-%'subsopG6$/FFF<F4C$>F47$-%#opG6#Fio-Fap6#- Fap6$F>-%,jets/sepsumG6$F9FT[<#F;F1F1F1F1, Q0jets/SEPARATE.mF1 M7R0 I/jets/classconsf*6&%#_QG%"LG%%ivarG%%dvarG6$%"QG%"PG6#%inCopyright~(C)~2000-20 02~by~Gehrt~Hartjen.~All~rights~reserved.G6"C%>8$-%,jets/mklistG6#9$@$-%,jets/c hkvecG6#F1-%'RETURNG6#-F"6&-%.jets/vec2charG6%F19&9'9%FBFC-%+jets/jsimpG6%,&-%- jets/currentG6&F1FDFBFC!""-%$mapG6$f*6#%"iGF.6$%)operatorG%&arrowGF.*&T$"""-%-j ets/partderG6&&T%6#FX&&T(Fhn6#&T*F4F^oF[oFXF.F.6*F&FDF*F1F(FCF'FB7#-%"$G6#;FX-% %nopsG6#FBFXFC-%"@G6$%'expandG%)simplifyGF.F.F.F., Q1jets/classcons.mF. M7R0 I1jets/coefficientf*6$%$eqnG%%termG6#%%teqnG6#%>Copyright~(c)~1997~by~Khai~VuG6 "C$>8$-%'expandG6#9$@'-%%typeG6$F.%"+GC$>F.-%'selectG6%%$hasGF.9%-F06#*&F."""F> !""-F=6$F.F>F?""!F+F+F+F+, Q3jets/coefficient.mF+ M7R0 I/jets/collectedf*6#'%$lstG%%listG6'%$srtG%$prvG%$numG%$resG%"iG6#%[oCopyright~ (C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)@$/9$7"-%'RETURNG6#F 4>8$-%%sortGF8>8%&F:6#""">8&FA>8'%%NULLG?&8(-%'subsopG6$/FAFFF:%%trueG@%/FHF>>F C,&FCFAFAFAC%>FE6$FE7$F>FC>F>FH>FCFA7$FEFUF0F0F0F0, Q1jets/collected.mF0 M7R0 I-jets/darbouxf*6$%#AAG%%ivarG6'%&frameG%"AG%"mG%"aG%#A_G6#%[oCopyright~(C)~200 0-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C(@%2""#9#>8$&9"6#""$>F6-%$ma pG6$f*6#%"xGF/6$%)operatorG%&arrowGF/7#7$"""7#9$F/F/F/9%>8%-%+jets/mkmatG6#FI>8 &-%%nopsG6#FJ>8'-&%'linalgG6#%'coldimG6#FL>8(-%)simplifyG6#-&FY6#%(inverseGFfn- F=6$f*F@F/FBF/-Fjn6#-%&evalmG6#-%#&*G6$T#-F=6$f*6#%"yGF/FBF/-%+jets/ldjetG6%&F[ p6#T&FIT(F/F/6(F(T'FAFIF&T*T%F/F/6*F,FhnF)FLF(F6F&FJ7#-%"$G6#;FGFQF/F/F/F/, Q/jets/darboux.mF/ M7R0 I.jets/evol2vecf*6%%$vecG%%ivarG%%dvarG6.%"iG%#niG%#ndG%#aaG%#bbG%%lvarG%%jvarG %$varG%%svecG%%charG%#xxG%#xiG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~ All~rights~reserved.G6"C->8%-%%nopsG6#9%>8&-F<6#9&>8)7$-%#opGF=-FHFB>8*-%+jets/ hjetsG6%"""F>FC>8+7$-FH6#FE-FH6#FK>8,-%-jets/sortconG6$9$FC>8--%$mapG6$f*6#%"xG F76$%)operatorG%&arrowGF7&Ffn6#FOF7F7F7FX?(8'FOFOF@%%trueG?(8(FOFOF@Ffo?(8$FOFO F:Ffo@$0FeoFhoC$>8.-%+jets/jsimpG6$--&%"DG6#,(F@FO*&FhoFOF:FOFOFjoFO6#-%(unappl yG6$&Fhn6#FeoFQ6#-FH6#FQFC@$0F_p""!C$-%&printG6$/-%%DiffG6$-%$catG6$.%"QG&FCF_q &&FC6#Fho6#&F>6#FjoF_p0%!GFeq-%'RETURNG6#%JERROR_1:~This~is~not~a~point~vector~ fieldG>8/7#-%$seqG6$--&Ffp6#,(F:FOF@FOFjoFO6#-F\q6$&FhnFcoFQF`q/Fjo;FOF:?(Feo"" #FOF@Ffo?(FjoFOFOF:FfoC$>F_p-Fap6$,&--&Ffp6#,(F@FO*&FeoFOF:FOFOFjoFOFjpF`qFO&Fa sFir!""FC@$FdqC$-Fhq6$/,&-F\r6$F^r&FcrFgrFO-F\r6$-F_r6$Far&FCFco&F^vFgrF`uF_pFj r-F]s6#%JERROR_2:~This~is~not~a~point~vector~fieldG-%-jets/simpconG6%7$-FH6#-%$ zipG6%f*6$F^o%"yGF7F_oF77$,$FfnF`u7#F>F7F7F7FasF>-Fds6$7$,&&FhnFirFO-%(convertG 6$-Fjn6$f*6#%"kGF7F_oF7*&&T#6#,&*&T%FO,&T'FOF`uFOFOFOFfnFOFO&T)6#FfnFOF7F76*F/F KF+F@F)FjoF4Fas7#-%"$G6#F`t%"+GF`u7#&FCFir/Fjo;FOF@FEFCF7F7F7F7, Q0jets/evol2vec.mF7 M7R0 I.jets/gcollectf*6$%$dopG%%ivarG6)%"iG%"jG%"vG%"lG%"AG%#dpG%#dvG6#%inCopyright~ (C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C*@$/9$""!-%'RETURNG6#F6 >8$""">8(7"@%2""#9#C$>8*&9"6#""$@)/FF!"">8)-%%sortG6$-%$mapG6$f*6#%"xGF16$%)ope ratorG%&arrowGF17$&F56#F<-FQ6$&F56#FBf*6$%"aG%"bGF1F1F1-%,jets/iorderG6%F59%T$F 1F16$F&FeoF1F16$F&FdoF5f*F^oF1F1F1-%-jets/oporderGFcoF1F1Fgo/FFF<>FO-FQ6$-FT6$f *FWF1FYF17$Fgn-FQ6$F[of*F^oF1F1F1FaoF1F1FfoF1F1FgoF5f*F^oF1F1F1-%.jets/roporder GFcoF1F1Fgo32FJFC/&FH6#""%FM>FO-FQ6$-FT6$f*FWF1FYF17$Fgn-FQ6$F[of*F^oF1F1F1FaoF 1F1FfoF1F1FgoF5f*F^oF1F1F1-%.jets/rvforderG6&F5FdoFeoT%F1F16&F&FdoF.FF>FO-FQ6$- FT6$f*FWF1FYF17$Fgn-FQ6$F[of*F^oF1F1F1FaoF1F1FfoF1F1FgoF5f*F^oF1F1F1-%-jets/vfo rderGF\rF1F1F^r>FO-FQ6$-FT6$f*FWF1FYF17$Fgn-FQ6$F[of*F^oF1F1F1FaoF1F1FfoF1F1Fgo F5f*F^oF1F1F1FgpF1F1Fgo?(F1F<F<F11F;-%%nopsG6#FOC'>8'&FO6$F;F<>8&&FO6$F;FB?(F1F <F<F132F;Fis/&FO6$,&F;F<F<F<FBFbtC$>F^t,&F^tF<&FO6$F[uF<F<>F;F[u>F>7$-%#opG6#F> 7$F^tFbt>F;F[u>F>-FT6$f*FWF1FYF17$-%/jets/jsimplifyG6#FgnF[oF1F1F1F>?(8%-FjsFfu FMF<%%trueG@$/&F>6$FbvF<F6>F>-%'subsopG6$/Fbv%%NULLGF>@%/F>F?F7F>F1F1F1F1, Q0jets/gcollect.mF1 M7R0 I-jets/getmordf*6%%$eqnG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.GF(-%-jets/getiordG6$-%-jets/eqn2indG6%9$9%9&&9"6 #;""$!""F(F(F(F(, Q/jets/getmord.mF( M7R0 I,jets/ichsrcf*6"6*%#arG%%itrlG%%dtrlG%$srcG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchsrcG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichsrc.mF$ M7R0 I,jets/inptrnf*6%%&trnsfG%%funcG%%ivarG6/%&_ivarG%"nG%%dvarG%%lvarG%'_trnsfG%%_ itrG%$_idG%%_dtrG%"iG%'numtrnG%&_funcG%#lsG%#arG6#%[oCopyright~(C)~2000-2002~by ~Mohamed~Barakat.~All~rights~reserved.G6"C.>8$-%,jets/mklistG6#9&>8%-%%nopsG6#F ;@%2""$9#>8&-F=6#&9"6#""%>FJ7">8.-F=6#9%@$330FTFR0FJFR0-FC6#FT-FC6#FJ-%&ERRORG6 #%foThe~number~of~dependent~variable~and~the~number~of~functions~must~coincide! G@$3Fen-%%typeG6$&FT6#"""%"=G@(Ffn>FT-%.jets/srtbylstG6$FTFJ-%-jets/chkdvarG6$- %$mapG6$%$lhsGFTF;C%>FJFap-%&printG6#/%Nassuming~dvar~to~be~the~lhs~of~func,~wh ich~isGFJ-Fhp6#%!G-F_p6%FapF;Q!F8C%>FJ-Fbp6$f*6#%"aGF86$%)operatorG%&arrowGF8-% #opG6$""!-Fdp6#9$F8F8F8FTFgp-Fhp6#.F^q>8'7$-F]rFD-F]rF[o>8(-F=Far>8--FC6#F\s@%- Fco6$&F\sFfoFhoC*>8)-F\p6&F\sF;.8/.80@$0-FC6#FhsFAC'@'/-FC6#F^tF_r>8*-Fbp6$f*Fg qF8FiqF8/FbrFbrF8F8F8-%*jets/restG6$F;-F=6#F\t/FftFgo>Fit-Fbp6$f*FgqF8FiqF8/-Fb r6#-F]r6#T#FbrF8F86$F5F^tF^u-F]o6#/%hnthe~set~of~your~lhs~arguments~contains~mo re~than~one~element:GF^t>F\s7$-F]r6#Fit-F]rFas>F_sF`s-Fhp6#/%5assuming~trnsf~to ~beGF\sFcr@$3/FJFR2FAF_sC%>8+7#-%$seqG6$&F\s6#8,/Fjw;,&FAFgoFgoFgoF_s@&-F_p6$-F bp6$FdpFcwF;>FJFax-F_p6%FaxF;Faq>FJ-Fbp6$f*FgqF8FiqF8F\rF8F8F8Fcw@$FfnC%>FgrFhr -Fhp6#/%Oassuming~dvar~to~be~the~lhs~of~trnsf,~which~isGFJFcr>F\s-F\p6&F\sFgrF[ tF]t@$2FgoFftF_v@$2F`s-FC6#FgrC$>FgrF;>F\s-F\p6$F\sFgr@$2F`sF_s@%FfnC$-Fhp6$-%& minusG6$-%+jets/mksetGFar-FizFas%^owill~not~be~used,~probably~because~it~should ~be~the~prolonged~part!GFcrC$-Fhp6$Fez%Twill~not~be~used,~probably~because~of~m issing~dvar!GFcr>F\s-%$zipG6%f*6$Fhq%"bGF8FiqF8/Fbr-%$rhsGFVF8F8F8FgrF\s@'/F_sF AC$>F\s-%*jets/ezipG6$F;F\s@$/FjnFAC$-Fhp6$%gnassuming~that~only~the~independen t~variables~are~transformedGF\sFcr1FhyF_sC%>F\s7#-Ffw6$Fhw/Fjw;FgoFhy@$F`z@%Ffn C$FczFcrC$F][lFcr>F\s-F_\l6$FgrF\s-F]o6#%^pThe~number~of~transformation~compone nts~must~coincide~with~the~number~of~variables!G@$FZ@'FgnF\oFbo>FT-F_\l6$FJ-Fbp 6$Fi[lFT>FT-F_\l6$FJFT6&F\sFTF;FJF8F8F8F8, Q.jets/inptrn.mF8 M7R0 I-jets/jcoeffsf*6$%%exprG%%lvarG6#%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.G6"C%>8$-%,jets/sumsepG6$9$-%,jets/mklistG6#9%@$3 2""#9#-%%typeG6$&9"6#""$%'symbolG-%'assignG6$F?-%$mapG6$f*6#%"aGF+6$%)operatorG %&arrowGF+&F26#"""F+F+F+F.-%#opG6#-FH6$f*FKF+FMF+&F26#F:F+F+F+F.F+F+F+F+, Q/jets/jcoeffs.mF+ M7R0 I,jets/jsolvef*6"6)%#arG%%leqnG%&fivarG%&fdvarG%$solG%$SOLG%$verG6#%[oCopyright ~(C)~2000-2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C(@)3/9#"""-%%typeG6$ 9"-%%listG6#F:>8$-%#opG6#F833/F3""#-F66$&F86#F4F9-F66$&F86#FD%'stringG>F=-F?6#F G2FDF3>F=F8-%&ERRORG6#%.Wrong~Syntax!G>8%-%,jets/mklistG6#-%(convertG6$&F=FH%%d iffG>8&-FZ6#&F=FL>8'-FZ6#&F=6#""$@%/F\o7"C%>8(-%&solveG6$-%+jets/mksetG6#FX-Fap 6#Fao-FZ6#-%$mapG6$f*6#%"aGF$6$%)operatorG%&arrowGF$@$/-%$rhsG6#9$-%$lhsGFdqFfq F$F$F$F\p>F\p7$-FZ6#F\p%"%GC&>Fao-Fhp6$f*F[qF$F]qF$@%-F66$Feq%)functionGFeq-Feq 6#-F?6#T#F$F$6$F(F\oFao>FX-Fhp6$f*F[qF$F]qF$@%-F66$Feq%"=G-%&numerG6#,&FfqF4Fbq !""FeqF$F$F$FX@$5-%)assignedG6#%(pdesolvG4-F66$&F86#FhsFM>F\p-%.jets/jpdesolvG6 %FXF\oFao@$354-F\tF[r0&F\pFHFio5F`t32Ffo-%%nopsG6#7#F=5/&F=6#""%Fio4-F66$FhuF9C &>8*-%*substringG6$-Fgn6$-%+kerneloptsG6#%(versionGFM;F4"")@)33/-FcuFbpF4/-FcuF dpF42F4-Fcu6#F\o>8)7#-%(pdsolveG6#&FXFH33Fcw0F`vQ)Maple~V,F$0F`vQ)Maple~6.F$>Fg w7#-Fjw6$FXFcp/FdwF4C$>Fao-Fhp6$f*F[qF$F]qF$@%FcrFeqFfrF$F$F[sFao>Fgw7#-%'dsolv eGF_p-FT6#%YCannot~handle~this~PDE~with~a~Maple~version~less~than~7!G@%/-Fcu6#F gwF4C$>Fgw-Fhp6$f*F[qF$F]qF$@%-F66$Feq<$F:%$setG-F?FdqFeqF$F$F$Fgw@$3Fcw4-F66$& FgwFHF:>Fgw-%*jets/ezipG6$Fao-%%subsG6$FgwFaoC$>Fgw-Fhp6$f*F[qF$F]qF$@%-F66$Feq Fbz-Fgn6$FeqF:FeqF$F$F$Fgw@$2F4Fbw>Fgw-Fhp6$f*F[qF$F]qF$-F\[l6$Fjr-F_[l6$FeqFjr F$F$6$F)FaoFgw@$0FgwFio>F\pFgwF\pF$F$F$F$, Q.jets/jsolve.mF$ M7R0 I+jets/jsubsf*6&%%_relG%%exprG%%ivarG%&_dvarG6/%%dvarG%$relG%&rel_iG%#reG%#lsG% #rsG%#slG%%SUBSG%'lstLhsG%"aG%"iG%$posG%(lstJetsG6#%ioCopyright~(C)~2000-2007~b y~Gehrt~Hartjen~and~Arne~Lorenz.~All~rights~reserved.G6"C1@%2""%9#>8$7$-%#opG6# -%,jets/mklistG6#9'-FC6#&9"6#""&>F@FE@%-%%typeG6$9$%"=G>8%7#FT>FWFT>FW-FF6#-%$m apG6$f*6#F3F96$%)operatorG%&arrowGF9@$0-%$lhsG6#FT-%$rhsGFcoFTF9F9F9FW>8,-Fhn6% %-jets/getiordG-Fhn6$FboFWF@@$-%'memberG6$!""Fgo-%&ERRORG6#%_oOnly~jet~variable s~can~be~substituted~here,~please~check~your~input!G>80-%%sortG6#7#-FC6#<#-FC6# Fgo>Fgp-Fhn6$f*6#F4F9F\oF9&T#6#,$FTFapF9F96$F6Fgp7#-%"$G6#;"""-%%nopsG6#Fgp>FW- Fhn6$f*F[oF9F\oF9-Fhn6$f*FeqF9F\oF9@$/&T%FcoT$&T'FcoF9F96(F3FTF2FgqF+F^s7#-F]r6 #;F`r-Fbr6#FgqF9F96&F2FgoF+FWFgp>Fgo7">8+F[t?&8&FW%%trueGC$>F]t7$-FC6#F]t-FC6#- Fhn6$f*6#F-F9F\oF9@'3-FR6$Fao%(indexedG-F_p6$-FC6$""!FaoFgqC(>F^sFcu>Fas7#-FC6# Fao>T)Fdo>T+-Fhn6$f*F[oF9F\oF9@%-%-jets/sublistG6$Fgq7#-FCFcoFT%%NULLGF9F96$F0F as-%-jets/getindsG6$T.7#F^s>F_v-Fhn6$f*F[oF9F\oF9@%-F_p6%FTFgq.F^s-%)userinfoG6 *F`r<$F"%&jsubsG%1substitution~forGFTFUFas%6has~been~overruled~byG&F]v6#F^sFTF9 F96*F2T/F5T1F/F]vF1T3F_v-FC6#-Fhn6$f*6#%"rGF9F\oF9/FT-%.jets/totalderG6&Fgq-%,j ets/remainG6$FgvF^sT(F]vF9F96*F/F]vF0FasF'T6F*FgqF_v-F_p6$FaoFgqC%>F_v-F\w6%F^w 7#FaoQ!F9>F_v-Fhn6$f*F[oF9F\oF9@%FewFhwFTF9F9FaxF_v-FC6#-Fhn6$f*FjxF9F\oF9@%-FR 6$FTF`u/FT-F^y6&-Feo6#F_sFgvT&FasF_sF9F96(F-FTF'FeyF*FgqFjyFbpF9F966F*[email protected](F08 *F/8)F6FgpF&9%F2FgoF58/F1F]tF'9&F_t>Fgo-Fhn6$FboF]t>Fgo-Fhn6$f*F[oF9F\oF97$FT-F hn6$f*FeqF9F\oF9@$F\sFTF9F96&F3FTF2FgqFcsF9F96$F2FgoFgo>Fgo-Fhn6$f*F[oF9F\oF9@$ 2F`r-Fbr6#&FT6#""#FTF9F9F9Fgo?&8-FgoF`t@$32F`r-Fbr6#&Fc]lF`]l2F`r-Fbr6#-%/jets/ jsimplifyG6#<#-FC6#-Fhn6$f*FeqF9F\oF9-Feo6#&FgqFcoF9F96$F1F]tFi]lC$@%4-%)assign edG6#%1_jsubs_ambiguousGC$>F`_l7#7$&Fc]l6#F`r-Fhn6$f*FeqF9F\oF9Ff^lF9F9Fi^lFi]l -%(WARNINGG6%QguMore~than~one~substitution~possible~for:~%1:~%2.~|+No~method~to ~decide~for~the~correct~one!~|+All~further~warnings~will~be~surpressed,~check~g lobal~variable~_jsubs_ambiguous.F9Fe_l-Fhn6$f*FeqF9F\oF9Ff^lF9F9Fi^lFi]l>F`_l7$ -FCF__l7$Fe_l-Fhn6$f*FeqF9F\oF9Ff^lF9F9Fi^lFi]l-Fiw6(F`rF[x%IMore~than~one~subs titution~possible~for:GFe_l-Fhn6$f*FeqF9F\oF9Ff^lF9F9Fi^lFi]l%INo~method~to~dec ide~for~the~correct~one!G-%+jets/jsimpG6%-%%subsG6$F]tFf[lF@-%"@G6$%)simplifyG% %evalGF9F__lF9F9, Q-jets/jsubs.mF9 M7R0 I+jets/ldlgrf*6%%$vecG%#LLG%%ivarG6#%%dvarG6#%[oCopyright~(C)~2000-2002~by~Moha med~Barakat.~All~rights~reserved.G6"C$@%2""$9#>8$-%,jets/mklistG6#&9"6#""%>F37" -%'expandG6#,&-%,jets/liederG6&9$9%9&F3"""*&FEFG-%)jets/DivG6%-%,jets/cflistG6$ FDFFFFF3FGFGF,F,F,F,, Q-jets/ldlgr.mF, M7R0 I.jets/mult2indf*6$%$indG%%ivarG6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Barak at.~All~rights~reserved.G%'systemG%)rememberGF'-%#opG6#-%$mapG6$f*6#%"iGF'6$%)o peratorG%&arrowGF'-%"$G6$&T$6#9$&T&F=F'F'6&F&9%F%F>7#-F96#;"""-%%nopsG6#FBF'F'F 'F', Q0jets/mult2ind.mF' M7R0 I/jets/projIsoTrf*6%'%%_sysG%%listG%%ivarG%%dvarG6)%$sysG%'isoSysG%&trSysG%$var G%%iOrdG%'nargs4G%(lstSubsG6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~re served.G6"C(@%32""$9#-%%typeG6$&9"6#""%F'C$>8$-%0jets/projlinsysG6(9$"""9%9&F>Q ,FactorBasisF4>8%-%/jets/linReduceG6)-%&ssubsG6%7#-%"$G6$""!-%%nopsG6#FKFDFKFI& %'linalgG6#%*gausselimGFJFKF>Q!F4C$>FD-FF6'FHFIFJFKFL>FN-FP6'FRFIFgnFJFK@$F7C,> 8'-%-jets/getindsG6$FNFK>FN-%$mapG6$f*6#%"aGF46$%)operatorG%&arrowGF4-%'coeffsG 6$FHT#F4F46$F.FfoFN>8(-%-jets/getiordG6$FNF>>8)-Fen6#F>>Ffo-F\p6$f*6#%"iGF4FapF 4-%$catG6$%#_uGFHF4F4F47#-FW6#;FIF_q>8*-%%ezipG6$-%+jets/hjetsG6%FjpFJF>-Ffr6%F jpFJFfo>FN-%+jets/jsubsG6&FarFNFJF>>FN-FP6(FNFIFgnFJFfoF[o>Far-F\p6$f*F_pF4FapF 4/-%$rhsG6#FH-%$lhsGFhsF4F4F4Far>FN-F\s6&FarFNFJFfo>8&-%%subsG6$-F\p6$f*F_pF4Fa pF4/FHFYF4F4F4-%-jets/jetcoorG6%FIFJFKFD@%F7>F_t-FP6)F_tFYFgnFJFKF>F[o>F_t-FP6' F_tFYFgnFJFK@$F7C)>Ffo-Fho6%F_tFKF[o>F_t-F\p6$f*F_pF4FapF4FdpF4F4FhpF_t>Fjp-F\q 6$F_tF>>Ffo-FhtFgr>F_t-%/jets/linmatrixG6&F_tFfo.FfoF[o>F_t-%(convertG6$-Fgn6$F _t-Fen6#Ffo%)listlistG>F_t-F\p6$f*F_pF4FapF4-Ffv6$-%$zipG6%f*6$%"bG%"cGF4FapF4* &FHFIFJFIF4F4F4FH7$-%#opG6#FgpFI%"+GF4F4FhpF_t7$FNF_tF4F4F4F4, Q1jets/projIsoTr.mF4 M7R0 I+jets/riccif*6$%#ggG%%dvarG6#%%ric2G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Ba rakat.~All~rights~reserved.G6"C$@%2""#9#>8$9%>F2-%,jets/ricci2G6$9$F3-%)simplif yG6#-%&evalmG6#-%#&*G6$-&%'linalgG6#%(inverseG6#F8F2F+F+F+F+, Q-jets/ricci.mF+ M7R0 I-jets/sortderf*6#%%lderG6&%(num_derG%%lordG%#iiG%%num_G6%%[oCopyright~(C)~2000 -2002~by~Mohamed~Barakat.~All~rights~reserved.G%'systemG%)rememberG6"C)>8$-%%no psG6#9$@$2F2""#-%'RETURNGF5>8')"#5-%'lengthG6#F2>8%7#-%$seqG6$,&*&-%,jets/order dG6#&F66#8&"""F=FQFQFPFQ/FP;FQF2>FD-%%sortG6#FD>FD-%$mapG6%f*6$%"aG%"bGF/F/F/-% %iremG6$F69%F/F/F/FDF=@%32FQ9#/&9"6#F9!""7#-FG6$&F66#&FD6#,&F2FQFPFfo/FP;""!,&F 2FQFfoFQ7#-FG6$&F66#&FDFOFRF/F/F/F/, Q/jets/sortder.mF/ M7R0 I-type/jets_vff*6#%$vecG6#%"aG6#%[pCopyright~(C)~2000-2006~by~Mohamed~Barakat~a nd~Arne~Lorenz.~All~rights~reserved.G6"@'5/9$""!/F.7"%%trueG3333-%%typeG6$F.%)l istlistG/-%%nopsG6#&F.6#"""""#4-F86$&F.6$FAFA%%listG-F86$&F.6$FAFBFH/-%(convert G6$-%$mapG6$f*F&F*6$%)operatorG%&arrowGF*-F=6#&F.6#FBF*F*F*F.%"*GFAF2%&falseGF* F*F*F*, Q/type/jets_vf.mF* M7R0 I.jets/char2vecf*6%%'chlistG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moh amed~Barakat.~All~rights~reserved.GF(-%.jets/evol2vecG6%-%/jets/char2evolG6$9$9 &9%F2F(F(F(F(, Q0jets/char2vec.mF( M7R0 I,jets/chkdopf*6#%$dopG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~r ights~reserved.GF&@)5/9$""!/F,7"%%trueG332"""9#-%%typeG6$&9"6#""#%'stringG-%,je ts/chksclG6#F,F033333-F76$F,%%listG-F76$&F,6#F4FH/-%%nopsG6#FKF<4-F76$&F,6$F4F4 FH-F76$&F,6$F4F<FH54-F76$FX-FH6#FH/FXF/F0%&falseGF&F&F&F&, Q.jets/chkdop.mF& M7R0 I-jets/cliecomf*6'%$_Q1G%$_Q2G%$_SSG'%%ivarG%%listG'%%dvarGF*6%%#Q1G%#Q2G%#SSG6 #%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)>8$-%, jets/mklistG6#9$>8%-F86#9%>8&-F86#9&@$-%,jets/chkvecG6#F6>F6-%.jets/vec2charG6% F69'9(@$-FG6#F<>F<-FK6%F<FMFN,&-%/jets/interprodG6&F6-%+jets/dprodG6$F<FAFMFN"" "-%0jets/GinterprodG6'F<F6FAFMFN!""@'-%%typeG6$&9"6#Fjn%'stringG%"%G2""&9#-%+je ts/jsimpG6%FcoFN&F`o6#""'-Fho6$FcoFNF3F3F3F3, Q/jets/cliecom.mF3 M7R0 I-jets/con2mapf*6$%$vecG%%lvarG6#%$varG6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.G6"C%@$/9$""!-%'RETURNG6#F0>8$-%$mapG6%%(convertG9 %%'symbolG-F96$-F76$f*6#%#zzGF+6$%)operatorG%&arrowGF+*&&F/6#"""FI-%%diffG6$-%$ _PPG6#-%#opG6#T#-FQ6#&F/6#""#FIF+F+6$F(F5-%-jets/ind2smbG6$F/F:%"+GF+F+F+F+, Q/jets/con2map.mF+ M7R0 I,jets/defvecf*6%%%_symG%&_ivarG%&_dvarG65%$symG%%ivarG%%dvarG%"nG%"mG%#XIG%$ET AG%%lvarG%%EVOLG%&WHEREG%%jvarG%&rjvarG%&hjvarG%&fivarG%$lxiG%%letaG%&fdvarG%&c harsG%#vfG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved. G6"C+@%-%%typeG6$9$%%listG@'/-%%nopsG6#FD""!>8$Q$geoF>3/FH"""5-FB6$&FD6#FQ%(int egerG-FB6$FU%'stringG>FMFU>FMFD>FMFD>8%-%,jets/mklistG6#9%>8&-F[o6#9&>8'-FI6#Fi n>8(-FI6#F_o@%32""$9#-FB6$&9"6#!""FZC$@%/FdoFQ>8)7#.%#xiG>Fjp-%$mapG6$f*6#%"aGF >6$%)operatorG%&arrowGF>-%$catG6$F\qFDF>F>F>7#-%"$G6#;FQFdo@%/FhoFQ>8*7#.%$etaG >Fcr-F`q6$f*FcqF>FeqF>-Fiq6$FerFDF>F>F>7#-F]r6#;FQFhoC$>Fjp-F`q6$f*FcqF>FeqF>&F \qFJF>F>F>Fin>Fcr-F`q6$f*FcqF>FeqF>&FerFJF>F>F>F_o>8+7$-%#opGFfo-F`tFjo@3-FB6$F MFZ@52FK-%+searchtextG6$Q$horF>FMC)>8,%&falseG>8.7">81Fin>82-F`q6$f*FcqF>FeqF>- FD6#-F`t6#T#F>F>6$F*FinFjp>837#-F]r6$FKFho>84Feu>86-%/jets/xieta2vecG6&FeuF`vFi nF_o2FK-Fht6$Q$solF>FMC)>F]uF^u>F`uFau>FcuFin>Feu7#-F]r6$FKFdo>F`v-F`q6$f*FcqF> FeqF>FiuF>F>F^vFcr>FevF`v>FgvFhv52FK-Fht6$Q%cvrtF>FM2FK-Fht6$Q&cvertF>FMC)>F]uF ^u>F`uFau>FcuF_o>FeuFdw>F`v-F`q6$f*FcqF>FeqF>FiuF>F>6$F+F_oFcr>FevF`v>FgvFhv52F K-Fht6$Q$vrtF>FM2FK-Fht6$Q%vertF>FMC)>F]uF^u>F`uFau>FcuF]t>FeuFdw>F`v-F`q6$f*Fc qF>FeqF>FiuF>F>6$F0F]tFcr>FevF`v>FgvFhv2FK-Fht6$Q$linF>FMC)>F]uF^u>F`uFau>FcuFi n>Feu-F`q6$f*FcqF>FeqF>FiuF>F>F^vFjp>F`v-F`q6$f*FcqF>FeqF>-%+jets/dprodG6$F]v-F `q6$f*6#%"bGF>FeqF>-&Ffr6$T&FDFjuF>F>6&F*T%FdqFDF]vF>F>6&F+F_oF*FinF_o>Fev7$-F` t6#Feu-F`t6#-F`q6$f*FcqF>FeqF>-F`t6#-F`q6$f*F]\lF>FeqF>F_\lF>F>Fc\lF]vF>F>Fe\lF _o>FgvFhv2FK-Fht6$Q$affF>FMC)>F]uF^u>F`uFau>FcuFin>Feu-F`q6$f*FcqF>FeqF>FiuF>F> F^vFjp>F`v-F`q6$f*FcqF>FeqF>,&-&FfrFJFjuFQ-Fh[l6$Fd\l-F`q6$f*F]\lF>FeqF>F_\lF>F >6&F*F]vFdqFDFd\lFQF>F>6&F*FinF+F_oF_o>Fev7$Fh\l-F`t6#-F`q6$f*FcqF>FeqF>6$Ff^l- F`t6#-F`q6$f*F]\lF>FeqF>F_\lF>F>F]_lFd\lF>F>F^_lF_o>FgvFhv552FK-Fht6$Q$prjF>FM2 FK-Fht6$Q%projF>FM2FK-Fht6$Q&gaugeF>FMC)>F]uF^u>F`uFau>FcuF]t>Feu-F`q6$f*FcqF>F eqF>FiuF>F>F^vFjp>F`v-F`q6$f*FcqF>FeqF>FiuF>F>FdzFcr>Fev7$Fh\l-F`t6#F`v>FgvFhv5 52FK-Fht6$FNFM2FK-Fht6$Q&pointF>FM32FK-Fht6$Q$conF>FM2FQFioC)>F]uF^u>F`uFau>Fcu F]t>Feu-F`q6$f*FcqF>FeqF>FiuF>F>FdzFjp>F`v-F`q6$f*FcqF>FeqF>FiuF>F>FdzFcr>FevFh al>FgvFhv3Ffbl/FioFQC(>F]u%%trueG>F`u-%+jets/hjetsG6%FQFinF_o>Fcu7$-F`t6#F]t-F` t6#F`u>Fev-F`q6$f*6#%"uGF>FeqF>--Fiq6$.%"QGFDFjuF>F>6$F6FcuF_o>85Fev>Fgv-%.jets /char2vecG6%FeelFinF_o-%&ERRORG6#%Gthe~first~argument~has~a~wrong~syntax!G3333- FB6$FMFE2FQ-FI6#FM-FB6$&FM6#""#%*nonnegintG-FB6$&FMFVFZ2FK-Fht6$Q%qlinF>F_glC)> F]uF]dl@%32F[glFefl4-FB6$&FM6#F^pFZC%>8-%\oCASE,1,1:~["qlin",order,Ivar]~meanin g~quasi-linear~characteristicG>F`u-%-jets/alljetsG6%,&FiflFQFepFQ-F[o6#F\hlF_o> 80-%-jets/jetcoorG6%FiflFghlF_oC%>F`hl%gnCASE,1,2:~["qlin",order]~meaning~quasi -linear~characteristicG>F`u-Fdhl6%FfhlFinF_o>Fjhl-F\il6%FiflFinF_o>8/-F`q6$%-je ts/ind2revGFjhl>FcuF`u>Fev-F`q6$f*F\elF>FeqF>-F`t6#-F`q6$f*FcqF>FeqF>-&-Fiq6$Fa elFb\lFJFjuF>F>6&F3Fd\lF]elFDF]vF>F>6&F4FhilF3F`uF_o>Feel-F`q6$f*F\elF>FeqF>-Fh [l6$F]v-F`q6$f*FcqF>FeqF>FfjlF>F>6&F3T'F]elFDFd\lF>F>6(F5FjhlF4FhilF3F`uF_o>Fgv -%/jets/char2evolG6$FeelF_o3F_fl2FK-Fht6$Q%qaffF>F_glC)>F]uF]dl@%FgglC%>F`hl%jn CASE,2,1:~["qaff",order,Ivar]~meaning~quasi-affine~characteristG>F`uFchl>FjhlF[ ilC%>F`hl%enCASE,2,2:~["qaff",order]~meaning~quasi-affine~characteristG>F`uFbil >FjhlFeil>FhilFiil>FcuF`u>Fev-F`q6$f*F\elF>FeqF>6$--Fiq6%FaelFDFDFju-F`t6#-F`q6 $f*FcqF>FeqF>FfjlF>F>6&F3F]vF]elFDFd\lF>F>6&F3F`uF4FhilF_o>Feel-F`q6$f*F\elF>Fe qF>,&Fe]mFQ-Fh[l6$Fd\l-F`q6$f*FcqF>FeqF>FfjlF>F>F]^mFf[mFQF>F>6(F3F`uF5FjhlF4Fh ilF_o>FgvFi[m3F_fl2FK-Fht6$FjzF_glC)>F]uF]dl@%FgglC$>F`hl%=CASE,3,1:~["lin",ord er,Ivar]G>F`u-F`dlF]ilC$>F`hl%8CASE,3,2:~["lin",order]G>F`u-F`dlFfil>Fhil-F`q6$ F[jlF`u>FcuFin>Fev-F`q6$f*F\elF>FeqF>-F`t6#-F`q6$f*FcqF>FeqF>FfjlF>F>6&F*Ff[mF] elFD7$F[v-F`t6#Fd\lF>F>6(F+F_oF4FhilF*FinF_o>Feel-F`q6$f*F\elF>FeqF>-Fh[l6$Fj`m -F`q6$f*FcqF>FeqF>FfjlF>F>6&F*T)F]elFD7$F[v-F`t6#Ff[mF>F>6*F+F_oF3F`uF4FhilF*Fi nF_o>FgvFi[m3F_fl2FK-Fht6$Fh]lF_glC)>F]uF]dl@%FgglC$>F`hl%=CASE,4,1:~["aff",ord er,Ivar]G>F`uFf_mC$>F`hl%8CASE,4,2:~["aff",order]G>F`uF[`m>FhilF]`m>FcuFin>Fev- F`q6$f*F\elF>FeqF>6$Fe]m-F`t6#-F`q6$f*FcqF>FeqF>FfjlF>F>6&F*F]vF]elFD7$F[amFjam F>F>6(F*FinF+F_oF4FhilF_o>Feel-F`q6$f*F\elF>FeqF>,&Fe]mFQ-Fh[l6$Fjcm-F`q6$f*Fcq F>FeqF>FfjlF>F>Ficm7$F[am-F`t6#FhamFQF>F>6*F*FinF+F_oF3F`uF4FhilF_o>FgvFi[m5-FB 6$FMF\gl33Fbfl2FKFefl-FB6$F_glF\glC(>F]uF]dl@%3Fdfl4-FB6$FiflFZC$>F`hl%7CASE,5, 1:~[order,Ivar]G>F`u-F`dl6%F_gl-F[o6#FiflF_oC$>F`hl%;CASE,5,2:~order~OR~[order] G>F`u-F`dl6%&-F[oFfflFVFinF_o>FcuFcdl>Fev-F`q6$f*F\elF>FeqF>F^elF>F>FcelF_o>Fee lFev>FgvFi[m33FbflFhgl-FB6$F_gl%)listlistGC'>F`hlQ9CASE,6:~[vf,fivar,fdvar]F>>F ]uF^u>FcuF`fm>FevFghl>Fgv-%-jets/simpconG6%F_glF]tF_o3Fbgm4F]glC(>F`hlQECASE,7: ~[chars,fivar,names~of~fdvar]F>>F]uF]dl>FcuF`fm>Fev-%.jets/srtbylstG6$-%'indets G6$F_gl-%)specfuncG6$%)anythingG-%+jets/mksetGFhhlFghl>Feel-F[o6#F_gl>FgvFi[m-F [fl6#%Hthe~first~argument~has~a~wrong~syntax!!G6%FgvFcuFevF>F>F>F>, Q.jets/defvec.mF> M7R0 I,jets/facsepf*6$%%termG%$varG6#%%dfacG6#%>Copyright~(c)~1997~by~Khai~VuG6"@'-% %typeG6$9$%"*GC$>8$-%'selectG6%%$hasGF09%7$F4*&F0"""F4!""-F86$F0F97$F0F<7$F<F0F +F+F+F+, Q.jets/facsep.mF+ M7R0 I.jets/frechetof*6%%&_leqnG%%ivarG%%dvarG6$%%leqnG%"AG6#%[oCopyright~(C)~2000-2 002~by~Mohamed~Barakat.~All~rights~reserved.G6"C%>8$-%,jets/mklistG6#9$>8%-%(co nvertG6$-%$mapG6&%,jets/diffopG-%.jets/frechetcG6%F09%9&FAFB%)listlistG@%34-%%t ypeG6$F4%%listG/-%%nopsG6#FB"""&F66$FOFOF6F-F-F-F-, Q0jets/frecheto.mF- M7R0 I-jets/getdrvsf*6$%$eqnG%%dvarG6#%$lfnG6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.G6"C%@$32""#9#4-%%typeG6$&9"6#""$%'stringG-%&ERROR G6#%\qexpects~as~a~second~argument~dvar~(not~ivar!).~If~a~third~argument~is~giv en,~it~must~be~a~string.G>8$-%'selectG6%%-jets/isderivG-%'indetsG6$9$%)function G9%-%-jets/sortderG6$-%(convertG6$F@%%listG!""F+F+F+F+, Q/jets/getdrvs.mF+ M7R0 I-jets/hamcharf*6&%"HG%"JG'%%ivarG%%listG%%dvarG6#%#_JG6#%[oCopyright~(C)~2000- 2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C$@%-%,jets/chkdopG6#9%C$>8$-%' matrixG6$"""F<>&F8F;F5>F8-%+jets/mkmatGF4-%,jets/appmatG6$-%$mapG6&%,jets/diffo pGF89&9'-%+jets/EulerG6%9$FIFJF/F/F/F/, Q/jets/hamchar.mF/ M7R0 I,jets/ichconf*6"6*%#arG%%itrlG%%dtrlG%$conG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchconG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichcon.mF$ M7R0 I,jets/ind2jDf*6&%%exprG%%ivarG%%dvarG%%IvarG6%%(lstSubsG%)lstSubs1G%)lstSubs2G 6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~reserved.G6"C%>8$-%-jets/geti ndsG6%9$9&Q!F/>8%-%$mapG6$f*6#%"aGF/6$%)operatorG%&arrowGF/@%-%%typeG6$F6%(inde xedG@$-%(convertG6$-F<6$f*6#%"bGF/FAF/@%-%'memberG6$F6T$%%trueG%&falseGF/F/6$F& FV7#-%#opG6#F6%$andGF6F6F/F/6$F&9%F2@%0-%%nopsG6#F:-F^o6#F2C&>8&-%*jets/restG6$ F2F:-%(WARNINGG6$QPThe~following~variables~will~be~set~to~zero:~%1F/Fdo>F:-F<6$ f*F?F/FAF//F6-%,jets/jet2jDGFUF/F/6$F(9'F:@%32""%9#-FF6$&9"6#!""%'stringG7$-%%s ubsG6%-%*jets/ezipG6$Fdo7#-%"$G6$""!-F^o6#FdoF:F6F:FbqC$>F:-F<6$f*F?F/FAF/F`pF/ F/FcpF:@%Ffp7$-Fcq6$F:F6F:FfrF/F/F/F/, Q.jets/ind2jD.mF/ M7R0 I-jets/ind2subf*6#%$varG6"6#%[oCopyright~(C)~2000-2004~by~Mohamed~Barakat.~All~ rights~reserved.GF&@)3-%%typeG6$9$%(indexedG-F,6$-%#opG6$""!F.%'symbolG-%$catG6 %F2%"_G-F36#F.32"""9#-F,6$&9"6#!""%'stringGF.-F,6$F.F6-F86$F.F:-%&ERRORG6$%.can not~handleGF.F&F&F&F&, Q/jets/ind2sub.mF& M7R0 I-jets/jreducef*6&%$redG%%exprG%%ivarG%%dvarG6&%&_exprG%&_indsG%%operG%$cmdG6#% [oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@'-%%typ eG6$&9"6#!""%'stringG>8&f*6#%"aGF06$%)operatorG%&arrowGF0-%+jets/jsimpG6%9$T$-% "@G6$%'expandG%&numerGF0F06$F(9'2""%9#C$>8'&F76#""&>F<f*F>F0F@F0-FD6%FFFGT%F0F0 6&F(FNF-FT>F<f*F>F0F@F0-FD6%FFFGFKF0F0FM>8$9%>8%-%-jets/getindsG6%F]oFNQ!F0?(F0 """FfoF00-%+jets/jsubsG6&FFF`o9&FNF`oC$>F]o-Fio6&FFF]oF[pFN>F`oFao-F<6#F]oF0F0F 0F0, Q/jets/jreduce.mF0 M7R0 I,jets/lorderf*6%%"aG%"bG%%ivarG6"6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen .~All~rights~reserved.GF(@%2""$9#@'/&9"6#""%!""-%-jets/oporderG6%9$9%9&32F4F./& F26#""&F5-%.jets/rvforderG6&F9F:F;F1-%-jets/vforderGFD-%.jets/roporderGF8F(F(F( F(, Q.jets/lorder.mF( M7R0 I+jets/nsbraf*6&%#_HG%#_KG%&_ivarG%&_dvarG6+%"HG%"KG%%ivarG%%dvarG%#_PG%#_QG%#_ RG%%operG%%pathG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~res erved.G6"C,>8&-%,jets/mklistG6#9&>8'-F:6#9'@%-%,jets/chkdopG6#9$>8$7#7#FF>FHFF@ %-FD6#9%>8%7#7#FO>FQFO>8(-%$mapG6$f*6#%"aGF56$%)operatorG%&arrowGF5-%$catG6$.T# FFF5F56$F.FVF>>8)-FX6$f*FenF5FgnF5FjnF5F56$F/FaoF>>8*-FX6$f*FenF5FgnF5FjnF5F56$ F0FgoF>@'32""%9#-%%typeG6$&9"6#""&%'stringG>8+f*FenF5FgnF5FFF5F5F53F^p/Fdp""!>F jp%)OrdEulerG>Fjp%(intnormG@%32FgpF`p/FjpFbq>8,&Fep6#""'>Fhq%%NULLG-Fjp6%-%+jet s/jsimpG6$-%(convertG6$-FX6$f*6#%"AGF5FgnF5-Fdr6$-FX6$f*6#%"BGF5FgnF5-%+jets/dp rodG6$&T$6#"""--%,jets/diffopG6%-%+jets/lddopG6&-%/jets/char2evolG6$--F[t6%&FFF gsT%7$-%#opG6#T'-Fjt6#&Ffs6#""$F^uF\u&FF6#""#FgtFhtFgt7$Fit-Fjt6#&FfsFcuFguF5F5 6(FjrFFF,F\uF-T)7$7$F^oFgt7$FgtF^o%"+GF5F56*F*FHF+FQF,F8F-F>7%7%FVFaoFgo7%FgoFV Fao7%FaoFgoFVF^v7&-Fjt6#F>-Fjt6#FV-Fjt6#Fao-Fjt6#FgoF8FdvF5F5F5F5, Q-jets/nsbra.mF5 M7R0 I-jets/partderf*6%%%funcG%%lvarG%%ivarG6,%%dvarG%$varG%&_lvarG%&llvarG%%jvarG%& jjvarG%&njvarG%#jjG%%jvecG%%xvecG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.G6"C&@%2""$9#>8$-%,jets/mklistG6#&9"6#""%>F<7">8%6$-%#op G6#9&-FJ6#F<>8&-F>6#9%@%/FPFE9$C*>8(-%-jets/getindsG6$FVF<>8)7$FG-FJ6#FY?&8+FP% %trueG@$4-%'memberG6$F]oFhn-%'RETURNG6#""!>8*-%.jets/repljetsG6$-%%nopsG6#7#FGF hn>8,-%*jets/ezipG6$FYFio>8--Fdp6$FioFY>8'-%%subsG6$FbpFP-F]q6$Fgp-%(convertG6$ -%%diffG6$-F]q6$FbpFVF[q%"DGF5F5F5F5, Q/jets/partder.mF5 M7R0 I+jets/prolvf*6&%$vecG%&_jvarG%%ivarG%%dvarG6#%%jvarG6#%[pCopyright~(C)~2000-20 05~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"C$>8$-%,jets/mkli stG6#9%@%32""%9#-%%typeG6$&9"6#""&%%listG-%-jets/simpconG6%7$-%#opG6#9$-FG6#-%- jets/proljetG6'FIF09&9'F=7%-FG6#FO-FG6#FP-FG6#F0FP-FC6%7$FF-FG6#-FM6&FIF0FOFPFQ FPF-F-F-F-, Q-jets/prolv.mF- M7R0 I.jets/rvforderf*6&%"aG%"bG%%ivarG%%dvarG6%%"iG%"pG%"qG6#%inCopyright~(C)~2000- 2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"@+2-%%nopsG6#-%#opG6#&9%6#""#-F36 #-F66#&9$F:-%'RETURNG6#%%trueG2F<F2-FC6#%&falseG-%%typeG6$F>%'symbolG@%4-FK6$F5 FMFGC%-%'memberG6%F>7$-F66#9'-F66#9&.8%-FT6%F5FV.8&@%1FhnF\oFBFGFPFBC&-FT6%-F66 $""!F>FYFgn-FT6%-F66$FdoF5FYF[o@'2FhnF\oFB2F\oFhnFG?(8$"""F^pF<FEC&-FT6%-F66$F] pF>FfnFgn-FT6%-F66$F]pF5FfnF[o@$FjoFB@$F[pFGFBF/F/F/F/, Q0jets/rvforder.mF/ M7R0 I.jets/spartderf*6%%%funcG%%lvarG%%ivarG6(%%dvarG%&_lvarG%%jvarG%#jjG%#poG%$idx G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C%@%2" "$9#>8$-%,jets/mklistG6#&9"6#""%>F87">8%-F:6#9%@%/FCFA9$C&>8)%%NULLG>8&6%-%#opG 6#9&-FR6#F8-FR6#-%-jets/getindsG6$FIF8?&8'FC%%trueG@%-%'memberG6%Fgn7#FO.8(>FL6 $FLF_o-%'RETURNG6#""!--&%"DG6#FL6#-%(unapplyG6$FIFO6#FOF1F1F1F1, Q0jets/spartder.mF1 M7R0 I.jets/totalderf*6&%%funcG%'_livarG%%ivarG%%dvarG6(%%exprG%%IvarG%&sIvarG%)lsts IvarG%(lstSubsG%&livarG6#%[pCopyright~(C)~2000-2005~by~Mohamed~Barakat~and~Arne ~Lorenz.~All~rights~reserved.G6"C$>8)-%,jets/mklistG6#9%@'/F57"9$5/9#""$32FAF@/ 9'F<-%-jets/partderG6#9"C+>8%-%%sortG6#7#-%#opG6#<#-FR6#F5>8&-%$mapG6$f*6#%"aGF 26$%)operatorG%&arrowGF2-FZ6$f*6#%"bGF2FinF2@$/T$F=FcoF2F26$FhnF=T#F2F26$F/F5FL >FL-FZ6$f*FgnF2FinF2@$-%'memberG6$F=FcoF=F2F26$F'9&FL>8$-%,jets/ind2jDG6'F=F`pF EFLQ!F2>8(-FZ6$%$rhsG&Fbp6#""#?&8'FX%%trueG>Fhp7$-FR6#Fhp-FR6#-FZ6$f*6#%"iGF2Fi nF2-FR6#-%%diffG6$Feo-FR6#&T%6#;"""F=F2F26&F.FhpF-F`q7#-%"$G6#;Fhr-%%nopsG6#F`q >Fhp-FZ6$f*FgnF2FinF2/F=-%,jets/jD2jetG6$-FR6$FhrF=7#-%-jets/sortvarG6$-FR6$F^q F=FcoF2F2F_pFhp>Fbp-F`r6$&Fbp6#Fhr-FNFV-%%subsG6$FhpFbpF2F2F2F2, Q0jets/totalder.mF2 M7R0 I-jets/zerocolf*6#%"MG6#%#ZLG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All ~rights~reserved.G6"C$>8$7#-%"$G6$""!-&%'linalgG6#%'rowdimG6#9$-%$mapG6$f*6#%"i GF*6$%)operatorG%&arrowGF*@%-%&evalbG6#/-%(convertG6$-&F56#%$colG6$T&F9%%listGT #F9%%NULLGF*F*6&F'F-F%F97#-F06#;"""-&F56#%'coldimGF8F*F*F*F*, Q/jets/zerocol.mF* M7R0 I0jets/natinf.oldf*6%%%_invG%&_ivarG%&_dvarG60%$invG%%ivarG%%dvarG%"nG%$teqG%$L HSG%%lvarG%%uvarG%%SUBSG%%DvarG%$INDG%%pvecG%$vecG%&pvec2G6#%fnCopyright~(C)~20 05~by~Mohamed~Barakat.~All~rights~reserved.G6"C.>8$-%,jets/mklistG6#9$>8%-F>6#9 %>8&-F>6#9&>8'-%%nopsG6#FB@$0FL-FN6#FG-%&ERRORG6#%[oThe~number~of~independent~a nd~dependent~variables~must~coincide!G>8(-%+jets/mksetG6#-%$mapG6$f*6#%"aGF96$% )operatorG%&arrowGF9-%%typeG6$F@%"=GF9F9F9F<@'/FY<#%%trueGC$>8)-Fhn6$%$lhsGF<@' 3-%-jets/chkdvarG6$FjoFB/-%-jets/getindsG6%FjoFGQ!F97"C%>8*-%;jets/get_vars_to_ eliminateG6%F<FBFG>8+Fjo>8,&-%-jets/nrsolveG6$F<F[q6#"""55/9#""$3/F\r""%5/&9"6# F`rFhp-Fao6$Fcr%'stringG3F_r/-Fep6%F<FcrFgpFhp-FU6#%ipThe~left~hand~sides~of~th e~first~argument~are~not~admissible~abstract~names~for~the~invariantsGC%>F`q-F> 6#Fcr>FbqF<>F<&-Feq6$FbqF`qFgq332F]rF\r0FcrFhp4FfrC$>F`qFbs@%/FY<#%&falseGC%>F[ qF\q>F<-%*jets/ezipG6$F`qF<>FbqFcq-FU6#%=Inconsistent~first~argument!G-FU6#%dtI 'm~not~able~to~extract~abstract~names~for~the~invariants.~Either~specify~them~a s~left~hand~sides~of~the~invariants~or~specify~them~in~a~fourtth~argumentG@'32F `rF\r4-Fao6$&Fdr6#""&Fhr>8--F>6#Fgu33F_rF]tFjr>F[vFbs@%/FLFhq>F[v7#%#xiG>F[v-Fh n6$f*F[oF9F]oF9-%$catG6$FevF@F9F9F97#-%"$G6#;FhqFL@%-Fao6$&Fdr6#!""Fhr>80-%/jet s/xieta2vecG6$F[vFB>Fiw-F[x6$-%-jets/ind2eqnG6%F[vFBF[vFB@%Fcw>8/-%$zipG6%f*6$F \o%"bGF9F]oF97$F@7#FEF9F9F9-%+jets/ldjetG6'Fiw-Fhn6$%$rhsGF<FBFGF[vF`q>Fex-Fgx6 %f*FjxF9F]oF9F\yF9F9F9-F_y6&FiwFayFBFGF`q>Fex-%.jets/gcollectG6%-%%subsG6$FbqFe xFBF`q?(F9FhqFhqF9FgoC%>81F[z@$/FdzFex-%'RETURNG6#-%,jets/addconG6&FiwFexFB7$-% #opGFS-F_[l6#F`q>FexFdzF9F9F9F9, Q2jets/natinf.old.mF9 M7R0 I-jets/LDsolvef*6$%$eqnG%$lfnG6)%&resfnG%%lderG%&LDderG%#iiG%(new_eqnG%$derG%&l nameG6#%>Copyright~(c)~1997~by~Khai~VuG6"C'>8*-%$mapG6$%.jets/funcnameG9%>8(-%' expandG6#9$>8%-%'indetsG6$F;%)functionG>FA-%'selectG6&%-jets/isderivGFAF4Q!F1@% /-%%nopsG6#FA""!-%&ERRORG6$%.contradictionGF?C)>FA-F66$%-jets/map2DerGFA>8&-%#o pG6$"""FA>FA-%'subsopG6$/Fjn%%NULLGFA?&8)FA%%trueG@$2-%,jets/comDerG6%FfnFboF4F Q>FfnFbo>Ffn-%-jets/Der2mapG6#Ffn>8$-%&solveG6$F;Ffn@%/F_pF`o-FS6$%=This~is~not ~a~polynomial~PDEGF;/Ffn-F=6#F_pF1F1F1F1, Q/jets/LDsolve.mF1 M7R0 I-jets/affpartf*6$%%exprG%%dvarG6#%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.G6"@'-%%typeG6$9$%"*G@%-%$hasG6$F09%""!F0-%'membe rGF5F7C$>8$-%'selectG6$f*6#%"aGF+6$%)operatorG%&arrowGF+4-F46$F0T$F+F+6$F&F6F0@ %/F<%%NULLGF7F<F+F+F+F+, Q/jets/affpart.mF+ M7R0 I,jets/diffopf*6$%$dopG%%ivarG6&%%dvarG%%DvarG%$cmdG%%mdopG6#%[oCopyright~(C)~2 000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&@$4-%%typeG6$9$<'%'matrix G%'vectorG%&arrayG%%listG%$setG-%'RETURNG6#f*6#%#_aGF.6$%)operatorG%&arrowGF.*& T$"""F5FGF.F.6$F%F5@%2""#9#C$>8$-%,jets/mklistG6#&9"6#""$>8%FOC$>FO%%NULLG>FX7" @%2FVFL>8&&FT6#""%>F[o%)simplifyG@%-%,jets/chkdopG6#F5-%%subsG6%/%$_JSG%+jets/j simpG/%%_JSCGF[o-Ffo6$/%$_FFG%.jets/totalderG-%(unapplyG6$-Fio6%-%(convertG6$-% $mapG6$f*6#%#zzGF.FBF.*&&F56#FGFG-F`p6&FA&F56#FKFFT%FGF.F.6&F&9%F(FOF5%"+GFXF\p FAC$>8'-FQFdo@'3-F36$F]rF:-Fco6#&F]rFbq-Ffo6%FhoF[p-Ffo6$F_p-Fcp6$-Fio6%-Fhp6$- F[q6$f*6#%"bGF.FBF.-Fhp6$-F[q6$f*F^qF.FBF.*&FaqFG-F`p6&&FA6#FFFeqT&T'FGF.F.6(Fd sF5F&F_tF(F`t&T#FdoFjqF.F.6(F+F]rF&FiqF(FO7#-%"$G6#;FG-%%nopsG6#F]rFjqFXF\pFA3- F36$FerF:-Fco6#&F]r6$FGFG-Ffo6%FhoF[p-Ffo6$F_p-Fcp6$-Fio6%-F[q6$f*6#%"cGF.FBF.- Fhp6$-F[q6$f*FcsF.FBF.-Fhp6$-F[q6$f*F^qF.FBF.FjsF.F.6(FdsF5F&T(F(T)&Fct6$F_tF5F jqF.F.6*F+FctF`vF5F&F_tF(F`t7#-Fgt6#;FG-F[u6#FbtFjqF.F.FdtFetFXF\pFA-%&ERRORG6$ %>cannot~recongnise~the~type~ofGF5F.F.F.F., Q.jets/diffop.mF. M7R0 I2jets/dividebyunitf*6$%"aG%"bG6"6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~Al l~rights~reserved.GF'C$@$/9$""!-%'RETURNG6#F.@'-%,jets/chkdopG6#9%@'-F46#F--%$m apG6$f*6#%"cGF'6$%)operatorG%&arrowGF'7$*&&F-6#"""FG&T$6$FGFG!""&F-6#""#F'F'6$F &F6F--F46$F-Q!F'*&F-FG&F6FJFK-%&ERRORG6$%4Wrong~ring~element:GF--F46$F6FR@'F8-F ;6$f*F>F'F@F'7$*&FEFGFIFKFLF'F'FOF-FP*&F-FGF6FKFU-FV6$FXF6F'F'F'F', Q4jets/dividebyunit.mF' M7R0 I-jets/divnormf*6%%%exprG%&_ivarG%&_dvarG62%%ivarG%%dvarG%"nG%#exG%"EG%#arG%#dl G%"iG%"jG%#rlG%#zzG%"PG%%pathG%"cG%"dG%#c1G6#%inCopyright~(C)~2000-2002~by~Gehr t~Hartjen.~All~rights~reserved.G6"C6@$-%%typeG6$9$%%listG-%&ERRORG6#%Jwe~do~not ~expect~a~list~as~first~argumentG>8$-%,jets/mklistG6#9%>8%-FJ6#9&>8&-%%nopsG6#F H>8-7">8/7#-%"$G6$""!FS>8.7#-Fhn6$Fjn-FU6#FN>8'-%'expandG6#FA@%-F?6$Fco%"+G>Fco -%(convertG6$FcoFB>Fco7#Fco@$2""$9#C$>8)&9"6#""%@&53-F?6$FgpFB-%-jets/sublistG6 $FgpFH-%'memberGFcqC$>8(-%$mapG6$f*6#%"xGF;6$%)operatorG%&arrowGF;-%.jets/OrdEu lerG6&FAT#T%T'F;F;6(F)FHF*FNF.FgpFco@$32F[qFdp-F?6$&Fip6#""&FB>80-%#opG6#F^s3F_ q4-F?6$&Fgp6#"""%'symbolG>Fbs-Fds6#Fgp@$4-%)assignedG6#Fhq>Fhq-Fjq6$f*F]rF;F_rF ;-Fcr6%FAFerFfrF;F;6&F)FHF*FNFco@$4-Fdt6#Fbs>Fbs%%NULLG@$45-F?6$&Fip6#!""FB-Feq 6$FhuFH>8*Fhu@$/-%+jets/jsimpG6$-F]p6$FhqFjoFNF\oC$@$-Fdt6#F^vC$>Fen-Fbv6$,&Fen F\t-%.jets/homotopyG6&FAFHFNFbsF\tFN-%'assignG6$F^vFen-%'RETURNG6#Fjn>8+F\t?(F; F\tF\tF;1Fiw-FU6#Fco@%/&Fhq6#FiwF\oC%@$Fhv>Fen-Fbv6$,&FenF\t-F`w6&&FcoFaxFHFNFb sF\tFN>Fco-%'subsopG6$/FiwFbuFco>Fhq-F]y6$F_yFhq>Fiw,&FiwF\tF\tF\t>FiwF\t?(F;F\ tF\tF;F[xC%>8,Fdy?(F;F\tF\tF;31FiyF\x0F`xF\oC&>81-Fbv6$-%$zipG6%f*6$%"aG%"bGF;F ;F;@'/FAFjnFbu/FLFjnQ!F;*&FAF\tFLFjuF;F;F;F`x&Fhq6#FiyFN>82-FU6#F`z>83&F`zF[t@% 3-F?6$Ff[l%(numericG/F`z7#-Fhn6$Ff[lFb[lC$@%1-%-jets/getiordG6$FjxFN-Fe\l6$&Fco F`[lFNC$@$Fhv>Fen-Fbv6$,&FenF\t-F`w6&-Fbv6$,&Fi\lF\t*&Ff[lFjuFjxF\tFjuFNFHFNFbs F\tFN>Fco-F]y6%/Fiw*&,&*$Ff[lFjuF\tF\tF\tF\tFjxF\t/FiyFbuFcoC$@$Fhv>Fen-Fbv6$,& FenF\t-F`w6&-Fbv6$,&FjxF\t*&Ff[lF\tFi\lF\tFjuFNFHFNFbsF\tFN>Fco-F]y6%/Fiw*&,&Ff [lF\tF\tF\tF\tFi\lF\tF]^lFco>Fhq-F]y6%/Fiw-Fbv6$,&F`xF\tF_[lF\tFNF]^lFhq>Fiy,&F iyF\tF\tF\t>FiwFdy@$FhvFbw-Fbv6$-F]p6$7$-FdsF]x-Fds6#FXFjoFNF;F;F;F;, Q/jets/divnorm.mF; M7R0 I.jets/einsteinf*6$%#ggG%%dvarG6$%%ric2G%"RG6#%[oCopyright~(C)~2000-2002~by~Moh amed~Barakat.~All~rights~reserved.G6"C%@%2""#9#>8$9%>F3-%,jets/ricci2G6$9$F4>8% -%-jets/scalarcG6%F9F3Q!F,-%)simplifyG6#-%&evalmG6#,&F3"""*&F;FGF9FG#!""F0F,F,F ,F,, Q0jets/einstein.mF, M7R0 I.jets/frechetmf*6&%#_HG%#_SG%&_ivarG%&_dvarG6(%"HG%"SG%%ivarG%%dvarG%%nvarG%%D varG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*> 8&-%,jets/mklistG6#9&>8'-F76#9'>8(-%$mapG6$f*6#%"aGF26$%)operatorG%&arrowGF2-%$ catG6$.%#_OG9$F2F2F2F;@%2""%9#>8)7$-%#opG6#F;-FX6#-F76#&9"6#""&>FUF;@%-%,jets/c hkdopG6#FO>8$7#7#FO>FboFO>8%-F76#9%-%.jets/frechetcG6%--%,jets/diffopG6%-%+jets /lddopG6&-%/jets/char2evolG6$F@F;FboF57$FW-FX6#F@F5FU6#FgoF5F@@%3F^o/-%%nopsGFY """&%"%G6$FaqFaqFcqF2F2F2F2, Q0jets/frechetm.mF2 M7R0 I-jets/grp2algf*6%%$_RRG%&_ivarG%&_dvarG6(%#RRG%%ivarG%%dvarG%$etaG%#xiG%%DvarG 6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8$-%,jets /mklistG6#9$>8%-F66#9%>8&-F66#9&@'32""$9#4-%%typeG6$&9"6#""%%'stringG>8)FL-FJ6$ &FM6#!""FP@%/-%%nopsG6#F?""">FR7#8'>FR-%$mapG6$f*6#%"aGF16$%)operatorG%&arrowGF 1-%$catG6$T#F8F1F16$F,Fjn7#-%"$G6#;FgnFZ@%/-Fen6#F:Fgn>FR7#8(>FR-F]o6$f*F`oF1Fb oF1FeoF1F16$F-Fep7#-F\p6#;FgnFap-%,jets/vertpbG6'F4F:F?F:FR@%FS-%%subsG6$-%*jet s/ezipG6$F:F?%"%GFiqF1F1F1F1, Q/jets/grp2alg.mF1 M7R0 I,jets/ibpcurf*6%%#_PG%&_ivarG%&_dvarG60%"PG%%ivarG%%dvarG%"nG%"RG%"ZG%"CG%$IBP G%#CCG%#arG%"iG%"cG%"dG%"jG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All ~rights~reserved.G6"C-@$-%%typeG6$9$%)listlistG-%&ERRORG6#%Swe~do~not~expect~a~ list~of~lists~as~first~argumentG>8$-%,jets/mklistG6#F?>8%-FH6#9%>8&-FH6#9&>8'-% %nopsG6#FK>8(FF>8)-%'matrixG6%FUFU7#-%"$G6$7#-F\o6$""!FUFU>8*-%%copyG6#Ffn?(8." ""Fio,&FUFio!""Fio%%trueGC*>8/.F_p>80.Fbp>8+-%-jets/intpartG6'&FF6#FhoFKFP&FK6# ;FioFhoF_p-%-jets/divnormG6'FepFKFPF[qFbp@&/&FbpF\q7#-F\o6$FaoFho>F_p,&F_pFioFb pFio-F=6$&9"6#F[p%'stringG-%&printG6$FepFbp>8,Fdo?(81,&FhoFioFioFioFioFUF\pC&>& Fco6$FhoFer-%+jets/jsimpG6$,$&F_p6#FerF[pFP>&Fco6$FerFho,$FirF[p>&FcrFjrFir>&Fc rFcsFbs>FZ,&FZFio-%*jets/CurlG6%FcrFKFPF[p@$32""$9#4-F=6$&F\r6#""%F^r-%'assignG 6$Fft-Feo6#FcoFZF9F9F9F9, Q.jets/ibpcur.mF9 M7R0 I,jets/inpccvf*6"6.%$narG%$optG%%ivarG%%dvarG%%exprG%"iG%$trnG%"nG%"mG%"kG%%itr lG%%dtrlG6#%fnCopyright~(C)~2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C/> 8$9#>8%%%NULLG@%43-%%typeG6$&9"6#!""%'stringG/FAQ!F$@'2""%F6C(>8&-%,jets/mklist G6#&FB6#,&F6"""FDFT>8'-FO6#&FB6#F6>8(&FB6#,&F6FT!"#FT>8*F:?(8)FTFT,&F6FT!"$FT%% trueG@%-F?6$&FB6#F^o<$%"=G-%%listG6#Fho>F\o6$F\o-%#opG6#-FO6#Feo>F96$F9Feo>F\o7 #F\o2""#F6C&>FM-FO6#&FB6#""$@%2F_qF6>FV-FO6#&FB6#FJ>FV7">Ffn&FB6#Fhp>F\o-FO6#&F B6#FT-%&ERRORG6#%Aat~least~three~arguments~needed!GC$@'FIC'>FM-FO6#Fgn>FVFN>F\o F:?(F^oFTFTF_oFao@%Fco>F\oF]p>F9Fdp>F\oFfpFgpC%>FM-FO6#Fjq@%Faq>FVF[q>FVFhq>F\o F]rFar>FfnFG>8+-%%nopsG6#FM>8,-F^t6#FV>8--F^t6#F\o@$2FetF\t-Fbr6#%gnThere~must~ be~as~many~new~independent~variables~as~old~ones!G@$30Fet,&F\tFTFatFT4F>-Fbr6#% QThere~must~be~as~many~new~variables~as~old~ones!G&F\o6#;FTF\t>8.-%$mapG6$f*6#% "aGF$6$%)operatorG%&arrowGF$/-%.jets/funcnameG6#-%$lhsG6#9$-%$rhsGFivF$F$F$%"%G &F\o6#;,&F\tFTFTFTFet>8/-F[v6$f*F^vF$F`vF$FcvF$F$F$F]w6(FiuFcwFfnFMFVF9F$F$F$F$, Q.jets/inpccv.mF$ M7R0 I+jets/isubsf*6&%$sbsG%%exprG%%ivarG%%dvarG6'%"RG%%indsG%%replG%&magicG%"iG6#%f nCopyright~(C)~2003~by~Pieter~Eendebak.~All~rights~reserved.G6"C(@%2""%9#>8'&9" 6#""&/F8.%)magickeyG>8%-%-jets/getindsG6$9%9'>8&7#-%$seqG6$-%$catG6$F88(/FP;""" -%%nopsG6#FA>8$-%%subsG6$-%*jets/ezipG6$FAFHFE>FX-FZ6$9$FX>FX-FZ6$-Fgn6$FHFAFXF 1F1F1F1, Q-jets/isubs.mF1 M7R0 I-jets/jetcoorf*6%%%numsG%%ivarG%%dvarG6&%#kkG%#ddG%#ccG%%jvarG6#%[oCopyright~( C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C%>8'%%NULLG?&8$9$%%tru eG@)/F5!"">F26$F2-%#opG6#9%/F5""!>F26$F2-F>6#9&/F5""">F26$F2-F>6#-%$mapG6$f*6#% "uGF/6$%)operatorG%&arrowGF/-F>6#-FO6$f*6#%"xGF/FTF/&T$6#F6F/F/6$FSF6FinF/F/6$F &F@FGC$>8&-%+jets/symchG6$F5F@@$0F_o7"?&8%FGF7>F26$F2-F>6#-FO6$f*FfnF/FTF/&T#6# -F>FjnF/F/6$F*Fgo7#F_o7#F2F/F/F/F/, Q/jets/jetcoor.mF/ M7R0 I+jets/ldfnlf*6&%$vecG%"FG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF)-%+jets/ldjetG6&-%.jets/vec2evolG6%9$9&9'9%F 3F4F)F)F)F), Q-jets/ldfnl.mF) M7R0 I+jets/ldjetf*6%%%vec1G%%vec2G%%ivarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.GF(-%,jets/liederG6#9"F(F(F(F(, Q-jets/ldjet.mF( M7R0 I,jets/lieappf*6%%%pvecG%%exprG%%ivarG6$%%dvarG%$cmdG6#%[oCopyright~(C)~2000-20 02~by~Mohamed~Barakat.~All~rights~reserved.G6"C%@%2""$9#>8$-%,jets/mklistG6#&9" 6#""%>F47"@%2F;F2>8%&F96#""&>FA%%NULLG--%,jets/diffvfG6&9$9&F4FA6#9%F-F-F-F-, Q.jets/lieapp.mF- M7R0 I,jets/liebraf*6%%&oper1G%&oper2G%%lvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF(-%'expandG6#,&-%%subsG6$/-%$_PPG6#-%#opG6#9& %%vec2G%%vec1G"""-F06$/F3F;F:!""F(F(F(F(, Q.jets/liebra.mF( M7R0 I-jets/list2vff*6%%#liG%%ivarG%%dvarG6$%#stG%"lG6#%inCopyright~(C)~2000-2002~by ~Gehrt~Hartjen.~All~rights~reserved.G6"C%>8$Q$a->F-?&8%9$%%trueG@%/&F36#""#7">F 0-%$catG6&F0Q#+(F--%(convertG6$&F36#"""%'stringGQ$)*aF->F0-F>6,F0F@FAQ4)*`jets/ partder`(a,F--FB6$F8FGQ",F--FB6$9%FGFO-FB6$9&FGQ")F--%&parseG6#F0F-F-F-F-, Q/jets/list2vf.mF- M7R0 I,jets/mat2opf*6%%$matG%%ivarG%%dvarG6"6#%inCopyright~(C)~2000-2002~by~Gehrt~Ha rtjen.~All~rights~reserved.GF(-%$mapG6$f*6#%"AGF(6$%)operatorG%&arrowGF(-%-jets /list2opG6%9$T$T&F(F(6&F&9%F'9&F7F(F(F(F(, Q.jets/mat2op.mF( M7R0 I.jets/ocliecomf*6(%#Q1G%#P2G%#Q2G%#SSG'%%ivarG%%listG'%%dvarGF+6"6#%[oCopyrigh t~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF.,&-%,jets/liederG6&- %/jets/char2evolG6$9$9)9%9(F9"""-%0jets/GinterprodG6'9&F89'F;F9!""F.F.F.F., Q0jets/ocliecom.mF. M7R0 I+jets/prolcf*6"64%#arG%%itrlG%%dtrlG%&ojvarG%%ivarG%%dvarG%%evarG%%avarG%&oiva rG%&odvarG%&_itrlG%&_dtrlG%%ijacG%%replG%#poG%$chnG%"iG%"jG6#%[oCopyright~(C)~2 000-2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C2@%-%%typeG6$&9"6#!""%'str ingG>8$-%,jets/inpccvG6#&F@6#;"""!"#>FE-FG6#F@>8%&FE6#FL>8&&FE6#""#>8'-%,jets/m klistG6#&FE6#""$>8(&FE6#""%>8)&FE6#""&@%2Feo-%%nopsG6#7#FE>8*&FE6#""'>F]p7">8+7 $-%#opG6#Fbo-Fgp6#F]p>8,-%$mapG6$%$lhsGFR>8--F^q6$F`qFV>8.-F^q6$%$rhsGFR>8/-F^q 6$FiqFV>80.F_r>81%%NULLG?&84Fen%%trueGC$@'-%'memberG6%FerF\q.82>83&Ffq6#F]s-Fjr 6%FerFbqF\s>F_s&F[rFasC%>F_s&F[r6#-%,jets/getposG6$-Fgp6$""!FerFbq@$4-%)assigne dG6#F_r>F_r-%-jets/ijacobiG6%FRF]oFdp?&85-Fgp6#FerFfr>F_s-%+jets/chainG6)F_sFjt FRF]oFdpQ!F$F_r>Fbr6$Fbr/FerF_s-%+jets/jsimpG6$7#FbrFboF$F$F$F$, Q-jets/prolc.mF$ M7R0 I1jets/prolvec.oldf*6&%$vecG'%$numG%(integerG%%ivarG%%dvarG6"6#%[oCopyright~(C) ~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF+-%+jets/prolvG6&9$-%+jets /hjetsG6%9%9&9'F6F7F+F+F+F+, Q3jets/prolvec.old.mF+ M7R0 I/jets/riemannF2f*6$%#ggG%%dvarG6+%"mG%%ric2G%#ZMG%%rieFG%$facG%"aG%"bG%"cG%"dG 6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*>8$-& %'linalgG6#%'coldimG6#9$@$2F6""$-%'RETURNG6#-%$mapG6$f*6#F-F36$%)operatorG%&arr owGF3-FE6$f*6#F.F3FIF3-%%copyG6#-%'matrixG6#7#-%"$G6$7#-FX6$""!T#FhnF3F36$F(Fhn 7#-FX6#;"""FhnF3F36$F(F67#-FX6#;F^oF6@%2""#9#>8%9%>Fio-%,jets/ricci2G6$F=Fjo>8& -FT6%F6F6Fgn>8'7#-%$seqG6$7#-Fgp6$-FQ6#F`p/8)Fco/8*Fco>8(*$,&F6F^o!"#F^o!""?(8+ F^oF^oF6%%trueG?(8,F^oF^o,&FiqF^oFgqF^oFjq?(F_qF^oF^oF6Fjq?(FaqF^oF^o,&F_qF^oFg qF^oFjqC&>&&Fdp6$F_qFaq6$FiqF\r-%)simplifyG6#*&FcqF^o,**&&F=6$FiqF_qF^o&Fio6$Fa qF\rF^oF^o*&&F=6$F_qF\rF^o&Fio6$FiqFaqF^oFgq*&&F=F`sF^o&FioF^sF^oF^o*&&F=FesF^o &FioFcsF^oFgqF^o>&Fdr6$F\rFiq,$FcrFgq>&&Fdp6$FaqF_qFfrF_t>&FbtF^tFcr-%+jets/mkm atG6#FdpF3F3F3F3, Q1jets/riemannF2.mF3 M7R0 I-jets/sortvarf*6$%%lst1G%%lst2G6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Barak at.~All~rights~reserved.G%'systemG%)rememberGF'-%#opG6#-%$mapG6$f*6#%"aGF'6$%)o peratorG%&arrowGF'&T$6#9$F'F'6$F&9%-%%sortG6#-%,jets/getposG6$F;F=F'F'F'F', Q/jets/sortvar.mF' M7R0 I+jets/ssubsf*6$%&_SUBSG%#RRG6&%%SUBSG%%dvarG%%indsG%%sdniG6#%fnCopyright~(C)~2 005~by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8$-%,jets/mklistG6#9$@$2""#9# >8%-F36#&9"6#""$@&3-%%typeG6$F1-%%listG6#%"=G/F9F8>F;-%$mapG6$%$lhsGF14FD@%F7C$ @$0-%%nopsG6#F;-FW6#F1-%&ERRORG6#%ZThe~length~of~the~first~and~third~argument~m ust~coincide!G>F1-%*jets/ezipG6$F;F1-Ffn6#%`sEither~specify~dvar~as~a~third~arg ument,~or~put~the~dependent~variables~as~right~hand~side~in~the~substitution~li st~(=first~argument)G>8&-%-jets/getindsG6$9%F;>8'-FN6$%-jets/ind2revGFao-%%subs G6$-%%ezipG6$FgoFao-F\p6$F1-F\p6$-F_p6$FaoFgoFeoF.F.F.F., Q-jets/ssubs.mF. M7R0 I-jets/unldsrcf*6&%$vecG%#SSG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mo hamed~Barakat.~All~rights~reserved.GF)-%'expandG6#,(-%$mapG6$f*6#%"aGF)6$%)oper atorG%&arrowGF)-%,jets/liederG6&T$9$T&T(F)F)6(F%F=F'9&F(9'9%"""*&-%)jets/DivG6% -%,jets/cflistG6$F=FAFAFBFDFCFDFD-F16$f*F4F)F6F)-%+jets/dprodG6$F<-F16$f*6#%"bG F)F6F)-%-jets/partderG6&F=F<F>F?F)F)6(F5F=F'F?F(T*-%.jets/vec2charG6%F>F?FenF)F )6*F&FCF%F=F'FAF(FBFBFDF)F)F)F), Q/jets/unldsrc.mF) M7R0 I+jets/xietaf*6$%%ivarG%%dvarG6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat .~All~rights~reserved.G%'systemG%)rememberGF'7$-%#opG6#-%$mapG6$f*6#%"aGF'6$%)o peratorG%&arrowGF'&%#xiG6#9$F'F'F'F<-F.6#-F16$f*F4F'F6F'&%$etaGF;F'F'F'9%F'F'F' F', Q-jets/xieta.mF' M7R0 I.jets/chkVBinff*6&%$vecG%%vvarG%%ivarG%%dvarG6$%'vcoeffG%%ovarG6#%XCopyright~( C)~2006~by~Arne~Lorenz.~All~rights~reserved.G6"C)@$-%%typeG6$9$-%%listG6#%(jets _vfG@%32""%9#-F26$&9"6#!""%'stringGO-%(convertG6$-%$mapG6(F"F49%9&9'Q!F.%$andGO -FG6$-FJ6'F"F4FLFMFNFP>8$-FJ6$f*6#%"aGF.6$%)operatorG%&arrowGF.@$-%'memberG6$&F 46$""#"""T$&F46#FaoF.F.6$F&FLF4@$0-FG6$-FJ6$f*FenF.FgnF.-%'degreeG6$F4FboF.F.Fe oFW%"*GFaoC$@$F:-%'printfG6#QfoCoefficients~of~the~vector~field~are~not~of~degr ee~one~in~the~coordinates!|+F.O%&falseG@$0-FG6$-FJ6$f*FenF.FgnF.-%(ldegreeGF_pF .F.FeoFWF`pFaoC$@$F:-Fdp6#QOThe~vector~field~is~an~affine~transformation!|+F.OF hp>8%-FJ6$f*FenF.FgnF.@$4-F\oF_pF4F.F.FeoFN@$0-%-jets/getiordG6%FWFiqFOFCC$@$F: -Fdp6#QYCoefficients~of~the~vector~field~depend~on~other~dvars!|+F.OFhpO%%trueG F.F.F.F., Q0jets/chkVBinf.mF. M7R0 I-jets/version"-S@I75?6", Q/jets/version.mF$ M7R0 I,jets/cflistf*6$%%vconG%$varG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat .~All~rights~reserved.GF'-%$mapG6$f*6#%"aGF'6$%)operatorG%&arrowGF'&9$6#"""F'F' F'-%-jets/sortconG6$F49%F'F'F'F', Q.jets/cflist.mF' M7R0 I,jets/chkvecf*6#%$vecG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~r ights~reserved.GF&@'5/9$""!/F,7"%%trueG33333-%%typeG6$F,%%listG-F76$&F,6#"""F9/ -%%nopsG6#F<""#4-F76$&F,6$F>F>F9-F76$&F,6$F>FCF9/-FA6#FKF>F0%&falseGF&F&F&F&, Q.jets/chkvec.mF& M7R0 I,jets/comtabf*6$%%lvecG%%ivarG63%%dvarG%#eqG%%jvarG%$numG%#CMG%(llambdaG%'lamb daG%#iiG%#jjG%%commG%$eqnG%%ceqnG%%teqnG%&leqnsG%%solnG%'lgammaG%'gamcntG6#%[oC opyright~(C)~2000-2003~by~Mohamed~Barakat.~All~rights~reserved.G6"C.@%2""#9#>8$ &9"6#""$>FB7"@%2FFF@>8%&FD6#""%>FL%%NULLG>8&7%-%#opG6#9%-FV6#FB-FV6#-%-jets/get indsG6$9$FB>8'-%%nopsG6#Fjn>8)-%$seqG6$&8*6#8+/Fho;"""F\o>8/-%$addG6$*&FeoF[p&. %$psiGFgoF[pFio>80-%+jets/dprodG6$7#Fao-%$mapG6%%-jets/con2mapGFjnFS>8(-%'matri xG6#7#-%"$G6$7#-Ffq6$""!F\oF\o>83FQ>84F[r?(FhoF[pF[pF\o%%trueG?(8,,&FhoF[pF[pF[ pF[pF\oFarC$>8--%,jets/liecomG6(&FjnFgo&Fjn6#FcrFXFBFL-%"@G6$%'expandG%)simplif yG@$0FgrF[rC'>8.-Fas6#-Fbs6#-Fas6#-%&numerG6#,&FfpF[p-F^q6$FgrFS!"">81-%.jets/S EPARATEG6%FgsFH-F\q6%%(convertGFS%'symbolG@$/Fft%&falseG-%&ERRORG6#%9SEPARATE~r eturned~false!G>82-%&solveG6$Fft<#Fao@%/FfuFQC)>F_r,&F_rF[pF[pF[p>F]r6$F]r/&.%& gammaG6#F_rFgr>Fao6$Fao&Ffo6#,&F\oF[pF_rF[p>F]p,&F]pF[p*&FivF[pFcvF[pF[p>Ffp,&F fpF[p*&FivF[pFbtF[pF[p>&F`q6$FhoFcrFcv>&F`q6$FcrFho,$FcvFdtC$>Fcw-%%subsG6$FfuF ]p>Ffw,$FcwFdt@%2F[rF_r7$-%%copyG6#F`q7#F]rFcxF;F;F;F;, Q.jets/comtab.mF; M7R0 I.jets/depcheckf*6#%$resG6+%#vsG%#slG%"iG%#KMG%#GMG%#ncG%#nrG%#zlG%#rkG6#%inCop yright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C0>8%-%,jets/mkli stG6#9$>8$7">8&"""?(F2F?F?F21F>-%%nopsG6#F5@%/&F56#F>""!C$>F;7$-%#opG6#F;FI>F5- %'subsopG6$/F>%%NULLGF5>F>,&F>F?F?F?>8'-%1jets/coeffmatrixGFD>8*FB>8)-&%'linalg G6#%'coldimG6#FY>8(-&F\o6#%*gausselimG6$-&F\o6#%(augmentG6$FY-%&arrayG6%;F?FgnF _p%)identityGFin>8,-&F\o6#%%rankG6#-&F\o6#%*submatrixG6%FaoF_p;F?Fin>8+-%-jets/ zerocolG6#-Fip6%Fao;F?Fbp;,&FinF?F?F?,&FinF?FgnF?>F;7$FM-FN6#-%$mapG6$f*6#F)F26 $%)operatorG%&arrowGF2-%(convertG6$-%$zipG6%f*6$%"aG%"bGF2FbrF2*&F9F?9%F?F2F2F2 -Ffr6$-&F\o6#%*subvectorG6%T#F9;,&T%F?F?F?,&F[tF?T'F?%%listGT)%"+GF2F26*F+FaoF, FinF-FgnF(F57#-%"$G6#;,&FbpF?F?F?Fgn>F5-FR6$-FN6#-F^r6$f*FarF2FbrF2/F9FUF2F2F2F _qF5@$32F?9#-%%typeG6$&9"6#""#%'symbolG-%'assignG6$FhuF;F5F2F2F2F2, Q0jets/depcheck.mF2 M7R0 I+jets/dlintf*6$%%exprG%%dvarG6#%"lG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartj en.~All~rights~reserved.G6"C$-%'assumeG6#1""!8$-%+jets/jsimpG6%-%$intG6$-%)simp lifyG6#*&-%%subsG6$-%$mapG6$f*6#%"aGF+6$%)operatorG%&arrowGF+/9$*&T#"""FJFMF+F+ 6$F(F27$-%#opG6#-%-jets/getindsG6$FJ9%-FQ6#FVFJFMF2!""/F2;F1FMFV-%"@G6$%'expand GF:F+F+F+F+, Q-jets/dlint.mF+ M7R0 I-jets/gen2symf*6"6'%$narG%#arG%'saveitG%$solG%$varG6#%[oCopyright~(C)~2000-200 2~by~Mohamed~Barakat.~All~rights~reserved.GF$C(@'3/9#"""-%%typeG6$9"-%%listG6#F 8C$>8$-%%nopsG6#F6>8%-%#opGF?33/F1""#-F46$&F66#F2F7-F46$&F66#FGF7C$>F<,&-F>6#FJ F2F2F2>FA6$-FCFTFNC$>F<F1>FAF6>8'-%,jets/jsolveG6#FA@$43-F46$FfnF75/-F>6#Ffn""% /FaoFGC$-%&printG6#/.FfnFfn-%&ERRORG6#%Vgenvec~is~not~able~to~handle~such~a~jso lve-output~yetG@$F`oC$@$0&FfnFK7"-Fgo6$%HWarning:~The~output~of~pdesolv:~sol[1] =GFbp@$0&FfnFOFdp-Fgo6$%HWarning:~The~output~of~pdesolv:~sol[2]=GFip@%2""$F<>8( &FA6#Fco>Fbq&FA6#F`q@%Fdo-%,jets/genvecG6%FcpFjpFbq-Fjq6%&FfnFgq&FfnFdqFbqF$F$F $F$, Q/jets/gen2sym.mF$ M7R0 I,jets/gensymf*6&%%leqnG%$symG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~M ohamed~Barakat.~All~rights~reserved.GF)-%-jets/gen2symG6#-%#opG6#-%,jets/gengen G6#9"F)F)F)F), Q.jets/gensym.mF) M7R0 I2jets/getIntFactorf*6&%%exprG%%ivarG%%dvarG%%DvarG65%$dopG%#ffG%&ffvarG%*ffMus tVarG%#_fG%&iFvarG%(var2jetG%'lstLhsG%'lstRhsG%*lstCoeffsG%+lstSCoeffsG%"iG%(No ffvarG%)Noffvar2G%#sCG%&fSideG%$varG%#jSG%#_CG6#%XCopyright~(C)~2005~by~Arne~Lo renz.~All~rights~reserved.G6"CC>8&-%-jets/jetcoorG6%7$""!"""9%9&>8%-8(6#-%#opG6 #FB>8)FB>8*-FD6%""#FIFJ>8$-%$mapG6$f*6#F5F?6$%)operatorG%&arrowGF?7$&T$6#9$7#&T &FaoF?F?6&F(9'F&FI7#-%"$G6#;FH-%%nopsG6#FI>8,-%-jets/eqn2indG6%-%+jets/appmtG6& FenFLFIFJFB7#FN>8+-Fgn6$f*6#%"aGF?F[oF?-%%diffG6$F`oFboF?F?6$F%FboFgo>Fap-Fgn6$ f*F^qF?F[oF?-Faq6$T#FboF?F?6$F2FapFgo@$-%$hasG6$FapFgoY6$Q_oThe~expression~does ~not~depend~linearily~on~the~following~variables:F?Fgo>Fjp-Fgn6%%(collectGFjpFV >Fjp-Fgn6$f*F^qF?F[oF?7$7#-%'coeffsG6%FboFjq.%$posG7#FasF?F?6$F0FVFjp>Fap-Fgn6$ f*F^qF?F[oF?F[sF?F?FcsFap>8-%%NULLG?&827$-FQ6#FVFH%%trueG?(8/FHFH-F^p6#FgoF`t@% -%'memberG6%F\t&Fjp6$FbtFY.%%posLG@%-Fgt6%F\t&FapFjt.%%posRG>Fis6$Fis7%F\t&Fjp6 %FbtFHF\u&Fap6%FbtFHFbuYQ6No~solution~possible!F?@$F^u@%-%%typeG6$Fhu%"+G>Fis6$ Fis-FQ6#-Fgn6$f*F^qF?F[oF?7%FjqFGFboF?F?6$F8F\t7#-F^s6$FhuFB>Fis6$Fis7%F\tFGFhu >Fis7#Fis>8.-Fgn6$f*F^qF?F[oF?@$/&Fbo6#FYFGFboF?F?F?Fis>807"?&F\tFdwF`t@$-Fgt6% -FQ6#&F\t6#""$FBF`sC$>FB-%'subsopG6$/FasFjsFB>F]x7$-FQ6#F]xFcx>Fis7#-FQ6#-%&min usG6$<#-FQ6#Fis<#-FQ6#Fdw>8'-Fgn6$f*F^qF?F[oF?@$3/-%(getiordG6$&Fbo6#FHF`oFY0Fj wFG-FQ6#&FboFfxF?F?6$F'FJFis>F`z7#-FQ6#<#-FQ6#F`z>Fdw-Fgn6$f*F^qF?F[oF?@$/FjzFH &Fbo6#;FYFgxF?F?F?Fis>Fdw-Fgn6%FfrFdwF]x>81F^x?&84F]xF`t?&F\tFdwF`t@$/-F^r6$&F\ tF[[lFg\l%&falseGC$>83-%'selectG6%F^r&F\tF[xFg\l@$0Fa]lFG@%/7#-%'removeG6%F^rFa ]lFNF`z-%&printG6$Q*possible:F?-FN6#Ff[lC%@$-Fgt6%-FQ6#-Fc]lF]^lFBF`s>FBFjx>Fe\ l7$-FQ6#Fe\lFh^l@$-Fgt6%Fg\lFTF`s>FT-F[y6$F]yFT>F]x7$F`yF^_l>85-Fgn6$f*F^qF?F[o F?/&FjqFaoFGF?F?6$F.FNF]x>Fis-%+jets/jsubsG6&Fi_lFisF]xFhp>FT-%*intersectG6$-FQ 6#-Fgn6$f*F^qF?F[oF?-%&unionG6$-%'indetsG6#Fjw<#-FQ6#FjqF?F?6$F,FBFis-%+jets/mk setG6#FT>FT-%,jets/mklistGFial>FB-%.jets/sortjetsG6%FBFIFJ>FT-F_bl6%FTFIFJ@%32" "%9#/&9"6#!""Q&solveF?C%>Fis-%-jets/ind2eqnG6%-Fgn6$f*F^qF?F[oF?/*&-T%6#FdalFHF jwFHF_[lF?F?6&F/FTF<86FisFBFhp>Fis7#-%.jets/jet2formG6&Fis%-jets/ind2subGFIFJ>F is-F\bl6#-%%subsG6$7%/FN%$_I2G/F]dl%$_iFG-FQ6#&FisF[x-%(pdsolveG6$&FisF[[l7$F]d lFN-Fhdl6$7$F[elF]el-Fbcl6%-Fgn6$f*F^qF?F[oF?FgclF?F?F\dlFisFBFhpF?6$F^elF\elF? F?, Q4jets/getIntFactor.mF? M7R0 I,jets/getposf*6$%$lstG'%$varG%%listG6#%#poG6%%[oCopyright~(C)~2000-2002~by~Moh amed~Barakat.~All~rights~reserved.G%'systemG%)rememberG6"@%-%%typeG6$9$F(-%$map G6$f*6#%"aGF/F/F/C%>T#%%NULLG-%'memberG6%F4T&.F=F=F/F/6&F*8$F'9%F4C%>FEF>-F@6%F 4FF.FEFEF/F/F/F/, Q.jets/getpos.mF/ M7R0 I-jets/ind2mapf*6$%$derG%%ivarG6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.G%'systemG%)rememberGF'C$@$/-%#opG6#9$F2-%'RETURNGF1-%%d iffG6$--F06$""!F26#-F06#9%F/F'F'F'F', Q/jets/ind2map.mF' M7R0 I+jets/lddopf*6%%$vecG%$dopG%%ivarG6$%%dvarG%%tvecG6#%[oCopyright~(C)~2000-2002 ~by~Mohamed~Barakat.~All~rights~reserved.G6"C$@%2""$9#>8$-%,jets/mklistG6#&9"6# ""%>F47"@)/9%""!FA-%,jets/chkdopG6#F@C%-%.jets/gcollectG6$-%$zipG6%f*6$%"AG%"BG F-6$%)operatorG%&arrowGF-7$9$F@F-F-F--%,jets/liederG6&FT-%$mapG6$f*6#%"aGF-FPF- &FT6#"""F-F-F-F@9&F4-FY6$f*FfnF-FPF-&FT6#""#F-F-F-F@F[o>8%-%)jets/totG6$FTF[o@% /FcoFA%#%%G-%,jets/addconG6%Fio-FG6$-FY6$f*Ffn6#%$DOPGF-F-C$>F4-%#opG6#-%,jets/ mulconG6%Fhn-%,jets/comdopG6&T#7#7$FjnF_oT&T'Fbq@%/F4FA7$FAF=F4F-F-6(F*FcoF'F[o F)F4F@F[oF[o-FC6$F@Q!F-&-F"6&FT7#7$F@F=F[oF46$FjnFjn-FY6$f*FfnF-FPF--F"6&T$FTFb qFcqF-F-6(F%FTF'F[oF)F4F@F-F-F-F-, Q-jets/lddop.mF- M7R0 I+jets/ldfrmf*6%%$vecG%$_PPG%&_ivarG6'%%ivarG%%dvarG%#PPG%"nG%#XiG6#%[oCopyrigh t~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*@%2""$9#>8%-%,jets /mklistG6#&9"6#""%>F77">8&-F96#9%>8$-F96#9&>8'-%%nopsG6#FG@$0-FN6#FBFL-%&ERRORG 6#%bqThe~number~of~components~of~a~horizontal~1-form~must~coincide~with~the~num ber~of~independent~variables!G>8(-%,jets/cflistG6$9$FG-%+jets/jsimpG6$,&-%,jets /liederG6&FgnFBFGF7"""-%$mapG6$f*6#%"aGF06$%)operatorG%&arrowGF0-%(convertG6$-F ao6$f*6#%"bGF0FfoF0*&&T#6#FgnF_o-%.jets/totalderG6&&T%Fdp&T'6#T*F[qT+F_oF0F06,F +FipF-F[qF)T)FeoFgnF*F^q7#-%"$G6#;F_oFcp%"+GF0F06,F,FLF+FBF-FYF)FGF*F77#-Fcq6#; F_oFLF_oF7@%-%%typeG6$FE%%listG%"%G-%#opG6#FarF0F0F0F0, Q-jets/ldfrm.mF0 M7R0 I-jets/map2Derf*6#%$funG6*%$derG%%lindG%&lind2G%&ldvarG%%lvarG%&orderG%#iiG%&D2 DerG6#%>Copyright~(c)~1997~by~Khai~VuG6"C$>8+f*F$6&%&lind1GF)%%fordGF-F1F1@'-%% typeG6$-%#opG6$""!-F>6$F@9$%(indexedGC&>8$7#-F>6#F=>8&-%%nopsG6#FG>8%7#-%$seqG6 $,&FL"""-FN6#-%%subsG6$/8'%%NULLGFG!""/Fhn;FW-FN6#FC-%$DerG6%-F>6#FAFQ7#-F>F^o- F;6$F=%)functionG-F`o6%Fbo7#-F>6$""#F=Fdo-F`o6%Fbo7#FWFdoF1F1F1@)4-F;6$FCFho-F` o6%FC7"Fhp-%$hasG6$FA%"DG-F4F^o-Fjp6$FA%%diffGC&>FhnFin>FGFC?(F1FWFWF1-Fjp6$-F> 6$F@FGF`qC$>Fhn6$Fhn-F>6$F^pFG>FG-F>6$FWFG@%-Fjp6$FgqF\q-F`q6$-F4FOFhnC'>Fhn7#F hn>8)-FN6#Fhn>8(7#-F>FO>FQ7#-FT6$,&F[sFW-FN6#-Fen6$/&F_s6#8*FinFhnFjn/F^t;FWFM- F`o6%FgqFQF_s-F`o6%FA7#-%"$G6$F@F]oFdoF1F1F1F1, Q/jets/map2Der.mF1 M7R0 I-jets/natfinGf*6%%$_trG%%_invG%&_ivarG61%#trG%$invG%%ivarG%"nG%%dvarG%"mG%$teq G%$LHSG%%lvarG%%vvarG%%SUBSG%"qG%$itrG%$natG%%nat2G6#%[oCopyright~(C)~2004-2005 ~by~Mohamed~Barakat.~All~rights~reserved.G6"C/>8$-%,jets/mklistG6#9$>8%-F?6#9%> 8&-F?6#9&>8'-%%nopsG6#FH>8(-%$mapG6$%$lhsG&F=6#;,&FM"""FenFen!"">8)-FO6#FR>8*-% +jets/mksetG6#-FT6$f*6#%"aGF:6$%)operatorG%&arrowGF:-%%typeG6$FA%"=GF:F:F:FC@'/ F\o<#%%trueGC$>8+-FT6$FVFC@'3-%-jets/chkdvarG6$FbpFH/-%-jets/getindsG6%FbpFRQ!F :7"C%>8,-%;jets/get_vars_to_eliminateG6%FCFHFR>8-Fbp>8.&-%-jets/nrsolveG6$FCFbq 6#Fen55/9#""$3/Fbr""%5/&9"6#FfrF_q-Fio6$Fir%'stringG3Fer/-F\q6%FCFirF^qF_q-%&ER RORG6#%ipThe~left~hand~sides~of~the~first~argument~are~not~admissible~abstract~ names~for~the~invariantsGC%>Fgq-F?6#Fir>FiqFC>FC&-F\r6$FiqFgqF^r332FcrFbr0FirF_ q4F\sC$>FgqFis@%/F\o<#%&falseGC%>FbqFcq>FC-%*jets/ezipG6$FgqFC>FiqFjq-Fds6#%=In consistent~first~argument!G-Fds6#%dtI'm~not~able~to~extract~abstract~names~for~ the~invariants.~Either~specify~them~as~left~hand~sides~of~the~invariants~or~spe cify~them~in~a~fourtth~argumentG>8/-%-jets/getiordG6$FCFR>80&-%-jets/prolccvG6& F=FiuFHFRFX>81-%+jets/jsimpG6$-%%subsG6$F^vFCFR>Fdv-Ffv6$-Fiv6$FiqFdvFR?(F:FenF enF:F_pC%>82F\w@$/FcwFdv@%-Fio6$&Fjr6#FfnF^s-%'RETURNG6#7$-%#opG6#F=-F`x6#-%(co llectG6%-%)simplifyG6#FdvFgq%,distributedG-F\x6#7$F_x-F`x6#-Fex6%-%'expandGFixF gqFjx>FdvFcwF:F:F:F:, Q/jets/natfinG.mF: M7R0 I,jets/nsbraLf*6&%#_HG%#_KG%&_ivarG%&_dvarG6,%"HG%"KG%%ivarG%%dvarG%$varG%#_PG% #_QG%#_RG%%operG%%pathG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rig hts~reserved.G6"C->8&-%,jets/mklistG6#9&>8'-F;6#9'@%-%,jets/chkdopG6#9$>8$7#7#F G>FIFG@%-FE6#9%>8%7#7#FP>FRFP>8(-%#opG6#-%-jets/alljetsG6%""!F9F?>8)-%$mapG6$f* 6#%"aGF66$%)operatorG%&arrowGF6--%$catG6$.T%FG6#T#F6F66&F.FWF/FjnF?>8*-F\o6$f*F _oF6FaoF6FdoF6F66&F.FWF0F^pF?>8+-F\o6$f*F_oF6FaoF6FdoF6F66&F.FWF1FdpF?@'32""%9# -%%typeG6$&9"6#""&%'stringG>8,f*F_oF6FaoF6FGF6F6F63F[q/FaqFhn>Fgq%)OrdEulerG>Fg q%(intnormG@%32FdqF]q/FgqF^r>8-&Fbq6#""'>Fdr%%NULLG,$-Fgq6&-%+jets/jsimpG6$-%(c onvertG6$-F\o6$f*6#%"AGF6FaoF6-Fas6$-F\o6$f*6#%"BGF6FaoF6-%+jets/dprodG6$-%+jet s/ldsrcG6&-%/jets/char2evolG6$--%,jets/diffopG6%&FG6#"""FioT'6#&T$F]uF_u&Fbu6#" "#FioF_u--Fjt6%&FGFduFioF_u6#&Fbu6#""$F6F66(FgsFGF,F_uF-T)7$7$F[pFio7$FioF[p%"+ GF6F66*F*FIF+FRF,F9F-F?7%7%FjnF^pFdp7%FdpFjnF^p7%F^pFdpFjnFcvF?F9F?Fdr!""F6F6F6 F6, Q.jets/nsbraL.mF6 M7R0 I.jets/riemannFf*6$%#ggG%%dvarG6-%"mG%$ricG%%ric2G%#ddG%#ZMG%%rieFG%$facG%"aG%" bG%"cG%"dG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved. G6"C,>8$-&%'linalgG6#%'coldimG6#9$@$2F8""$-%'RETURNG6#-%$mapG6$f*6#F/F56$%)oper atorG%&arrowGF5-FG6$f*6#F0F5FKF5-%%copyG6#-%'matrixG6#7#-%"$G6$7#-FZ6$""!T#FjnF 5F56$F(Fjn7#-FZ6#;"""FjnF5F56$F(F87#-FZ6#;F`oF8@%2""#9#>8&9%>F[p-%,jets/ricci2G 6$F?F\p>8%-%+jets/ricciG6%F?F[pQ!F5>8'f*6$%"xG%"yGF5F5F5@%/F?F\pF`oFinF5F5F5>8( -FV6%F8F8Fin>8)7#-%$seqG6$7#-Fgq6$-FS6#F`q/8+Feo/8,Feo>8**$,&F8F`o!"#F`o!""?(8- F`oF`oF8%%trueG?(8.F`oF`oF8Fjr?(F_rF`oF`oF8Fjr?(FarF`oF`o,&F_rF`oFgrF`oFjrC$>&& Fdq6$F_rFar6$FirF\s-%)simplifyG6#*&FcrF`o,**&-Fhp6$FirF_rF`o&F[p6$FarF\sF`oF`o* &&F?6$F_rF\sF`o&Fbp6$FirFarF`oFgr*&&F?F_tF`o&FbpF]tF`oF`o*&-FhpFdtF`o&F[pFbtF`o FgrF`o>&&Fdq6$FarF_rFes,$FbsFgr-%+jets/mkmatG6#FdqF5F5F5F5, Q0jets/riemannF.mF5 M7R0 I/jets/riemannT2f*6$%#ggG%%dvarG6-%"mG%%ric2G%"RG%#ZMG%%rieTG%$facG%%fac2G%"aG% "bG%"cG%"dG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved .G6"C,>8$-&%'linalgG6#%'coldimG6#9$@$2F8""$-%'RETURNG6#-%$mapG6$f*6#F/F56$%)ope ratorG%&arrowGF5-FG6$f*6#F0F5FKF5-%%copyG6#-%'matrixG6#7#-%"$G6$7#-FZ6$""!T#Fjn F5F56$F(Fjn7#-FZ6#;"""FjnF5F56$F(F87#-FZ6#;F`oF8@%2""#9#>8%9%>F[p-%,jets/ricci2 G6$F?F\p>8&-%-jets/scalarcG6%F?F[pQ!F5>8'-FV6%F8F8Fin>8(7#-%$seqG6$7#-F_q6$-FS6 #Fhp/8+Feo/8,Feo>8)*$,&F8F`o!"#F`o!"">8*,$*&F8F_rF]rF_rFho?(8-F`oF`oF8%%trueG?( 8.F`oF`o,&FerF`oF_rF`oFfr?(FgqF`oF`oF8Ffr?(FiqF`oF`o,&FgqF`oF_rF`oFfrC&>&&F\q6$ FgqFiq6$FerFhr-%)simplifyG6#,&*&F[rF`o,**&&F?6$FerFgqF`o&F[p6$FiqFhrF`oF`o*&&F? 6$FgqFhrF`o&F[p6$FerFiqF`oF_r*&&F?F]tF`o&F[pF[tF`oF`o*&&F?FbtF`o&F[pF`tF`oF_rF` oF`o*(FarF`oFbpF`o,&*&F_tF`oFgtF`oF`o*&FdtF`oFjsF`oF_rF`oF`o>&F`s6$FhrFer,$F_sF _r>&&F\q6$FiqFgqFbsF`u>&FcuF_uF_s-%+jets/mkmatG6#F\qF5F5F5F5, Q1jets/riemannT2.mF5 M7R0 I,jets/sepsumf*6$%(sep_eqnG%(sep_varG6&%(indlistG%(deplistG%(temlistG%%termG6#% >Copyright~(c)~1997~by~Khai~VuG6"@%-%%typeG6$9$%"+GC&>8$7">8%F8?&8'F3%%trueGC%> 8&-%.jets/colterm2G6%F7F:-%/jets/sepfactorG6$F<9%>F7&F@6#""">F:&F@6#""#7$F7F:C$ >F@-FE6$F3FG7$7#FI7#FMF.F.F.F., Q.jets/sepsum.mF. M7R0 I-jets/smb2indf*6$%$anyG%%lvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.GF'-%%subsG6$-%$mapG6$f*6#%"xGF'6$%)operatorG%&arrowGF'/ -%(convertG6$9$%'symbolGF:F'F'F'9%F:F'F'F'F', Q/jets/smb2ind.mF' M7R0 I.jets/symsplitf*6&%"LG%#lvG%%ivarG%%dvarG6/%#DLG%$resG%#vsG%#_KG%#dsG%#slG%"iG %#KMG%#GMG%#ncG%#nrG%#zlG%#rkG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~Al l~rights~reserved.G6"C=>8)9%@%/-%%nopsG6#9'""">8$7#-%-jets/list2opG6%-%.jets/fr echetcG6%9$9&FCFOFC>FF-%,jets/mat2opG6%-%#opG6#-%(convertG6$FK%)listlistGFOFC>8 %-%'expandG6#-%)simplifyG6#-%$mapG6$f*6#%"aGF96$%)operatorG%&arrowGF9,&-FX6$-%$ zipG6%f*6$%"bG%"cGF9FcoF9-FN6#F=F9F9F9T#-%.jets/vec2charG6%FNT&T(%"+GFD-%)jets/ DivG6%-F^o6$f*6#%"dGF9FcoF9*&T$FDFNFDF9F96$F%T*-F^o6$f*6#%"eGF9FcoF9&FN6#FDF9F9 F9-%-jets/sortconG6$FNFfpFfpFgpFDF9F96*F*FFF'FOF(FCF%FNF<>8&7">8(Fbr>8*FD?(F9FD FDF91Ffr-FA6#F<@%/&Ffn6#Ffr""!C%>Ffn-%'subsopG6$/Ffr%%NULLGFfn>Far7$-FU6#Far&F< F^s>F<-Fcs6$FesF<>Ffr,&FfrFDFDFD>8+-%1jets/coeffmatrixG6#Ffn>8.-FAFet>8--&%'lin algG6#%'coldimG6#Fbt>8,-&F]u6#%*gausselimG6$-&F]u6#%(augmentG6$Fbt-%&arrayG6%;F DFgtF`v%)identityGFjt>80-&F]u6#%%rankG6#-&F]u6#%*submatrixG6%FbuF`v;FDFjt>8/-%- jets/zerocolG6#-Fjv6%Fbu;FDFcv;,&FjtFDFDFD,&FjtFDFgtFD>Far7$Fis-FU6#-F^o6$f*6#F 0F9FcoF9-%.jets/gcollectG6$-Fjo6%f*6$FboF^pF9FcoF9-FU6#-F^o6$f*6#%"jGF9FcoF97$* &FbqFDFjqFD&FN6#""#F9F96$FboFNF=F9F9F9-FX6$-&F]u6#%*subvectorG6%FbpFN;,&T%FDFDF D,&F_zFDT'FD%%listGT)7$-FU6#T,-FU6#T.F9F96.F2FbuF3FjtF4FgtF/F<F'FOF(FC7#-%"$G6# ;,&FcvFDFDFDFgt>F<-Fcs6$-FU6#-F^o6$f*FaxF9FcoF9/FNFfsF9F9F9F`wF<>Ffn-F^o6$f*Fax F9FcoF9-Fhn6#-FX6$-Fjo6%f*FhxF9FcoF9*&FNFDF=FDF9F9F9-F^o6$f*F^yF9FcoF9-%$catG6$ .FbpFNF9F96$F-FazFbq-%+jets/EulerG6%FNFfpFbqFhpF9F96(F(FCF'FOF-8'-Fcs6$-FU6#-F^ o6$f*FaxF9FcoF9Fj[lF9F9F9F`wFfn>FfrFD?(F9FDFDF9Fhr@%F\sC%>FfnFbs>Fdr7$-FU6#FdrF [t>F<F]t>FfrF`t>FbtFct>FgtFht>FjtF[u>FbuFcu>FcvFdv>F`wFaw>Fdr7$Fb^l-FU6#-F^o6$f *FaxF9FcoF9-Fcx6$-Fjo6%f*FhxF9FcoF9-FU6#-F^o6$f*F^yF9FcoF9F`yF9F9FeyF=F9F9F9Ffy FczFdzF9F9F[[lF\[l>F<-Fcs6$-FU6#-F^o6$f*FaxF9FcoF9Fj[lF9F9F9F`wF<7%FarFdrF<F9F9 F9F9, Q0jets/symsplit.mF9 M7R0 I/jets/conDif2opf*6#%%expnG6#%%lsepG6#%>Copyright~(c)~1997~by~Khai~VuG6"C%@$/9$ ""!-%'RETURNG6#F/>8$-%,jets/sepsumG6$F.%$_PPG-%$zipG6%f*6$%"aG%"bGF*6$%)operato rG%&arrowGF*7$F.7#-%#opG6$""#9%F*F*F*&F46#"""&F46#FHF*F*F*F*, Q1jets/conDif2op.mF* M7R0 I+jets/constf*6%%%exprG%%ivarG%%dvarG6"6#%inCopyright~(C)~2000-2002~by~Gehrt~Ha rtjen.~All~rights~reserved.GF(-%%evalG6$9$-%$mapG6$f*6#%"aGF(6$%)operatorG%&arr owGF(/F.""!F(F(F(7$-%#opG6#9%-F<6#9&F(F(F(F(, Q-jets/const.mF( M7R0 I,jets/eqsortf*6#%%leqnG6'%'sum_ntG%'ot_ordG%#iiG%(num_eqnG%$eqnG6#%>Copyright~ (c)~1997~by~Khai~VuG6"C.>8'-%%nopsG6#9$@$2F1""#F5>8$%%NULLG>8%F;>8&""!?&8(F5%%t rueGC$>F?,&F?"""FGFG@%-%%typeG6$FB%"+G>F:6$F:,&*&-F36#FBFG)"#5-%'lengthG6#F1FGF GF?FG>F=6$F=,&*&-%,jets/orderdGFRFGFSFGFGF?FG>F:-%%sortG6#7#F:>F:-%$mapG6%f*6$% "aG%"bGF.F.F.-%%iremG6$F5)FT-FV6#9%F.F.F.F:F1>F=-Fjn6#7#F=>F=-F_o6%f*FboF.F.F.F eoF.F.F.F=F1>F:7$-%#opG6#F=-Fgp6#F:7#-%$seqG6$&F56#&F:6#F?/F?;FG-F3FjpF.F.F.F., Q.jets/eqsort.mF. M7R0 I/jets/invtargetf*6&%"RG%&_ivarG%&_dvarG%&_TvarG60%%ivarG%%dvarG%%TvarG%"fG%"qG %%jvarG%%svarG%$vecG%%pvecG%%rvecG%%lvarG%%lvecG%$cndG%$solG6#%[oCopyright~(C)~ 2004-2005~by~Mohamed~Barakat.~All~rights~reserved.G6"C3>8$-%,jets/mklistG6#9%>8 %-F?6#9&>8&-F?6#9'@$32""%9#4-%%typeG6$&9"6#""&%'stringG>8'FU>8(-%-jets/getiordG 6$9$FH>8)-%+jets/hjetsG6%FgnF=FC>8*-%$mapG6$%-jets/ind2subGF]o>8+-%/jets/char2e volG6$-FH6#-%#opG6#FCFC-%-jets/prolvecG6&FhoFgnF=FC>8,-%-jets/eqn2indG6%%"%GFCF H@$4555/F[o""!/F[o7#F`q/F[o7#/F`qF`q/7#F[oFdq>Fep-Fdo6$f*6#%"aGF:6$%)operatorG% &arrowGF:7$-%-jets/jreduceG6&T$&F[o6#"""T%T'&F[o6#""#F:F:6(F%F[oF+FCF,FHFep>8-- %.jets/gcollectG6%FepF=FC>8.-Fdo6$F_p7$FCFbo>8/-%,jets/lstvecG6%F`sFCFH>80-%-je ts/invcondG6%&FjsFgr-Fen6#-F_p6#FesFes>F_t6%-Fdo6$%&numerG&F_tFgr&F_t6#;F]s""$- %*jets/ezipG6$FboF]o@%-FS6$&FV6#!""FYC'>81-%%subsG6$&F_t6#FO-%,jets/jsolveG6$F_ tQ!F:@$4-FS6$F]v-%%listG6#%"=G-%&ERRORG6$%DCannot~handle~incomplete~solutions:G F]v>F]v-Fdo6$%/jets/killwhereGF]v>F]v7#-F_p6#-%$rhsG6#-F_p6#F]v-%+jets/jsimpG6% F]vFC%'expandGF_tF:F:F:F:, Q1jets/invtarget.mF: M7R0 I,jets/isoalgf*6&%"RG%&_ivarG%&_dvarG%&_TvarG6.%%ivarG%%dvarG%%TvarG%"qG%%jvarG %%svarG%$vecG%%pvecG%%rvecG%%lvecG%%lvarG%$cndG6#%fnCopyright~(C)~2004~by~Moham ed~Barakat.~All~rights~reserved.G6"C/>8$-%,jets/mklistG6#9%>8%-F=6#9&>8&-F=6#9' @%32""%9#4-%%typeG6$&9"6#""&%'stringG>8'FS>FY-%-jets/getiordG6$9$FF>8(-%+jets/h jetsG6%FYF;FA>8)-%$mapG6$%-jets/ind2subGFjn>8*-%/jets/char2evolG6$-FF6#-%#opG6# FAFA-%-jets/prolvecG6&FeoFYF;FA>8+-%-jets/eqn2indG6%%"%GFAFF@$4555/Fhn""!/Fhn7# F]q/Fhn7#/F]qF]q/7#FhnFaq>Fbp-Fao6$f*6#%"aGF86$%)operatorG%&arrowGF87$-%-jets/j reduceG6&T$&Fhn6#"""T%T'&Fhn6#""#F8F86(F%FhnF+FAF,FFFbp>8,-%.jets/gcollectG6%Fb pF;FA>8.-Fao6$F\p7$FAF_o6%&-%,jets/lstvecG6%F]sFAFFFdrFbs-%*jets/ezipG6$F_oFjnF 8F8F8F8, Q.jets/isoalg.mF8 M7R0 I,jets/jD2indf*6%%%exprG%%ivarG%%dvarG6#%&lstjDG6#%XCopyright~(C)~2005~by~Arne~ Lorenz.~All~rights~reserved.G6"C$>8$-%$mapG6$f*6#%"aGF,6$%)operatorG%&arrowGF,/ 9$-%,jets/jD2jetG6$-%#opG6$"""F:7#-%-jets/sortvarG6$-F?6$""#F:T$F,F,6$F&9%-%'in detsG6$F:.-%)specfuncG6$%)anythingG%$_jDG-%%subsG6$F/F:F,F,F,F,, Q.jets/jD2ind.mF, M7R0 I,jets/jacobif*6$%$_trG%&_ivarG6,%%ivarG%%dvarG%"nG%"mG%"kG%#trG%"iG%"jG%"vG%#p oG6#%\pCopyright~(C)~2000-2003~by~Mohamed~Barakat,~Pieter~Eendebak.~All~rights~ reserved.G6"C,>8$-%,jets/mklistG6#9%@$/F77"-%'RETURNG6#-%'matrixG6#7#7#"""@%2"" #9#>8%-F96#&9"6#""$>FMF>>8)-F96#9$@$-%%typeG6$&FV6#FG%"=G>FV-%$mapG6$%$rhsGFV>8 &-%%nopsG6#F7>8'-Fco6#FM@$2FSFKC&@$2-Fco6#FVFao-%&ERRORG6#%aoThere~must~be~at~l east~as~many~new~variables~as~independent~variables!G>8*&FQ6#""%@$433-Ffn6$Fep% (integerG1FGFep1Fep,&FaoFGFfoFG-Fap6%%4The~fourth~argumentGFep%X~must~be~an~int eger~between~1~and~nops(ivar)+nops(dvar)G@%2FhpFKC&>8,&FQ6#""&@'333-Ffn6$F[rF_q 1FGF[r1F[rFfo/F^pFbqC$>8+,&FaoFGF[rFG>F[r&FV6#Fjr3-%'memberG6%F[rFM.8-FgrC$>Fjr ,&FaoFGFdsFG>F[rF]sC$>Fjr""!@$-Ffn6$F[rFjn>F[r-F_o6#F[r@$2FaoFep@%0FjrF[t@%/Fjr Fep>Fep,&FaoFGFGFG-Fap6&FeqFep%fnwhich~is~>~nops(ivar)~must~coincide~with~the~f ifth~argumentGFjr>FepFit>FV-%'subsopG6$/Fep%%NULLG7$-%#opG6#&FV6#;FGFaoF[r-Fap6 #%?The~fifth~argument~is~missing!G>8(F^p-FC6%F_vFao-F]o6$f*6#%"aGF46$%)operator G%&arrowGF4-F]o6$f*6#%"bGF4FgvF4-%+jets/jsimpG6%-%.jets/totalderG6&T$FYT%T'Fgwf *FevF4FgvF4-%)simplifyG6#-%(convertG6$FY%"DGF4F4F4F4F46(FfvFYF(T#F)FfwFaxF4F46& F(F7F)FMFVF4F4F4F4, Q.jets/jacobi.mF4 M7R0 I,jets/jet2jDf*6$%$jetG'%%IvarG%%listG6#%'lstDerG6%%XCopyright~(C)~2005~by~Arne ~Lorenz.~All~rights~reserved.G%'systemG%)rememberG6"@%/-%%typeG6$9$%(indexedG%% trueGC$>8$7#-%#opG6#F5-%$_jDG6%-F=6$""!F5F:-%$mapG6$f*6#%"aGF/6$%)operatorG%&ar rowGF/@$/-%'memberG6$F5T#%&falseGF5F/F/6$F*F:9%-F@6%F57"FVF/F/F/F/, Q.jets/jet2jD.mF/ M7R0 I+jets/ldvecf*6%%%vec1G%%vec2G%%ivarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.GF(-%,jets/liecomG6#9"F(F(F(F(, Q-jets/ldvec.mF( M7R0 I,jets/liederf*6%%$vecG%%exprG%%ivarG6&%%dvarG%%DvarG%$prjG%$rstG6#%[oCopyright ~(C)~2000-2005~by~Mohamed~Barakat.~All~rights~reserved.G6"C(@%2""$9#>8$-%,jets/ mklistG6#&9"6#""%>F67"@%2F=F4>8%-F86#&F;6#""&>FC%%NULLG>8&-%-jets/sortconG6$9$7 $-%#opG6#9&-FS6#F6>8'-%,jets/subconG6&FPFLFUF6@$0FY""!-%&printG6$FY%^owill~not~ be~used,~probably~because~it~should~be~the~prolonged~part!G-%,jets/lieappG6&7$- FS6#FL-FS6#-%-jets/proljetG6'FP-%-jets/getindsG6$9%F6FUF6FCF\pFUF6F/F/F/F/, Q.jets/lieder.mF/ M7R0 I/jets/linReducef*6'%$sysG%$ordG%&rprocG%%ivarG%%dvarG62%(lstJetsG%)lstJets2G%% mSysG%&nmSysG%&mSys2G%*lstOrdPosG%'ordposG%'minPosG%"iG%"jG%"kG%%iRowG%%iColG%% pvarG%%avarG%#rkG6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~reserved.G6" C2@$/-%,jets/mklistG6#9$7#""!OFE>8$-%.jets/sortjetsG6%-%-jets/getindsG6%FD9(Q!F =9'FP>FI-%$mapG6$f*6#F3F=6$%)operatorG%&arrowGF=&T#6#,$FD!""F=F=6$F+FI7#-%"$G6# ;"""-%%nopsG6#FI@'332""&9#-%%typeG6$&9"6#""'%%listG-F\p6$&F_p6#Fjn%'stringG@%32 ""(Fjo-F\p6$&F_p6#F[qFbpC$>81F^p>82F^qC$>Fbq7">FdqF^p3/FjoFapF[pC$>FbqF^p>FdqFg qC$>FbqFgq>FdqFgq>FI7$-%#opG6#Fbq-FdrFdo>8&-FU6$f*6#%"aGF=FYF=-%(collectG6%-%'e xpandGFCFgn%,distributedGF=F=F[oFD>Fhr-FU6$f*F\sF=FYF=7$7#-%'coeffsG6%FDFgn.%$p osG7#F^tF=F=F[oFhr@$/-%(convertG6$-FU6$f*F\sF=FYF=@%5/-%&minusG6$<#-Fdr6#&FD6#" "#<#-Fdr6#Fgn<"/&FD6#FaoFE%%trueG%&falseGF=F=F[oFhr%$andGF\vYQ@The~given~system ~is~not~linear!F=>8*Fjn>8,Fao?(F=FaoFaoF=3/FavFjn1FcvFboC$@$31-%-jets/getiordG6 $&FI6#FcvFP9%/-%'memberG6$F_wFbqF\v>FavFcv>Fcv,&FcvFaoFaoFao@$FfvOFE>Fhr-FU6$f* F\sF=FYF=-FU6$f*6#%"bGF=FYF=@%/-Fdw6%FD&T$FbuF]tF[v&Fix6$FaoF^tFFF=F=6$F]sFDFgn F=F=F[oFhr@%/FdqFgq>Fhr-%+jets/jsimpG6%FhrFPf*F\sF=FYF=-T&6$FD.FgnF=F=6&F:83F'9 &C;>8)-FU6$f*F\sF=FYF=-%,jets/jorderG6$FDFixF=F=6$F)FPFI>F]z7$-Fdr6#-FU6$f*FXF= FYF=@$0&FgnFC&Fgn6#,&FDFaoFjnFaoFa[lF=F=6$F0F]z7#-F^o6#;Fcu-Fco6#F]zFg[l>F]z-FU 6$f*FXF=FYF=@%/FDFao;FaoF^[l;,&F_[lFaoFaoFaoF^[lF=F=Fb[l7#-F^o6#;FaoFg[l>8(-FU6 $f*FXF=FYF=-FU6$f*F\sF=FYF=@$3/-F]w6%&FD6#&Fgn6#FeyT'FQFF0<#-Fdr6#Fc]l<#FFFDF=F =6(F0T%F3FDF9Fg]lFgnF=F=6(F-FhrF0F]zF9FdqFb\l>Fhr-FU6$f*F\sF=FYF=@$/-Fdw6$FD-FU 6$FdrFgnF\vFDF=F=6$F/Fg\lFhr>Fhr7$Fhr-Fdr6#Fg\l>F]z7$;FFFF-FdrFh[l>F]z-FU6$f*FX F=FYF=@$0F^[lFgq-Fdr6$Fcu&F^^lFCF=F=6&F-FhrF0F]zFb\l>Fhr-FU6$f*F\sF=FYF=@$0FDFg qFDF=F=F=Fhr>8'-Fco6#Fhr>Fhr-FU6$f*FXF=FYF=-Fct6$-Fay6%F^[lFeyf*F\sF=FYF=-T(6$F DFe]lF=F=6(F0Fg]lF3FDF'T*%)listlistGF=F=6*F-FhrF)FPF0F]zF'Fjy7#-F^o6#;FaoFd`l?( FcvFcuFaoFd`lF[vC$>8+-FU6$f*F\sF=FYF=-Fdr6#-FU6$f*6#F4F=FYF=@$0&FixFCFFFDF=F=F\ y7#-F^o6#;Fao-FcoFCF=F=F=&FhrF`w@$0F^blFgqC*>F^bl-%$minG6#-Fdr6#F^bl>8--Fct6$-F U6$Fco&Fhr6#;Fao,&FcvFaoFjnFao%"+G>Fg\l-FU6$f*F\sF=FYF=-Fdr6#-FU6$f*FbxF=FYF=&F D6#;FgnFjnF=F=6$F2FgnFDF=F=6$F2F^bl&Fhr6#;FaoFcv>Fg\l-FU6$f*6#F5F=FYF=@%1FDFgn- %'subsopG6$F^\l7$-F^o6$FFFgn-Fdr6#F[`lF`flF=F=6&F4F[dlF/Fg\l7#-F^o6#;Fao-FcoF^_ l>Fg\l-Fay6%Fg\lFPf*F\sF=FYF=-&%'linalgG6#%*gaussjordG6$FD,*&Fgn6#F^^lFaoFg]lFj nFaoFaoT)FaoF=F=6*F0F]zF3FcvF2F^blF4F[dl>Fg\l-Fct6$-&Fagl6#%*submatrixG6%Fg\l;F aoF[dl;,&F[dlFaoFaoFao-&Fagl6#%'coldimGF^_lFeal>F[dlFF?(8.FaoFaoFcdlF[vC$>&Fhr6 #F[il-FU6$f*6#%"lGF=FYF=7$-Fdr6#&&Fgn6$F^^lFD6#;Fao,&Fg]lFaoFjnFao-Fdr6#&Fhgl6# ,&T+FaoFDFaoF=F=6,F-FhrF5F[ilF2F^blF/Fg\lF4F[dl7#-F^o6#;Fao-Fco6#F^il>F[dl,&F[d lFaoFijlFao>Fhr-FU6$FdrFhr>8%-FK6%-FN6$FDFdqFRFdq>Fa[m-FU6$f*FXF=FYF=FfnF=F=6$F ,Fa[m7#-F^o6#;Fao-Fco6#Fa[m>Fg\l-FU6$f*F\sF=FYF=-FU6$f*FbxF=FYF=F^sF=F=6$F,FgnF DF=F=Fj[mFhr>Fg\l-FU6$f*F\sF=FYF=-FU6$f*FbxF=FYF=FhsF=F=Fh\mFDF=F=Fj[mFg\l>Fa[m -FU6$f*FXF=FYF=7#-Fdr6#<#-Fdr6#-FU6$f*F\sF=FYF=-Fdr6#&FD6$FixFcuF=F=6$F3FDFgnF= F=Fj^lF\o>FI-FU6$f*FXF=FYF=-Fdr6#-FU6$f*F\sF=FYF=*&Fe]lFaoFDFaoF=F=6&F+F^^lF3FD F^[lF=F=6&F,Fa[mF+FIF\o>Fhr-FU6$f*F\sF=FYF=-FU6$f*FXF=FYF=-Fdr6#-FU6$f*FbxF=FYF =@%/-Fdw6%FD&Fix6$FeyFcuF]tF[v&Fix6%FeyFaoF^tFFF=F=6&F]sFeyF3FDF^[lF=F=6&F,FgnF ]sFD7#-F^o6#;Fao-FcoFfuF=F=Fj[mFg\l>Fhr-Fay6%FhrFPf*F\sF=FYF=FdyF=F=Fhy>FavFjn> FcvFao?(F=FaoFaoF=FevC$@$Fjv>FavFcv>FcvFhw@$FfvOFE@%0FbqFgqC&>FiyFF?(F=FaoFaoF= 32Fiy-FcoFer/&Fhr6$,&FiyFaoFaoFaoFabmFao>FiyFabm>80Fabm@%1FdbmFavC%>Fhr-FU6%Fct 7#-&Fagl6#%$rowG6$Fhr;FaoFiyFbp>Fhr-FU6$f*F\sF=FYF=@$/&FD6#;F^^l,&FgnFaoFjnFao7 #-F^o6$FF,&FgnFaoF^^lFjnFDF=F=6&F1FavF7FdbmFhr@$/FhrFgqOFEOFEC'>FdbmFao>8/Fao?( F=FaoFaoF=31FhdmFiy2FdbmFav@%/&Fhr6$FhdmFdbmFF>Fdbm,&FdbmFaoFaoFao>Fhdm,&FhdmFa oFaoFao@$2FiyFhdmOFE>Fhr-FU6%Fct7#-F]cm6$Fhr;FhdmFiyFbp-FU6$f*F\sF=FYF=-Fct6$-% $zipG6%f*6$Fcx%"cGF=FYF=*&FDFaoFawFaoF=F=F=FDFgnFddlF=F=F[oFhrF=F=F=F=, Q1jets/linReduce.mF= M7R0 I,jets/mklistf*6#%"LG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rig hts~reserved.GF&@)-%%typeG6$9$%%listGF--F+6$F-%$setG-%(convertGF,-F+6$F-%&array G-F36$F-%)listlistG7#F-F&F&F&F&, Q.jets/mklist.mF& M7R0 I+jets/mkmatf*6#'%$matG<&%'matrixG%&arrayG%%listG%)listlistG6$%"MG%"iG6#%[oCopy right~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"@)-%%typeG6$9$F( F6-F46$F6F+@%-F46$&F66$"""F>F*C%>8$-F(6$-%%nopsG6#F6-FE6#&F66#F>?&8%-%$mapG6$f* 6#%"aGF16$%)operatorG%&arrowGF1-%#opG6#-FN6$f*6#%"bGF1FSF17$T$F6F1F16$FRF67#-%" $G6#;F>-FE6#&FinFJF1F16$F&F67#-F]o6#;F>FD%%trueG>&FA6#-FW6#FL&F6F[p-%%copyG6#FA -%(convertGF5-F46$F6F*-F(6%F>FDF6FbpF1F1F1F1, Q-jets/mkmat.mF1 M7R0 I,jets/mulconf*6%%%scalG%$vecG%%ivarG6#%%dvarG6#%[oCopyright~(C)~2000-2002~by~M ohamed~Barakat.~All~rights~reserved.G6"C%@$55/9$""!/9%F3/F57"-%'RETURNG6#F3@%2" "$9#>8$&9"6#""%>F@%%NULLG-%.jets/gcollectG6%-%$mapG6$f*6#%"xGF,6$%)operatorG%&a rrowGF,7$*&T$"""&F26#FVFV&F26#""#F,F,6$F%F2F59&F@F,F,F,F,, Q.jets/mulcon.mF, M7R0 I0jets/natfin2inff*6%%%_finG%&_ivarG%&_IvarG6(%$finG%%ivarG%%IvarG%%uvarG%#xiG% %DvarG6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.G6"C,>8$- %,jets/mklistG6#9$>8%-F66#9%>8&-F66#9&>F4&F46#;,&-%%nopsG6#F:"""FKFK!"">8'-%$ma pG6$%$lhsGF4@%32""$9#4-%%typeG6$&9"6#""%%'stringG>8)-F66#Ffn@%/FHFK>F\o7#8(>F\o -FP6$f*6#%"aGF16$%)operatorG%&arrowGF1-%$catG6$T#F8F1F16$F-Fco7#-%"$G6#;FKFH-%- jets/eqn2indG6%-FP6$%$rhsGF4F:F?-%-jets/grp2algG6&%"%GF:F?F\o-%/jets/xieta2vecG 6&F\o-FP6$f*FhoF1FjoF1,$F8FLF1F1F1F`qF:FN@%-FZ6$&Fgn6#FLFjnF`q-%-jets/ind2eqnG6 %F`qF:F\oF1F1F1F1, Q2jets/natfin2inf.mF1 M7R0 I-jets/nrsolvef*6"6&%$ar1G%$narG%$ar2G%$solG6#%[oCopyright~(C)~2000-2005~by~Moh amed~Barakat.~All~rights~reserved.GF$C&@%-%%typeG6$&9"6#"""%%listG>8$-%+jets/mk setG6#F1>F7F1@%2F49#C$>8%""#@%-F/6$&F26#FBF5>8&-F96#FF>FIFFC$>FAF4>FI%%NULLG>8' -%(convertG6$<#-%&solveG6%F7FI&F26#;,&FAF4F4F4!""%(radicalG@%0FR<"C$@$-F/6$&FRF 3%"=G>FR<#FR@%3F=FDC%>FIFF>FR-%$mapG6%%%subsGFRFI-F[p6$f*6#%"aGF$6$%)operatorG% &arrowGF$-%*jets/ezipG6$T#9$F$F$6$F(FIFR-F[p6$%,jets/mklistGFR-%&ERRORG6$%5solv e~returned~NULL:G-%&SolveG6#F2F$F$F$F$, Q/jets/nrsolve.mF$ M7R0 I-jets/proljetf*6&%'vecconG'%(jetvarsG%%listG%%ivarG%%dvarG6(%%charG%#poG%$posG %%dersG%(vecSortG%%DvarG6#%[pCopyright~(C)~2000-2005~by~Mohamed~Barakat~and~Arn e~Lorenz.~All~rights~reserved.G6"C)@%32""%9#-%%typeG6$&9"6#""&F(>8)7$-%#opG6#9' -FF6#F>>FCFH>8$-%%subsG6$-%$zipG6%f*6$%"xG%"yGF46$%)operatorG%&arrowGF4/9$&9%6# """F4F4F4-%+jets/xietaG6$9&FH-%-jets/sortconG6$Ffn7$-FF6#F^oFE-%-jets/charactGF ]o>8&-%$mapG6$f*6#%"bGF4FXF4@'/-%'memberG6%FfnT$.T%%%trueGFfp/-Fbp6%FfnT(FepFgp ,$Ffp!""""!F4F46(F*FHF-8%F)F^o-Fjo6$f*6#%"aGF4FXF4@%/-F<6$Ffn%(indexedGFgp-FF6$ F^qFfnFfnF4F4F4Fhn@$/-Fbp6%F^qFho.F`qFgpY6$Q\oThe~following~term~is~neither~a~j et~in~dvar~nor~a~member~of~ivar:F4&Fhn6#F`q>8'-Fjo6$f*FdqF4FXF4@%Fgq7#-FF6#Ffn7 "F4F4F4Fhn>8(-F`o6$FfnF^o-Fjo6$f*6#%"iGF4FXF4@%2&T#F_sF^q&Ffp6#,$F\tF]q7$,&-%.j ets/totalderG6&&T'6#F\t&T)F_sT,T-Fjn-%(convertG6$-Fjo6$f*FdqF4FXF4*&&FfnFinFjn& &Fdp6#&Ffp6#F[q6#-%-jets/sortvarG6$7$-FF6#&Ffn6#""#-FF6#&FjtFiuF[uFjnF4F46,F*T2 F.F]tFisFfnF/FjtF)F[uFfp%"+GFjn7#&T0F_sF4F462F.FhoF0FbsF,FMF/FhrF)F^oF1FCF'FhnF *FH7#-%"$G6#;Fjn-%%nopsG6#FhnF4F4F4F4, Q/jets/proljet.mF4 M7R0 I.jets/riemann3f*6$%#ggG%%dvarG6*%"mG%"aG%$rieG%$ggiG%#ZMG%%rie3G%"kG%"lG6#%[oC opyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*@%2""#9#>8& 9%>F9-%-jets/riemannG6$9$F:>8'-&%'linalgG6#%(inverseG6#F?>8$-%%nopsG6#-%,jets/m klistG6#F9>8%-&FD6#%'coldimG6#&F96$"""FY>8(-%'matrixG6%FQFQ""!>8)7#-%$seqG6$7#- F^o6$-%%copyG6#Fen/8*;FYFI/8+Fho?(FgoFYFYFI%%trueG?(FjoFYFY,&FgoFY!""FYF\pC$>&F [o6$FgoFjo-%)simplifyG6#-%&evalmG6#-%#&*G6$&F9FcpFA>&F[o6$FjoFgo-Fhp6#,$FbpF_p- %+jets/mkmatG6#F[oF2F2F2F2, Q0jets/riemann3.mF2 M7R0 I.jets/srtbylstf*6$'%%lst1G<$%%listG%$setG'%%lst2GF(6(%"iG%"jG%"kG%$lstG%#lsG%# arG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8 '%%NULLG>8(F9>8)F9?&8$9%%%trueG?&8%9$FAC%@%-%%typeG6$FC%"=G>8&-%$lhsG6#FC>FLFC@ $-FH6$FL%)functionGC$>F=6$F=-%#opG6#FL>FL-FY6$""!FL@$/F?FLC$>F86$F8FC>F;6$F;FL@ $2""#9#C$@$-FH6$&9"6#""$%'symbolG-%'assignG6$Fho<#F;@$2F[pFco@$-FH6$&Fio6#""%F\ p-F^p6$Ffp<#F=7#F8F5F5F5F5, Q0jets/srtbylst.mF5 M7R0 I/jets/vhomotopyf*6%%#ELG%%ivarG%%dvarG6%%#ssG%$_ELG%%qinvG6#%[oCopyright~(C)~2 000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&@%2""$9#@%2F3""&-%&ERRORG 6#%MIf~not~3~then~5~or~6~arguments~are~expected!GC$@&/F3""'>8&&9"6#F>-%,jets/Qc heckG6%&FB6#""%&FB6#F69&>F@-%.jets/QinverseG6%FG9%FL>8$""">FS""!>8%-%,jets/mkli stG6#9$>FX-%$mapG6$f*6#%"aGF.F.F.@%-%%typeG6$Ffn%"=G,&-%$lhsGFenFT-%$rhsGFen!"" FfnF.F.F.FX@%/-%%nopsG6#FX-F\p6#FL@%/FSFV-%+jets/dlintG6$-%+jets/dprodG6$FLFXFL -%,jets/sdlintG6(-Ffp6$-%+jets/dlfacG6'FGF@FJFQFLFXFQFLFGFJF@-F86#%doThere~must ~be~as~many~components~in~your~function~as~dependent~variables!GF.F.F.F., Q1jets/vhomotopy.mF. M7R0 I-jets/Der2mapf*6#%$derG6$%&ldvarG%%lvarG6#%>Copyright~(c)~1997~by~Khai~VuG6"@% /-%%nopsG6#-%#opG6$""#9$""!-F26$"""F5C%>8%-F26$""$F5>8$-%$zipG6%f*6$%%varxG%%or dxGF+F+F+-%"$G6$F59%F+F+F+F<F1@%/-F/6#FAF6-F76#-F26#F<-%%diffG6$FQ-F2FPF+F+F+F+, Q/jets/Der2map.mF+ M7R0 I0jets/Helmholtz2f*6%%#eqG%%ivarG%%dvarG6+%#ndG%$_eqG%$ordG%"AG%$eulG%"nG%"iG%" jG%"kG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C ->8$-%%nopsG6#9&>8%-%,jets/mklistG6#9$>F=-%$mapG6$f*6#%"aGF4F4F4@%-%%typeG6$FA% "=G,&-%$lhsGF@"""-%$rhsGF@!""FAF4F4F4F=@$0-F96#F=F8-%&ERRORG6#%`pThe~source~for m~(=first~argument)~must~have~as~many~components~as~dependent~variablesG>8&-%-j ets/getiordG6$F=F;>8'-%'matrixG6$F7F7?(8*FQFQF7%%trueG?(8+FQFQF7Fco>&F]o6$FboFe o7"?&8,-FD6%%+jets/symchG7#-%$seqG6$,&FhnFQ8)FT/Fdp;""!,&FhnFQFTFQ9%Fco?(FeoFQF QF7FcoC$>8(-%+jets/EulerG6'&F=6#FeoFipF;F[pQ!F4?(FboFQFQF7Fco>Fgo7$-%#opG6#Fgo7 $,&-%-jets/partderG6&&F=6#Fbo&&F;Fbq6#-Fhq6#F[pFipF;FQ*&)FT-F9FerFQ&F]qF`rFQFTF [p?(FeoFQFQF7FcoC$>F]q-%.jets/OrdEulerG6&FaqFipF;Fcq?(FboFQFQF7Fco>Fgo7$Fgq7$,& -F]r6&F_rFbrFipF;FQFirFTFio?(FboFQFQF7Fco?(FeoFQFQF7Fco>Fgo-%.jets/gcollectG6$F goFip-%%copyG6#F]oF4F4F4F4, Q2jets/Helmholtz2.mF4 M7R0 I-jets/casimopf*6&%%killG%%lvecG%$vecG%%ivarG6)%%dvarG%&_killG%#iiG%#jjG%"nG%%l comG%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved. G6"C(@%2""%9#>8$&9"6#""&>F:%%NULLG>8*""!>8(-%%nopsG6#9%>8%-&%'linalgG6#%(invers eG6#9$?(8&"""FUFE%%trueG?(8'FUFUFEFVC$>8)-%,jets/liecomG6&&FI6#FX9&9'F:@$30FenF C0&FK6$FTFXFC>FB-%,jets/addconG6&FB-%,jets/mulconG6&Fao-Fgn6&&FI6#FTFenF\oF:F\o F:F\oF:FBF3F3F3F3, Q/jets/casimop.mF3 M7R0 I,jets/cchchrf*6"6-%#arG%%itrlG%%dtrlG%%charG%%ivarG%%dvarG%$trnG%&oivarG%&odva rG%$chrG%%nchrG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~rese rved.GF$C0>8$-%,jets/inpcchG6#9">8%&F56#""">8&&F56#""#>8'&F56#""$>8(&F56#""%>8) &F56#""&>8*-%$mapG6$%#opG7$F;F@@$4-%,jets/chkcntG6%FTFJFO-%&ERRORG6#%eqwon't~be ~able~to~(functional)~invert~the~functional~jacobi~matrix~of~the~given~non-cont act~transformation!G>8+-FV6$%$lhsGF;>8,-FV6$FaoF@@%-%,jets/chkvecG6#FE>8--%.jet s/vec2charG6%FEF^oFco>F[pFE>8.-%,jets/cchjetG6'F;F@F[pFJFO-%+jets/appmtG6&-%.je ts/ijacobifG6&F;F@FJFOFapFJFO@%Fgo-%/jets/char2evolG6%%"%GFJFOF_qF$F$F$F$, Q.jets/cchchr.mF$ M7R0 I1jets/coeffmatrixf*6#%%_resG6/%$resG%"mG%"nG%#baG%#KMG%#KLG%#reG%#cvG%"rG%"cG% #vaG%"pG%"lG6#%\pCopyright~(C)~2000-2003~by~Gehrt~Hartjen~and~Daniel~Robertz.~A ll~rights~reserved.G6"C->8$-%,jets/mklistG6#9$@$/F97"-%'RETURNG6#-%'matrixG6$"" !FG>8%-%%nopsG6#F9@'-%%typeG6$F9%)listlistGC$>8&-FK6#&F96#""">F9-%$mapG6$%#opGF 9-FO6$FW%%listGC$@$2FY-FK6#-%+jets/mksetG6#-Ffn6$FKF9-%&ERRORG6#%NYour~list~con tains~lists~of~different~length!G>FTFG>FTFG>8)%%NULLG>8'F^p?&8*-%'expandGFL%%tr ueGC&@%-FO6$Fbp%"+G>Fbp-%(convertG6$FbpF[o>Fbp7#Fbp>8+7#-%"$G6$FG-FK6#7#F`p@$0F bp7#FG?&8,FbpFepC%>8--%'coeffsG6#F^r>8.*&F^rFYFar!""@%-%'memberG6%FfrFiq.8/>Fbq -%'subsopG6$/F^sFarFbqC$>F`p6$F`pFfr>Fbq7$-Fhn6#FbqFar>F]p6$F]pFbq>80-FKFjs@%/F ^tFG>F]p7#F]p>F]p-Fas6$-Fhn6#-Ffn6$f*6#%"iGF66$%)operatorG%&arrowGF6/F=7$-Fhn6# &T#F<-Feq6$FG,&T%FY-FKFduFhrF6F66&F,F]pF3F^t7#-Feq6#;FY-FK6#FctFct@$2FY9#-%'ass ignG6$&9"6#""#Fiq@%/FTFG-%%copyG6#-F]q6$F]pFE-FE6%FI*&FTFYF^tFY-Ffn6$FhnF]pF6F6 F6F6, Q3jets/coeffmatrix.mF6 M7R0 I-jets/gettypef*6$%%funcG%$typG6#%#fnG6#%[oCopyright~(C)~2000-2002~by~Mohamed~B arakat.~All~rights~reserved.G6"@+-%%typeG6$9$9%F03-F.6$F0%)functionG-F.6$-%#opG 6$""!F0F1F83-%$hasG6$F8%"DG-F.6$-F96#F8F1FC-F>6$F8%%diffGC%>8$-F96$"""F0?(F+FMF MF+-F>6$-F96$F;FJFG>FJ-F96$FMFJ-F"6$FQF1%%NULLGF+F+F+F+, Q/jets/gettype.mF+ M7R0 I,jets/inv2LFf*6%%%_invG%&_ivarG%&_dvarG6&%$invG%%ivarG%%dvarG%&omegaG6#%fnCopy right~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$-%,jets/mklistG6 #9$>8%-F46#9%>8&-F46#9&>8'-%+jets/jsubsG6&-%*jets/ezipG6$F=F8F2F8F=-FG6$F2FBF/F /F/F/, Q.jets/inv2LF.mF/ M7R0 I-jets/isderivf*6$%%funcG%%dvarG6#%#fnG6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.G6"@)4-%%typeG6$9$%)functionG%&falseG-%$hasG6$-%#o pG6$""!F1%"DG-%'memberG6$-F86#F79%-F56$F7%%diffGC%>8$-F86$"""F1?(F+FJFJF+-F56$- F86$F:FGFD>FG-F86$FJFG-F=6$FNFA@%/9#""#F3-F=6$F7FAF+F+F+F+, Q/jets/isderiv.mF+ M7R0 I*jets/jlinf*6%%%leqnG%%ivarG%&_dvarG6$%%dvarG%%DvarG6#%[oCopyright~(C)~2000-20 02~by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$-%,jets/mklistG6#9&@%2""$9#C $>8%-F26#&9"6#""%@$0-%%nopsG6#F;-FE6#F0-%&ERRORG6#%[pThe~number~of~linearising~ coordinates~must~coincide~with~that~of~dependent~ones!G>F;-%$mapG6$%-jets/ind2r evGF0-FO6$f*6#%"aGF-6$%)operatorG%&arrowGF--%#opG6#-%+jets/appmtG6&9$T#T&7$-Fen 6#T'-Fen6#F[oF-F-6(F*F;F&9%F)F0-FO6$f*FUF-FWF--%.jets/frechetcG6%7#FjnT$T%F-F-6 &F&FdoF)F0-F26#Fjn@%-%%typeG6$Fjn%%listG%"%G-Fen6#FfpF-F-F-F-, Q,jets/jlin.mF- M7R0 I-jets/list2opf*6%%#liG%%ivarG%%dvarG6$%#stG%"lG6#%inCopyright~(C)~2000-2002~by ~Gehrt~Hartjen.~All~rights~reserved.G6"C%>8$Q$a->F-?&8%9$%%trueG@%/&F36#""#7">F 0-%$catG6&F0Q#+(F--%(convertG6$&F36#"""%'stringGQ$)*aF->F0-F>6,F0F@FAQ5)*`jets/ totalder`(a,F--FB6$F8FGQ",F--FB6$9%FGFO-FB6$9&FGQ")F--%&parseG6#F0F-F-F-F-, Q/jets/list2op.mF- M7R0 I.jets/natfinG2f*6%%$_trG%%_invG%&_ivarG63%#trG%$invG%%ivarG%"nG%%dvarG%"mG%$te qG%$LHSG%%lvarG%%vvarG%%SUBSG%%IvarG%%avarG%"qG%$itrG%$natG%%nat2G6#%[oCopyrigh t~(C)~2004-2005~by~Mohamed~Barakat.~All~rights~reserved.G6"C2>8$-%,jets/mklistG 6#9$>8%-FA6#9%>8&-FA6#9&>8'-%%nopsG6#FJ>8(-%$mapG6$%$lhsG&F?6#;,&FO"""FgnFgn!"" >8)-FQ6#FT>8*-%+jets/mksetG6#-FV6$f*6#%"aGF<6$%)operatorG%&arrowGF<-%%typeG6$FC %"=GF<F<F<FE@'/F^o<#%%trueGC$>8+-FV6$FXFE@'3-%-jets/chkdvarG6$FdpFJ/-%-jets/get indsG6%FdpFTQ!F<7"C%>8,-%;jets/get_vars_to_eliminateG6%FEFJFT>8-Fdp>8.&-%-jets/ nrsolveG6$FEFdq6#Fgn55/9#""$3/Fdr""%5/&9"6#FhrFaq-F[p6$F[s%'stringG3Fgr/-F^q6%F EF[sF`qFaq-%&ERRORG6#%ipThe~left~hand~sides~of~the~first~argument~are~not~admis sible~abstract~names~for~the~invariantsGC%>Fiq-FA6#F[s>F[rFE>FE&-F^r6$F[rFiqF`r 332FerFdr0F[sFaq4F^sC$>FiqF[t@%/F^o<#%&falseGC%>FdqFeq>FE-%*jets/ezipG6$FiqFE>F [rF\r-Ffs6#%=Inconsistent~first~argument!G-Ffs6#%dtI'm~not~able~to~extract~abst ract~names~for~the~invariants.~Either~specify~them~as~left~hand~sides~of~the~in variants~or~specify~them~in~a~fourtth~argumentG@%32FhrFdr4-F[p6$&F\s6#""&F`s>8/ -FA6#F`v>FdvFaq>807$-%#opGF\o-F\w6#Fdv>81-%-jets/getiordG6$FEFT>82&-%-jets/prol ccvG6&F?F`wFJFTFZ@$0FdvFaqC$>F?-%-jets/eqn2indG6%F?FJFdv>Few-F_x6%FewFJFdv>83-% +jets/jsimpG6$-%%subsG6$FewFEFiv>Fex-Fgx6$-Fjx6$F[rFexFiv?(F<FgnFgnF<FapC%>84F] y@$/FdyFex@%-F[p6$&F\s6#FhnF`s-%'RETURNG6#7$-F\w6#F?-F\w6#-Fgx6$FexFdv-F]z6#7$F `z-F\w6#-Fgx6%FexFdvf*FeoF<FgoF<-%(collectG6%-%'expandGFBT#%,distributedGF<F<6$ F2Fiq>FexFdyF<F<F<F<, Q0jets/natfinG2.mF< M7R0 I.jets/riemannSf*6$%#ggG%%dvarG6,%"mG%"RG%#ddG%#ZMG%%rieSG%$facG%"aG%"bG%"cG%"d G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*>8$- &%'linalgG6#%'coldimG6#9$@%2""#9#>8%9%>FD-%-jets/scalarcG6$F>FE>8),$*$,&*$F7FA" ""F7!""FQFQ>8&f*6$%"xG%"yGF4F4F4@%/F>FEFP""!F4F4F4>8'-%'matrixG6%F7F7FZ>8(7#-%$ seqG6$7#-F^o6$-%%copyG6#Ffn/8*;FPF7/8+Fho?(8,FPFPF7%%trueG?(8-FPFPF7F]p?(FgoFPF PF7F]p?(FjoFPFP,&FgoFPFQFPF]pC$>&&F[o6$FgoFjo6$F\pF_p-%)simplifyG6#*(FKFPFDFP,& *&&F>6$FgoF_pFP-FS6$F\pFjoFPFP*&&F>6$FjoF_pFP-FS6$F\pFgoFPFQFP>&&F[o6$FjoFgoFhp ,$FepFQ-%+jets/mkmatG6#F[oF4F4F4F4, Q0jets/riemannS.mF4 M7R0 I-jets/riemannf*6$%#ggG%%dvarG6/%"mG%"aG%&GammaG%&frameG%#ZMG%$RieG%'cframeG%"i G%"jG%"kG%"lG%$comG%&comcfG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All ~rights~reserved.G6"C*>8$-%%nopsG6#9%@%2""#9#C$>8&9$@%-%%typeG6$&9"6#!""%'strin gG>8'-%$mapG6$f*6#%"xGF76$%)operatorG%&arrowGF77#7$"""7#FFF7F7F7F>>FQ&FL6#""$C$ >FE-%1jets/christoffelG6$FFF>>FQ-FS6$f*FVF7FXF7FenF7F7F7F>>8%-&%'linalgG6#%'col dimG6#&FE6#Fgn>8(-%'matrixG6%FgoFgo""!>8)7#-%$seqG6$7#-Fjp6$-%%copyG6#Fap/8-;Fg nF:/8.Fdq>8*-FS6%%,jets/cflistGFQF>?(FcqFgnFgnF:%%trueG?(FfqFgnFgn,&FcqFgnFNFgn F]rC%>8/-%,jets/liecomG6%&FQ6#Fcq&FQ6#FfqF>>80-%.jets/bascoeffG6$-F[r6$FbrF>Fhq ?(8+FgnFgnFgoF]r?(8,FgnFgnFgoF]rC$>&&Fgp6$FcqFfq6$FbsFds-%)simplifyG6#,,-%+jets /ldjetG6%Ffr&&FEFirFjsF>Fgn-F`t6%Fhr&&FEFgrFjsF>FN-%(convertG6$-FS6$f*6#%"sGF7F XF7*&&&T#6#T%6$T'FFFgn&&Fcu6#T)6$FFT+FgnF7F76,F*FEF1FcqF/FbsF2FfqF0Fds7#-%"$G6# ;FgnFgo%"+GFgn-Fit6$-FS6$f*F^uF7FXF7F`uF7F76,F*FEF2FfqF/FbsF1FcqF0FdsF_vFdvFN-F it6$-FS6$f*6#%"bGF7FXF7*&&&Fcu6#FF6$FeuFguFgn&F[vFewFgnF7F76*F*FEF/FbsF0FdsF4F[ s7#-Fav6#FdqFdvFN>&&Fgp6$FfqFcqFjs,$FgsFN-%+jets/mkmatG6#FgpF7F7F7F7, Q/jets/riemann.mF7 M7R0 I/jets/sepfactorf*6$%(sep_facG%(sep_varG6#%(dep_facG6#%>Copyright~(c)~1997~by~K hai~VuG6"@'-%%typeG6$9$%"*GC$>8$-%'selectG6%%$hasGF09%7$*&F0"""F4!""F4-F86$F0F9 7$F<F07$F0F<F+F+F+F+, Q1jets/sepfactor.mF+ M7R0 I,jets/setOldf*6"F$6#%gnCopyright~(C)~2005-2007~by~Arne~Lorenz.~All~rights~rese rved.GF$C.-%'printfG6#QioSwitched~on~old~procedures.~To~use~new~(standard)~proc edures,~please~restart.|+F$>%,jets/genvecG%0jets/genvec.oldG>%.jets/totalderG%2 jets/totalder.oldG>%-jets/proljetG%1jets/proljet.oldG>%+jets/prolvG%/jets/prolv .oldG>%-jets/prolvecG%1jets/prolvec.oldG>%-jets/sortconG%1jets/sortcon.oldG>%+j ets/jsubsG%/jets/jsubs.oldG>%,jets/natinfG%0jets/natinf.oldG>%-jets/natinfGG%1j ets/natinfG.oldG@$32""!9#-%%typeG6$&9"6#!""%'stringGC+-F)6#Q5genvec.old~is~used .|+F$-F)6#Q\ptotalder.old~is~used.~To~avoid~infinite~loops,~also~switch~on~`jet s/proljet.old`|+F$-F)6#Q\pproljet.old~is~used.~To~avoid~infinite~loops,~also~sw itch~on~`jets/totalder.old`|+F$-F)6#Q4prolv.old~is~used.|+F$-F)6#Q6prolvec.old~ is~used.|+F$-F)6#Q6sortcon.old~is~used.|+F$-F)6#Q4jsubs.old~is~used.|+F$-F)6#Q5 natinf.old~is~used.|+F$-F)6#Q6natinfG.old~is~used.|+F$O%%NULLGF$6+F0F3F6F9F<F-F ?FBFEF$F$, Q.jets/setOld.mF$ M7R0 I,jets/submatf*6%'%%mat1G%'matrixG'%%mat2GF'%%ivarG6'%"AG%#rmG%#cmG%"iG%"jG6#%[ oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8%-%#opG 6$7$"""""#7#-F86$F<-%%evalG6#9$>8&-F86$7$F<F<F=@$50-F86$F:7#-F86$F<-FA6#9%F60-F 86$FHFNFE-%&ERRORG6#%LThe~matrices~must~have~the~same~dimensions!G>8$-F'6$F6FE@ %2""$9#?(8'F;F;F6%%trueG?(8(F;F;FEF_o>&Ffn6$F^oFao-%,jets/subconG6&&FCFdo&FSFdo 9&&9"6#""%?(F^oF;F;F6F_o?(FaoF;F;FEF_o>Fco-Ffo6%FhoFioFjo-%%copyG6#FfnF3F3F3F3, Q.jets/submat.mF3 M7R0 I-jets/vforderf*6&%"aG%"bG%%ivarG%%dvarG6%%"iG%"pG%"qG6#%inCopyright~(C)~2000-2 002~by~Gehrt~Hartjen.~All~rights~reserved.G6"@+2-%%nopsG6#-%#opG6#&9$6#""#-F36# -F66#&9%F:-%'RETURNG6#%%trueG2F<F2-FC6#%&falseG-%%typeG6$F5%'symbolG@%4-FK6$F>F MFBC%-%'memberG6%F57$-F66#9&-F66#9'.8%-FT6%F>FV.8&@%1FhnF\oFBFGFPFGC&-FT6%-F66$ ""!F5FfnFgn-FT6%-F66$FdoF>FfnF[o@'2FhnF\oFB2F\oFhnFG?(8$"""F^pF2FEC&-FT6%-F66$F ]pF5FYFgn-FT6%-F66$F]pF>FYF[o@$FjoFB@$F[pFGFBF/F/F/F/, Q/jets/vforder.mF/ M7R0 I/jets/xieta2vecf*6&%$lxiG%%letaG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~b y~Mohamed~Barakat.~All~rights~reserved.GF)@'/9#""#-%*jets/vzipG6%9$9%Q!F)/F.""$ -F16%F37$-%#opG6#F4-F<6#9&F5-F16%7$-F<6#F3F;7$F>-F<6#9'F5F)F)F)F), Q1jets/xieta2vec.mF) M7R0 I.jets/AdjointFf*6$%%_matG%&_ivarG6.%$matG%%ivarG%%dvarG%"iG%"jG%"AG%#rmG%#cmG% "LG%"kG%"lG%"KG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserv ed.G6"C&@$5/9$""!/F;7"-%'RETURNG6#F<>8%-%,jets/mklistG6#9%@%2""#9#>8&-FE6#&9"6# ""$>FMF>@%-%,jets/chkdopG6#F;-%.jets/gcollectG6$-%$mapG6$f*6#F1F66$%)operatorG% &arrowGF6-%#opG6#-Fgn6$f*6#F2F6F[oF67$*&)!""-%%nopsG6#&T$6#FJ"""&F;6#F_pF_p&F;F ^pF6F66$F1F;-%+jets/opdotG6&FbpF`pT#T%F6F66&F)FCF*FMF;FCC(>8$-%+jets/mkmatGFX>8 *-F_o6$7$F_pFJ7#-F_o6$FJ-%%evalG6#F\q>8+-F_o6$7$FJFJFdq>8)-%'matrixG6$F[rF`q?(8 'F_pF_pF`q%%trueG?(8(F_pF_pF[rFfr@%/&F\q6$FerFhrF<>&F`r6$FhrFerF<>F^s-FZ6$-Fgn6 $f*FjnF6F[oF6-F_o6#-Fgn6$f*FdoF6F[oF6FeoF6F6FcpFdpF6F6FipF[sFC-%%copyG6#F`rF6F6 F6F6, Q0jets/AdjointF.mF6 M7R0 I/jets/GOrdEulerf*6%%%exprG%%ivarG%%dvarG6(%%heulG%$eulG%#ddG%%jcorG%#jjG%%pvar G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&@$-% %typeG6$9$%%listG-%&ERRORG6#%Jwe~do~not~expect~a~list~as~first~argumentG>8$%%NU LLG?&8&9&%%trueGC)@$3-%)assignedG6#&%*infolevelG6#%&EulerG2""!FJ-%&printG6#/%>G OrdEuler:~dependent~variableGFA>8%7$-%-jets/partderG6&F7FA9%FB7">8'-%-jets/geti ndsG6$F77#FA@$FF-FQ6#/%CGOrdEuler:~list~of~jet~coordinatesGFhn?&8(FhnFCC%@$FF-F Q6#/%:GOrdEuler:~jet~coordinateGFco@%/9#""$>8)7#-%#opG6#Fco>F_p-%'removeG6%%$ha sGF`p&9"6#""%>FV6$FV-Fbp6#-%+jets/opdotG6&F_p*&)!""-%%nopsG6#F_p"""-FY6&F7FcoFe nFBFjqFenFB@$FF-FQ6#/%5GOrdEuler:~done~withGFhn>F>6$F>-%.jets/gcollectG6$7#FVFe n7#F>F1F1F1F1, Q1jets/GOrdEuler.mF1 M7R0 I.jets/Qinversef*6$%"QG%%dvarG6*%&_ivarG%&_dvarG%#_QG%#QIG%#clG%"iG%"pG%#QPG6#% inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C'@%2""#9#C$ >8$9%>8%&9"6#""$C$>F:7">F=F;>8&-%,jets/mklistG6#9$>8'-%%subsG6$-%$mapG6$f*6#%"x GF26$%)operatorG%&arrowGF2/-%$catG6$FK%"_GFKF2F2F2F=-FR6$f*6#%"aGF2FWF2-%$rhsGF JF2F2F2-%.jets/srtbylstG6$-FI6#-%&solveG6$-FR6$f*6#%"bGF2FWF2/-Ffn6$&T%FJFhn&T# FJF2F26&F*FGF)F=<#-%"$G6#;"""-%%nopsG6#F=<#-%#opGF]qF=>8(-%+jets/QsubsG6&FMFGF: F=@%/FbqF=-%'RETURNG6#FMC$-%&printG6#/.FMFM-%&ERRORG6#%foThere's~something~wron g~with~my~inverse~-~please~try~another~path~function!GF2F2F2F2, Q0jets/Qinverse.mF2 M7R0 I,jets/cchfncf*6&'%$trnG%%listG%%funcG%%ivarG%%dvarG6%%%lvarG%%nvarG%%trnsG6#%[ oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$7$-%#o pG6#9&-F76#9'>8%-%$mapG6$%$lhsG9$>8&-F@6$%$rhsGFC-%,jets/appitrG6%FE-%%subsG6$- %*jets/ezipG6$F>F49%&9"6#;""$!""F1F1F1F1, Q.jets/cchfnc.mF1 M7R0 I.jets/colterm2f*6%%(indlistG%(deplistG%(add_facG6#%(ele_numG6#%>Copyright~(c)~ 1997~by~Khai~VuG6"@'/-%%nopsG6#9$""!7$7#&9&6#"""7#&F76#""#-%'memberG6%F;9%.8$7$ -%'subsopG6$/FC,&&F26#FCF9F6F9F2FA7$7$-%#opGF1F67$-FO6#FAF;F,F,F,F,, Q0jets/colterm2.mF, M7R0 I*jets/com2f*6%%%vec1G%%vec2G%%ivarG6$%%dvarG%$outG6#%[oCopyright~(C)~2000-2002 ~by~Mohamed~Barakat.~All~rights~reserved.G6"C%@%2""$9#>8$&9"6#""%>F4%%NULLG>8%- %,jets/comtabG6%7$9$9%9&F4@'3/-%%nopsG6#F<""#/&&F<6#"""6$FOFJ&%&gammaGFN-%#opG6 $FJ&F<6$FJFOFFFL&F<FPF-F-F-F-, Q,jets/com2.mF- M7R0 I4jets/copyright_jetsf*6"F$6#%jpCopyright~(C)~2000-2010~by~Mohamed~Barakat,~Geh rt~Hartjen~and~Arne~Lorenz.~All~rights~reserved.GF$C)-%&printG6#%5jets~(2000-20 10)~(C)G-F)6#%goCopyright~(C)~(2000-2010)~by~Mohamed~Barakat,~Gehrt~Hartjen~and ~Arne~Lorenz.G-F)6#%5All~rights~reserved.G-F)6#%YThis~software~should~be~refere nced~if~it~is~used~in~workG-F)6#%>eventuating~in~a~publication.G-F)6#%GUsers~ar e~free~to~modify~this~program,G-F)6#%Tbut~it~is~not~to~be~redistributed~in~modi fied~form.GF$F$F$F$, Q6jets/copyright_jets.mF$ M7R0 I,jets/eqnredf*6'%%exprG'%&crdchG%%listG%$varG%%ivarG%%dvarG6(%&_ivarG%&_dvarG% "nG%"mG%&nivarG%&ndvarG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rig hts~reserved.G6"C+>8$-%,jets/mklistG6#9'>8%-F:6#9(>8&-%%nopsG6#F8>8'-FE6#F>>8(- %$mapG6$%$lhsG&9%6#;"""FC>8)-FN6$FP&FR6#;,&FCFUFUFU,&FCFUFHFU@&4-%%typeG6$9&%'s ymbolG-%&ERRORG6$F^o%4should~be~a~symbol!G4-%'memberG6$F^oFL-Fao6%F^o%Zis~not~c ontained~in~the~list~of~new~independent~variablesGFL6$-FN6$f*6#%"aGF56$%)operat orG%&arrowGF5/&9$6#T$""!F5F56$F)F^oFW-%,jets/ichjetG6&FRFfpF8F>-%+jets/jsubsG6% %"%GFLFWF5F5F5F5, Q.jets/eqnred.mF5 M7R0 I*jets/flatf*6%%%RsecG%&_ivarG%&_dvarG6*%%ivarG%%dvarG%%DvarG%"qG%%jvarG%%JvarG %$vecG%%pvecG6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.G6 "C.@$5/9$""!/F87"-%'RETURNG6#F9>8$-%,jets/mklistG6#9%>8%-FB6#9&>8&-%$mapG6$f*6# %"aGF36$%)operatorG%&arrowGF3-%$catG6$.%#_DGF8F3F3F3F@@%32""$9#-%%typeG6$&9"6#" "%%*nonnegintG>8'F\oC$-FM6$f*FPF3FRF3&F86$""#"""F3F3F3F8>Fbo-%-jets/getiordG6$% "%GFF>8(-%+jets/hjetsG6%FboF@FF>8)-Fcp6%FboF@FK>8*-%/jets/char2evolG6$-FK6#-%#o pG6#F@F@-%-jets/prolvecG6&FjpFboF@FF>8+-%-jets/eqn2indG6%F_pF@FK6$-%*jets/ezipG 6$Ffp-FM6$f*FPF3FRF3&F86#FjoF3F3F3-%-jets/sortconG6$F8Fap-F]r6$FK-FM6$f*FPF3FRF 3FbrF3F3F3-Fer6$F8F@-%%subsG6$F_pFgqF3F3F3F3, Q,jets/flat.mF3 M7R0 I.jets/frechetvf*6%%$_VFG%&_ivarG%&_dvarG6(%#VFG%%ivarG%%dvarG%"lG%#SSG%%DvarG6 #%fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserved.G6"C,>8%-%,jets/ mklistG6#9%>8&-F66#9&@+-%,jets/chkdopG6#9$>8$-%+jets/mkmatG6#7#7#FB33-%%typeG6$ FB%%listG2""!-%%nopsGFA-F@6#&FB6#""">FD-FF6#FI33-FM6$FB%)listlistG2FQ-FSFU-F@6# &FB6$FXFX>FD-FFFA-FM6$FB%'matrixG>FDFB-%&ERRORG6#%YCould~not~recognize~the~type ~of~the~input~vertical~form!G>8'-&%'linalgG6#%'rowdimG6#FD@'2""$9#>8(-F66#&9"6# ""%/F\pFX>Fhp7#%"SG>Fhp-%$mapG6$f*6#%"aGF16$%)operatorG%&arrowGF1-%$catG6$FbqFB F1F1F17#-%"$G6#;FXF\p>8)-Feq6$%#opG7$F:Fhp-%.jets/AdjointFG6%FDF4F:-%.jets/frec hetmG6'%"%GFhpF4F:Fhp-%+jets/asadjG6&FasF4FfrQ!F1@%3F?/-FS6#F:FX&FasF`oFasF1F1F 1F1, Q0jets/frechetv.mF1 M7R0 I.jets/funcnamef*6#%%funcG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~Al l~rights~reserved.GF&@%-%%typeG6$9$%)functionG-%#opG6$""!F-F-F&F&F&F&, Q0jets/funcname.mF& M7R0 I1jets/getSolveVarf*6%%%_InvG%%ivarG%%dvarG61%$InvG%%nInvG%(lstIndsG%+lstSolInd sG%*lstSolvedG%+lstSolved2G%+lstSepIndsG%'lstDegG%"iG%"jG%'maxDegG%$DegG%)lstDI ndsG%*lstIndetsG%'lstMaxG6#%gnCopyright~(C)~2005-2007~by~Arne~Lorenz.~All~right s~reserved.G6"C->8$-%$mapG6$f*6#%"aGF:6$%)operatorG%&arrowGF:@%-%%typeG6$9$%"=G -%$rhsG6#FKFKF:F:F:FK>8%-%%nopsG6#F=>8&-F?6$f*FBF:FDF:-%(getindsG6%FKT$Q!F:F:F: 6$F'9&F=@%2""!-%-jets/getiordG6%FVFjnFhnC%>FV-F?6'%.jets/sortjetsGFV9%FjnFhn>8. -F_o6$FVFjn>FV-F?6$f*FBF:FDF:-F?6$f*6#%"bGF:FDF:@$/-%,jets/jorderG6$FKT&T#FKF:F :6&F3FjpF'FipFKF:F:6&F3FhoF'FjnFV>FhoF]o>8'7">8(F`q>8)%%NULLG?(F:"""FgqF:30FbqF dq2-FS6#FbqFQC%>FdqFbq>8*-F?6$f*6#F1F:FDF:@%/-%'memberG6$FKFjp%&falseG-F?6$f*FB F:FDF:@$3/-Fhr6$FK-F?6$%#opG-%'subsopG6$/FgnFeqT%Fjr/-Fhr6$FKT'FjrFKF:F:6(F1FKF +FjsF,F^t&FjsFOF`qF:F:6(F-FbqF+FVF,F_q7#-%"$G6#;FgqFQ?(8,FgqFgqFR%%trueG@$30&F` r6#FhtF`q/-Fhr6$FhtFbqFjrC$>8+-F?6$f*FBF:FDF:-%'degreeG6$&Fjp6#FjsFKF:F:6&F)F=F 1FhtF]u@$/-Fhr6%FgqFdu.%$posGFitC%>F_q7$-Fes6#F_q&F`r6$FhtFcv>Fbq7$-FesF\rFht>F V-Fgs6$/FhtF`qFV@$FjqC,>FV-F?6$f*FBF:FDF:-F?6$f*FbpF:FDF:@$FfrFKF:F:6$F,FjpFKF: F:6$F,F_qFV>F=-F?6$f*FdrF:FDF:@$0&FjpFOF`qF`tF:F:6&F+FVF)F=Fbt>FQFR>FV-F?6$f*FB F:FDF:@$0FKF`qFKF:F:F:FV>Fdu-F?6$f*FdrF:FDF:-F?6$f*FBF:FDF:-Fiu6$&Fjp6#FipFKF:F :6&F)FjsF1FKFdxF:F:FexFbt>Fho-%$maxG6$Fgq-Fes6#-F?6$f*FBF:FDF:-Fes6#-F?6$f*FbpF :FDF:@$0FK%%FAILGFKF:F:F:FKF:F:F:Fdu>Fdu-F?6$f*FBF:FDF:-F?6$f*FbpF:FDF:@%5/FKFi z2FKF]o,&FjpFgqFgqFgqFKF:F:6$F3FjpFKF:F:6$F3FhoFdu>Fho-F[z6#-Fes6#-F?6$FesFdu>8 /Fgq?(F:FgqFgqF:31F`\lFho2-FSFhv-FSFOC&>80-F?6$f*FdrF:FDF:-F?6$f*6#F2F:FDF:@$1& Fjp6$FipFKF^t&T)Fd]lF:F:6*F0FjpF1FKF4FjsF+F^t7#-Fdt6#;Fgq-FS6#FdxF:F:6(F0FduF4F `\lF+FVFbt>81-%'indetsG6#Fi\l@$1FQ-FS6#F`^lC%>F`^lF`q>82-F?6$FSFi\l?(FhtFgqFgq- FSFc^lFit@$/Ff^l,&FhtFgq!""FgqC$>8-Fgq?(F:FgqFgqF:31Ff_l&F[_lF^u2Ff^lFht@%/-Fhr 6$&Fi\l6$FhtFf_lF`^lFjr>F`^l7$-FesFg^lF``l>Ff_l,&Ff_lFgqFgqFgq@%/Ff^lFQ>F_q7$Fg vFd`l>F`\l,&F`\lFgqFgqFgq@$Fd\lYQ^oNo~combination~of~variables~found~to~build~a ~list~of~vars~to~solve!F:F_qF:F:F:F:, Q3jets/getSolveVar.mF: M7R0 I.jets/ijacobiff*6"6*%#arG%%itrlG%%dtrlG%%ivarG%%dvarG%#jdG%#jfG%$ijfG6#%[oCopy right~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C*>8$-%,jets/inp cchG6$9"Q!F$>8%&F26#""">8&&F26#""#>8'&F26#""%>8(&F26#""&>8)-%/jets/jacobidetG6% F9FCFH>8*-%-jets/jacobifG6&F9F>FCFH>8+-%-jets/scl2mopG6#-%&evalmG6#*&FMF<-%+jet s/jsimpG6%-%-jets/mop2sclG6#FRFHf*6#%"aGF$F$F$-%)simplifyG6#-&%'linalgG6#%(inve rseG6#9$F$F$F$F<F$F$F$F$, Q0jets/ijacobif.mF$ M7R0 I-jets/ind2revf*6#%$varG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~ rights~reserved.GF&@'3-%%typeG6$9$%(indexedG-F,6$-%#opG6$""!F.%'symbolG-%$catG6 %-F36#F.%"_GF2-F,6$F.F6-F86$F<F.-%&ERRORG6$%.cannot~handleGF.F&F&F&F&, Q/jets/ind2rev.mF& M7R0 I,jets/jcoefff*6%%%exprG%"pG%%lvarG6%%"cG%#_tG%"iG6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$7#-%'coeffsG6%-%(collectG6%9$9& %,distributedGF:.8%>F=7#F=?(8&"""FB-%%nopsG6#F=%%trueG@$/&F=6#FA9%-%'RETURNG6#- %)simplifyG6#&F1FJ""!F.F.F.F., Q.jets/jcoeff.mF. M7R0 I*jets/jfacf*6$%%exprG%$refG6$%"cG%"rG6#%[oCopyright~(C)~2000-2002~by~Mohamed~B arakat.~All~rights~reserved.G6"C&@%45-%%typeG6$9%%)functionG-F26$F4%(indexedG-% (convertG6$-%'expandG6#F4%%listG-%,jets/mklistGF>-%-jets/jcoeffsG6%9$%"%G8%>8$- %+jets/mksetG6#FF@'3/-%%nopsG6#FG"""/-%#opGFRF4%%trueG33/-FQ6#FIFS0-FVFfn""!/-% )simplifyG6#*&FEFSFhn!""F4FW%&falseGF,F,F,F,, Q,jets/jfac.mF, M7R0 I,jets/jorderf*6$%$jetG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat .~All~rights~reserved.GF'@)-%'memberG6$9$9%""!-%%typeG6$F.%(indexedG-%%nopsG6#F .-F26$F.%'symbolG!""-%&ERRORG6$%Bcannot~determine~the~jet~order~ofGF.F'F'F'F', Q.jets/jorder.mF' M7R0 I-jets/jsymbolf*6%%%leqnG%%ivarG%&_dvarG6'%%dvarG%%DvarG%$smbG%$indG%$ordG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*>8$-%,jets /mklistG6#9&@%2""$9#C$>8%-F56#&9"6#""%@$0-%%nopsG6#F>-FH6#F3-%&ERRORG6#%[pThe~n umber~of~linearising~coordinates~must~coincide~with~that~of~dependent~ones!G>F> -%$mapG6$%-jets/ind2revGF3>8&-%*jets/jlinG6&-F56#9$9%F3F>>FV-FR6$f*6#%"aGF06$%) operatorG%&arrowGF0-%+jets/jsimpG6%Ffn7$-%#opG6#T#-Ffo6#T%%'expandGF0F06&F)F3F* F>FV>FV-FR6$f*F\oF0F^oF0@%-%%typeG6$Ffn%"+G-%(convertG6$Ffn%%listG7#FfnF0F0F0FV >8(-%-jets/getiordG6$FVF>-FR6$f*F\oF0F^oF0-Fhp6$-FR6$f*6#%"bGF0F^oF0@%/-F_q6$Ff nF[pFhoFfn""!F0F06&F-FhoF*F[pFfnFfpF0F06&F-F]qF*F>FV@%-FdpFip%"%G-Ffo6#FdrF0F0F 0F0, Q/jets/jsymbol.mF0 M7R0 I-jets/map2conf*6$%$vecG%%lvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.GF'-%-jets/smb2indG6$-%/jets/conDif2opG6#9$9%F'F'F'F', Q/jets/map2con.mF' M7R0 I.jets/multinomf*6%%#IIG%#JJG%%ivarG6$%"iG%#reG6#%inCopyright~(C)~2000-2002~by~ Gehrt~Hartjen.~All~rights~reserved.G6"@%/9$9%"""C$>8%-%,jets/remainG6$F0F1@%/F5 7"""!*&-%$mulG6$-%*factorialG6#8$/FD7#-%.jets/ind2multG6$F09&F2-F?6$FA/FD7$-FH6 $F1FJ-FH6$F5FJ!""F-F-F-F-, Q0jets/multinom.mF- M7R0 I,jets/nsbraFf*6&%#_HG%#_KG%&_ivarG%&_dvarG6+%"HG%"KG%%ivarG%%dvarG%#_PG%#_QG%# _RG%%operG%%pathG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~re served.G6"C,>8&-%,jets/mklistG6#9&>8'-F:6#9'@%-%,jets/chkdopG6#9$>8$7#7#FF>FHFF @%-FD6#9%>8%7#7#FO>FQFO>8(-%$mapG6$f*6#%"aGF56$%)operatorG%&arrowGF5-%$catG6$.T #FFF5F56$F.FVF>>8)-FX6$f*FenF5FgnF5FjnF5F56$F/FaoF>>8*-FX6$f*FenF5FgnF5FjnF5F56 $F0FgoF>@'32""%9#-%%typeG6$&9"6#""&%'stringG>8+f*FenF5FgnF5FFF5F5F53F^p/Fdp""!> Fjp%)OrdEulerG>Fjp%(intnormG@%32FgpF`p/FjpFbq>8,&Fep6#""'>Fhq%%NULLG-Fjp6&-%+je ts/jsimpG6$-%(convertG6$-FX6$f*6#%"AGF5FgnF5-Fdr6$-FX6$f*6#%"BGF5FgnF5-%+jets/d prodG6$&T$6#""$--%,jets/diffopG6%-%.jets/frechetmG6'&FF6#"""&FfsFatT%T'FctFdt7$ -%#opG6#Fet-Fht6#&Ffs6#""#6#--F[t6%&FFF]uFdtFftF[uF5F56(FjrFFF,FetF-T)7$7$F^oFd t7$FdtF^o%"+GF5F56*F*FHF+FQF,F8F-F>7%7%FVFaoFgo7%FgoFVFao7%FaoFgoFVFiuF>F87&-Fh t6#F>-Fht6#FV-Fht6#Fao-Fht6#FgoFhqF5F5F5F5, Q.jets/nsbraF.mF5 M7R0 I,jets/oderedf*6'%&_exprG'%&crdchG%%listG%$varG%&_ivarG%&_dvarG6*%%exprG%%ivarG %%dvarG%"nG%"mG%&nivarG%&ndvarG%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Ba rakat.~All~rights~reserved.G6"C,@%-%%typeG6$9$<$F(%$setG@%/-%%nopsG6#F=""">8$&F =6#FE-%&ERRORG6$%GThis~list~must~contain~one~expression:GF=>FGF=>8%-%,jets/mkli stG6#9'>8&-FR6#9(>8'-FC6#FP>8(-FC6#FV>8)-%$mapG6$%$lhsG&9%6#;FEFen>8*-F_o6$Fao& Fco6#;,&FenFEFEFE,&FenFEFinFE@&4-F;6$9&%'symbolG-FK6$Fcp%4should~be~a~symbol!G4 -%'memberG6$Fcp7$-%#opG6#F]o-F^q6#Fgo-FK6%Fcp%Nis~not~contained~in~the~list~of~ new~variablesGF\q-%,jets/ichjetG6&FcoFGFPFV@%-%)assignedG6#&%(studentG6#%(isola teG-%+jets/jsimpG6$-F\r6$%"%G&Fcp6#-%"$G6$&F]oFI-%-jets/getiordG6$FerFgoFgo-Far 6$-F_rFdrFgoF7F7F7F7, Q.jets/odered.mF7 M7R0 I-jets/prolvecf*6&%$vecG'%$numG%(integerG%%ivarG%%dvarG6"6#%[pCopyright~(C)~200 0-2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.GF+@%32""%9#-%%t ypeG6$&9"6#""&%%listG-%+jets/prolvG6'9$-%+jets/hjetsG6%9%9&9'FCFDF6-F<6&F>F?FCF DF+F+F+F+, Q/jets/prolvec.mF+ M7R0 I,jets/remainf*6$%#IIG%#JJG6%%"iG%#KKG%#poG6%%inCopyright~(C)~2000-2002~by~Gehr t~Hartjen.~All~rights~reserved.G%'systemG%)rememberG6"C%>8%9$?&8$9%%%trueG@%-%' memberG6%F5F2.8&>F2-%'subsopG6$/F=%%NULLGF2-%'RETURNG6#7"F2F/F/F/F/, Q.jets/remain.mF/ M7R0 I/jets/riemannK2f*6$%#ggG%%dvarG6+%"mG%"RG%#ZMG%%rieKG%$facG%"aG%"bG%"cG%"dG6#% [oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)>8$-&%'l inalgG6#%'coldimG6#9$@%2""#9#>8%9%>FC-%-jets/scalarcG6$F=FD@%2F6""$>8(#!""F@>FM *&,&F6"""FOFSFO,&F6FS!"#FSFO>8&-%'matrixG6%F6F6""!>8'7#-%$seqG6$7#-Fjn6$-%%copy G6#FW/8);FSF6/8*Fdo?(8+FSFSF6%%trueG?(8,FSFS,&FhoFSFOFSFio?(FcoFSFSF6Fio?(FfoFS FS,&FcoFSFOFSFioC&>&&Fgn6$FcoFfo6$FhoF[p-%)simplifyG6#*(FMFSFCFS,&*&&F=6$FcoF[p FS&F=6$FhoFfoFSFS*&&F=6$FfoF[pFS&F=6$FhoFcoFSFOFS>&Fcp6$F[pFho,$FbpFO>&&Fgn6$Ff oFcoFepFhq>&F[rFgqFbp-%+jets/mkmatG6#FgnF3F3F3F3, Q1jets/riemannK2.mF3 M7R0 I-jets/scalarcf*6$%#ggG%%dvarG6$%$ricG%%ric2G6#%[oCopyright~(C)~2000-2002~by~Mo hamed~Barakat.~All~rights~reserved.G6"C$@'/9#""">8$9$2""#F0C$>8%9%>F3-%&evalmG6 #-%#&*G6$-&%'linalgG6#%(inverseG6#F4F9>F3-%+jets/ricciG6$F4F:-%)simplifyG6#-&FD 6#%&traceG6#F3F,F,F,F,, Q/jets/scalarc.mF, M7R0 I.jets/sortivarf*6%%%exprG%%ivarG%%dvarG6$%(lstJetsG%(lstSubsG6#%XCopyright~(C) ~2005~by~Arne~Lorenz.~All~rights~reserved.G6"C%>8$-%-jets/getindsG6$9$9&>8%-%$m apG6$f*6#%"aGF-6$%)operatorG%&arrowGF-@$30F4&-%#opG6$""!F46#-%-jets/sortvarG6$7 #-FF6#F4T$/-%%nopsGFO-FS6#7#FJ/F4FDF-F-6$F&9%F0@%0F77"-%%subsG6$F7F4F4F-F-F-F-, Q0jets/sortivar.mF- M7R0 I-jets/sublistf*6$%"aG%"bG6%%#bbG%"iG%#poG6#%inCopyright~(C)~2000-2002~by~Gehrt ~Hartjen.~All~rights~reserved.G6"C$>8$9%@'2-%%nopsG6#F1-F56#9$-%'RETURNG6#%&fal seG/F9F1-F;6#%%trueGC$?&8%F9FA@%-%'memberG6%FDF0.8&>F0-%'subsopG6$/FJ%%NULLGF0F :F?F-F-F-F-, Q/jets/sublist.mF- M7R0 I+jets/symchf*6$%$numG%%ivarG6"6%%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat. ~All~rights~reserved.G%'systemG%)rememberGF'C$-%$mapG6$f*6#%"aGF'6$%)operatorG% &arrowGF'7#-%-jets/sortvarG6$9$T$F'F'6$F&9%-&%)combinatG6#%'chooseG6$-F.6$f*6#% "cGF'F3F'-%"$GF9F'F'6$F%F:F=F:-%#opG6#-F.6$f*6#%"bGF'F3F'&F:6#""#F'F'F'-%.jets/ gcollectG6$-F.6$f*F1F'F3F'7$"""F:F'F'F'%"%GF=F'F'F'F', Q-jets/symch.mF' M7R0 I2jets/totalder.oldf*6&%%funcG%&livarG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2 002~by~Mohamed~Barakat.~All~rights~reserved.GF)@'/9%7"9$5/9#""$32F4F3/9'F/-%-je ts/partderG6#9"&-%-jets/proljetG6&7#7$F07#&F86#"""7#&FD6#-%-jets/sortvarG6$F.9& FMF86$FFFFF)F)F)F), Q4jets/totalder.old.mF) M7R0 I,jets/vertpbf*6&%$_RRG%&_ivarG%&_dvarG%&_svarG6(%#RRG%%ivarG%%dvarG%%svarG%%Dv arG%&_DvarG6#%[oCopyright~(C)~2004-2005~by~Mohamed~Barakat.~All~rights~reserved .G6"C*>8$-%,jets/mklistG6#9$>8%-F76#9%>8&-F76#9&>8'-F76#9'@%32""%9#4-%%typeG6$& 9"6#""&%'stringGC$>8(-F76#FR@$0-%%nopsG6#FY-Fin6#F@-%&ERRORG6#%[pThe~number~of~ linearising~coordinates~must~coincide~with~that~of~dependent~ones!G>FY-%$mapG6$ %-jets/ind2revGF@>8)Fbo-%*jets/jlinG6&F5F;F@Fgo@%-FP6$&FS6#!""FVC$-%+jets/jsubs G6'-%*jets/ezipG6$F@FE%"%GF;F@FE-%%subsG6$-Ffp6$FgoFYFhpC$-Fcp6&FepFhpF;F@FipF2 F2F2F2, Q.jets/vertpb.mF2 M7R0 I0jets/xieta2charf*6&%$lxiG%%letaG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.GF)-%%subsG6%-%*jets/ezipG6$-%$mapG6$f* 6#%"aGF)6$%)operatorG%&arrowGF)&%#xiG6#9$F)F)F)9&F>-F06$-F36$f*F6F)F8F)&%$etaGF =F)F)F)9'9%-%-jets/charactG6$F?FGF)F)F)F), Q2jets/xieta2char.mF) M7R0 I0jets/JacobiCondf*6&%%_VesG%&_ivarG%&_dvarG%&_lvarG6*%$VesG%%ivarG%%dvarG%$teq G%%lvarG%%SUBSG%&jCondG%&ncolsG6#%XCopyright~(C)~2006~by~Arne~Lorenz.~All~right s~reserved.G6"C0>8$-%,jets/mklistG6#9$>8%-F96#9%>8&-F96#9&>8'-%+jets/mksetG6#-% $mapG6$f*6#%"aGF46$%)operatorG%&arrowGF4-%%typeG6$F;%"=GF4F4F4F7@'/FG<#%%trueGC %>8(-%;jets/get_vars_to_eliminateG6%-FL6$%$lhsGF7F=FB>8)&-%-jets/nrsolveG6$F7Fh n6#""">F7-FL6$f*FOF4FQF4,&-F^oF:Ffo-%$rhsGF:!""F4F4F4F7332""$9#0&9"6#""%7"4-FU6 $Ffp%'stringG>F`o&-Fco6$F79'FeoC$>Fhn-Fjn6%F7F=FB>F`oFao>8*-FL6$f*FOF4FQF4-%#op G6#-%.jets/totalderG6&T#F;T%T'F4F46(F*F7F+F=F,FBF=>Fjq-FL6&%(collectGFjq-%-jets /jetcoorG6%""#F=FB%,distributedG>Fjq-%/jets/linmatrixG6$FjqF\s>Fjq-%(convertG6$ -&%'linalgG6#%*gausselimG6#Fjq%)listlistG>8+,&-%%nopsG6#&FjqFeoFfoF_pFfo>Fjq-FL 6$f*FOF4FQF4@$/&F;6#;FfoFdr7#-%"$G6$""!Fdr&F;6#F_pF4F46$F1FatFjq>Fjq-%)simplify G6#-%%subsG6$F`oFjq@$3Fbp-FU6$&FgpFfuF^qC$>Fjq-FL6$%'factorGFjq>Fjq-FL6$f*FOF4F QF4@%-%$hasG6$F;Fdr@%-FU6$F;%"*G-%'removeG6%F_wF;FdrY6$QAUnable~to~remove~depen dency~on~:F4FdrF;F4F46$F,FBFjqOFjqF4F4F4F4, Q2jets/JacobiCond.mF4 M7R0 I+jets/adrepf*6#%&cmtabG6)%$numG%#ADG%"ZG%#ZMG%#iiG%#jjG%#kkG6#%[oCopyright~(C) ~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)@$-%)assignedG6#%$psiGC %-%&printG6$/.F6F6%:~is~redefined~to~'psi'!!!G-F96#%!G>F6F<>8$-&%'linalgG6#%'co ldimG6#9$@$0FC-&FF6#%'rowdimGFI-%&ERRORG6#%NThe~commutator~table~must~be~a~squa re~matrix!G>8'-%'matrixG6%FCFC""!>8%7#-%$seqG6$-%%copyG6#FV/8(;"""FC?(F_oFaoFao FC%%trueG?(8)FaoFaoFCFco?(8*FaoFaoFCFco>&&Ffn6#F_o6$FgoFeo-%&coeffG6$&FJ6$F_oFe o&F66#Fgo-F\o6#FfnF0F5F0F0, Q-jets/adrep.mF0 M7R0 I.jets/bascoefff*6$%$_coG%%_basG6(%#coG%$basG%#cbG%#rbG%#nrG%#GMG6#%joCopyright ~(C)~2000-2002~by~Gehrt~Hartjen,~Mohamed~Barakat.~All~rights~reserved.G6"C+>8$- %+jets/mkmatG6#9$>8%-F56#9%>8&-&%'linalgG6#%'coldimG6#F9>8'-&FA6#%'rowdimGFD@$0 -F@6#F3F>-%&ERRORG6#%PThe~lengths~of~coordinate~vectors~do~not~match!G>8(,&-FHF N"""FFFW>8)-&FA6#%*gausselimG6$-&FA6#%(augmentG6$-&FA6#%,stackmatrixG6$F9F3-%&a rrayG6%;FWFTFfo%)identityGF>-%(convertG6$-%&evalmG6#,$-%#&*G6$-&FA6#%(inverseG6 #-&FA6#%*submatrixG6%FY;,&FFFWFWFWFT;,(F>FWFFFWFWFW,&F>FWFTFW-Fhp6%FYF\q;,&F>FW FWFW,&F>FWFFFW!""%)listlistG@%34-%%typeG6$F7Fgq-F\r6$F7%%listG-%#opG6#%"%GFdrF0 F0F0F0, Q0jets/bascoeff.mF0 M7R0 I,jets/cchcnjf*6%%&_trn1G%&_trn2G%&_ivarG6)%%ivarG%%dvarG%%trn1G%%trn2G%%itr2G% &ivar2G%&dvar2G6#%fnCopyright~(C)~2005~by~Mohamed~Barakat.~All~rights~reserved. G6"C*>8$-%,jets/mklistG6#9&@%2""$9#>8%-F76#&9"6#""%>F?7">8&-F76#9$>8'-F76#9%>8( -%,jets/cchinvG6%FNF5F?>8)-%$mapG6$%$lhsG&FN6#;"""-%%nopsG6#F5>8*-FZ6$Ffn&FN6#; ,&F[oFjnFjnFjn!""-%+jets/jsimpG6$-%,jets/cchcmpG6&FS-F[p6&FIFNF5F?FXF_oF?F2F2F2 F2, Q.jets/cchcnj.mF2 M7R0 I.jets/cchdop20f*6"64%#arG%%itrlG%%dtrlG%$dopG%%ivarG%%dvarG%&oivarG%&odvarG%$t rnG%$cntG%%ndopG%&ijacfG%%jacfG%#jdG%&jacfiG%(Ind2EqnG%'ijacfaG%'ajacfiG6#%fnCo pyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserved.GF$C.@%32""%9#-%%typeG 6$&9"6#!""%'stringG>8$-%,jets/inpcchG6#&FD6#;"""!"#>FI-FK6#FD>8%&FI6#FP>8&&FI6# ""#>8'&FI6#""$>8(&FI6#F>>8)&FI6#""&>8*-%$mapG6$%$lhsGFV>8+-Fio6$F[pFZ>8,-Fio6$% #opG7$FVFZ@%34F<-%,jets/chkcntG6%FapF^oFbo>8-%%trueGC%-%%withG6%%'homalgG%+Left DivideG%,RightDivideG@$43-%)assignedG6#&Fcq6#Fdq-Fjq6#&Fcq6#Feq-%&ERRORG6#%_xho malg~package~with~version~newer~than~200408260000~not~found~in~path.~cchdop20~n eeds~the~(new)~homalg~package~to~factorize~matrices~of~differential~operators.~ Download~URL:~http://wwwb.math.rwth-aachen.de/homalgG>F]q%&falseG>8.-%,jets/cch dopG6'FVFZFinF^oFbo@%F]qC&>8/-%.jets/ijacobifG6&FVFZF^oFbo>84-%.jets/AdjointFG6 %F`sF^oFbo-%,jets/cmpdopG6&FirFesF^oFbo-Fjs6&F`s%"%GF^oFboC*>83f*6#%"aGF$F$F$-F io6&%-jets/ind2eqnG9$T#T%F$F$6&F*F^oF+Fbo>80-%-jets/jacobifGFcs>81-%/jets/jacob idetG6%FVF^oFbo>82-%,jets/mulmatG6%*$FauFFF]uF^o>85-Fgs6%FfuF^oFbo-F`r6&-Fat6#F ir-Fat6#F\vF^o.%&JanetG-F\r6&-Fat6#FfuF^tF^oFev-Fio6&%-jets/eqn2indGF^tF^oFboF$ F$F$F$, Q0jets/cchdop20.mF$ M7R0 I0jets/char2xietaf*6%%'chlistG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~M ohamed~Barakat.~All~rights~reserved.GF(-%/jets/vec2xietaG6%-%.jets/char2vecG6%9 $9%9&F2F3F(F(F(F(, Q2jets/char2xieta.mF( M7R0 I-jets/divmultf*6&%&expr1G%&expr2G%%ivarG'%%dvarG%%listG6&%#lvG%$ex1G%$ex2G%#xx G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@$0- %%nopsG6#9'"""-%&ERRORG6#%Mdivmult~expects~only~one~dependent~variable!G@%2""$9 #>8$-%,jets/mklistG6#&9"6#""%>FD7">8%-%#opG6#-%.jets/OrdEulerG6&9$9&F9FD>8&-FQ6 #-FT6&9%FWF9FD@'0FY""!C$>8'-%+jets/jsimpG6$*&FOF:FY!""F9@%-%%typeG6$F^o%(numeri cG7$F:F^o-%'RETURNG6#.%&FALSEG0FOF[o7$F[oF:7$F[oF[oF2F2F2F2, Q/jets/divmult.mF2 M7R0 I-jets/eqn2prdf*6%%$eqnG%%ivarG%%dvarG6*%"iG%#zzG%&_ivarG%&_dvarG%%_eqnG%'ivdva rG%%aeqnG%$prdG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~rese rved.G6"C,>8(-%,jets/mklistG6#-%'expandG6#9$>8%7#-%"$G6$""!-%%nopsG6#9&>8'F?>8) F?>8*%%NULLG@%2""$9#>8&&9"6#""%>FU9%?(8$"""FhnFE%%trueG@%-%%typeG6$&FH6#Fgn%)fu nctionGC%>FJ-%'subsopG6$/Fgn-%#opG6$FDF^oFJ>FL-Fdo6$/Fgn7#-Fho6#F^oFL@'32-FF6#& FLF_o-FF6#FU-%-jets/sublistG6$FfpFU>FN6$FN-Fho6#-%$mapG6$f*6#%"aGF36$%)operator G%&arrowGF37$-Fdo6$/T#&%"DGF<T%FDF3F36&F)FgnF*F?-%,jets/getposG6$-%*jets/restG6 $FUFfpFU3/FdpFgpFipF3-%&ERRORG6$F^o%9has~the~wrong~variables!GC$>FJ-Fdo6$/FgnF^ oFJ>FL-Fdo6$/FgnFenFL>8+-%%subsG6%-Faq6$f*6#%"xGF3FfqF3/F=-%-jets/map2indG6%F=F ]rQ!F3F3F36$F+FU-%-jets/getdrvsG6$F=FJ-Faq6$f*6#%"bGF3FfqF3/-&F]rF<6#-Fho6#&F`r F<FauF3F36&F,FJF.FL7#-FB6#;Fhn-FF6#FJF6>Fhs7$FN-Fho6#-Faq6$f*FdqF3FfqF37$-Faq6$ f*F]uF3FfqF3-%&coeffG6$-%(collectG6$T$F`rF=F3F36&FeqF=F,F]rF]r-%-jets/affpartG6 $F=F]rF3F36$F,FJFhs@'5-F\o6$F=%%listG0FNFOFhs-F\o6$F=%$setG-%+jets/mksetG6#Fhs- FhoF_xF3F3F3F3, Q/jets/eqn2prd.mF3 M7R0 I.jets/frechetcf*6%%&_leqnG%&_ivarG%&_dvarG6+%%leqnG%%ivarG%%dvarG%"AG%"mG%"nG% "iG%"jG%"kG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved .G6"C*>8$-%,jets/mklistG6#9$>8%-F96#9%>8&-F96#9&>8(-%%nopsG6#F7>8)-FI6#FB>8'-%' matrixG6$FGFL?(8*"""FVFG%%trueG?(8+FVFVFLFWC%>&FP6$FUFY7$-%-jets/partderG6&&F76 #FU7#&FB6#FYF=FB7"?&8,-%-jets/getindsG6$F\oF^oFW>Ffn6$Ffn7$-Fjn6&F\oFcoF=FB7#-% #opG6#Fco>Ffn-%.jets/gcollectG6$7#FfnF=@%34-%%typeG6$F;%%listG/FMFV&FP6$FVFV-%% copyG6#FPF4F4F4F4, Q0jets/frechetc.mF4 M7R0 I-jets/getcmpnf*6$%%_objG%(objtypeG6'%$objG%%ivarG%%dvarG%%TYPEG%)ONE_SIDEG6#%W Copyright~(C)~2003~by~Mohamed~Barakat~&~Anna~FabianskaG6"C&>8$-%,jets/mklistG6# 9$@%2""#9#>8%-F46#&9"6#""$>F<7"@%2FBF:>8&-F46#&F@6#""%>FHFD@55-%,jets/chkstrG6% 9%Q$jetF/;"""FB-FR6%FTQ'0-formF/;FW""'C%>8'FU>8(%%trueG-%$mapG6$f*6#%"aGF/6$%)o peratorG%&arrowGF/@%-%%typeG6$F6%"=G,&-%$lhsGF5FW-%$rhsGF5!""F6F/F/F/F255-FR6%F TQ"DF/FW-FR6%FTQ$srcF/FV-FR6%FTQ'1-ffrmF/FenC&>FinFhp>F[oF\o@$0-%%nopsG6#F2-Fbq 6#FH-%&ERRORG6#%[tDistinguished~symmetries~are~only~defined~for~source~forms!~A ~source~form~(=first~argument)~must~have~as~many~components~as~dependent~variab les!G-F^o6$f*FaoF/FcoF/@%FgoF[pF6F/F/F/F25-FR6%FTQ$fnlF/FV-FR6%FTQ'0-ffrmF/FenC %>FinFar@$2FWFaq-Fgq6#%gnA~functional~(=first~argument)~must~have~only~one~comp onent!GF25-FR6%FTQ$frmF/FV-FR6%FTQ'1-hfrmF/FenC%>FinFbs@$0Faq-Fbq6#F<-Fgq6#%ipA ~(horizontal)~1-form~(=first~argument)~must~have~as~many~components~as~independ ent~variables!GF25-FR6%FTQ$lgrF/FV-FR6%FTQ'n-hfrmF/FenC%>FinF_t@$Fhr-Fgq6#%`oA~ (horizontal)~n-form~(=first~argument)~must~have~only~one~component!GF25-FR6%FTQ $vecF/FV-FR6%FTQ#vfF/;FWF9C$>FinF\u-%/jets/vec2xietaG6%F2F<FH55-FR6%FTQ$chrF/FV -FR6%FTQ%charF/;FWFM-FR6%FTQ%evolF/F^vC&>FinFju>F[oF\o@$F`q-Fgq6#%bpA~character istic~(=first~argument)~must~have~as~many~components~as~dependent~variables!G@% -%,jets/chkvecGFcq-%.jets/vec2charGFeuF2-FR6%FTQ$dopF/FVC$>FinF`w@,/F27#""!F2-% ,jets/chkdopGFcq-F^o6$f*FaoF/FcoF/&F66#FWF/F/F/F233-Fho6$F2%%listG2Ffw-Fbq6#Fbx -Fhw6#&F2F]x-F^o6%-%"@G6$%#opGF"F2FT333F`x/FaqFW4-Fho6$FhxFbx-Fhw6$FhxQ!F/F2333 -Fho6$F2%)listlistG2FfwFaq2Ffw-FbqFgx-Fhw6$&F26$FWFWFhyFix55-FR6%FTQ"CF/FW-FR6% FTQ$cnsF/FV-FR6%FTQ%consF/F^vC&>FinF][l>F[oF\o@$F`q-Fgq6#%dtConservation~charac terisitics~are~implemented~for~source~forms~only!~A~source~form~(=first~argumen t)~must~have~as~many~components~as~dependent~variables!G@%FjvF\wF2C%>FinQ$eqnF/ >F[oF\o-F^o6$f*FaoF/FcoF/@%FgoF[pF6F/F/F/F2F/F/F/F/, Q/jets/getcmpn.mF/ M7R0 I-jets/getiordf*6$%$eqnG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.GF'@%2""#9#@%-%%typeG6$&9"6#""$%'stringGC$f*6#%"aGF'F'F' @%-%'memberG6$9$T$""!-%%nopsG6#7#-%#opG6#F?F'F'6$F&9%-%$maxG6$!""-FG6#-%$mapG6$ %"%G-%-jets/getindsG6%F?FJQ!F'-%&ERRORG6#%\qexpects~as~a~second~argument~dvar~( not~ivar!).~If~a~third~argument~is~given,~it~must~be~a~string.G-FL6$FA-FG6#-FR6 $f*6#%"xGF'6$%)operatorG%&arrowGF'FBF'F'F'-FV6$F?FJF'F'F'F', Q/jets/getiord.mF' M7R0 I,jets/ichchrf*6"6*%#arG%%itrlG%%dtrlG%$chrG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchchrG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichchr.mF$ M7R0 I-jets/invcondf*6%%&_lvecG%'_lexprG%%ivarG6,%%lvecG%&lexprG%%dvarG%$vecG%%exprG %$sysG%%jvarG%%svarG%$varG%%nonhG6#%[oCopyright~(C)~2000-2005~by~Mohamed~Baraka t.~All~rights~reserved.G6"C-@%-%,jets/chkvecG6#9$>8$7#F;>F=F;>8%-%,jets/mklistG 6#9%>FA-%$mapG6$f*6#%"aGF56$%)operatorG%&arrowGF5@%-%%typeG6$F;%"=G,&-%$lhsGF:" ""-%$rhsGF:!""F;F5F5F5FA@%532""$9#-FR6$&9"6#Fen%'stringG2""%F[o>8-FX>Feo""!@%3F in4-FR6$&F_o6#FcoFao>8&-FC6#F]p>F`p7">8*-%-jets/getindsG6$FAF`p>8+-FH6$%-jets/i nd2subGFfp>8,7$-%#opG6#9&-Fcq6#-Fhp6%FAF`pQ!F5>8)%%NULLG?&8'F=%%trueG?&8(FAF`r> F\r6$F\r,&FeoFen-%,jets/liederG6&F_rFbrFeqF`pFX6$-Fcq6#-%%subsG6$-%*jets/ezipG6 $FfpF[q7%7#F\rF`qFA-F`s6$F[qFfpF5F5F5F5, Q/jets/invcond.mF5 M7R0 I.jets/lddop1_1f*6&%$vecG%%_dopG%%ivarG%%dvarG6%%"QG%$adqG%$dopG6#%[oCopyright~ (C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@%-%,jets/chkvecG6#9 $>8$-%.jets/vec2charG6%F59&9'C$>F7-%,jets/mklistGF4@$-%%typeG6$&F76#"""%"=G>F7- %$mapG6$f*6#%"aGF/6$%)operatorG%&arrowGF/,&-%$lhsGF4FG-%$rhsGF4!""F/F/F/F7>8%-% .jets/AdjointFG6%-%.jets/frechetcG6%F7F;F<F;F<@%-%,jets/chkdopG6#9%>8&-%+jets/m kmatG6#7#7#F_o>FaoF_o-%,jets/addmatG6%-%+jets/lddopG6&-%/jets/char2evolG6$F7F<- %%copyG6#FaoF;F<-%,jets/comdopG6&-Fbp6#FZFapF;F<F;@%F\o&%"%G6$FGFGF[qF/F/F/F/, Q0jets/lddop1_1.mF/ M7R0 I+jets/ldsrcf*6&%$vecG%$_SSG%&_ivarG%&_dvarG6%%#SSG%%ivarG%%dvarG6#%[oCopyright ~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8$-%,jets/mklistG6 #9%>8%-F46#9&>8&-F46#9'@$0-%%nopsG6#F2-FD6#F=-%&ERRORG6#%]oA~source~form~must~h ave~as~many~components~as~dependent~variables!G-%'expandG6#,&-%$mapG6$f*6#%"aGF /6$%)operatorG%&arrowGF/-%,jets/liederG6&-%.jets/vec2evolG6%T$T%T'9$FjnF[oF/F/6 (F%F\oF+F8F,F=F2"""-%+jets/appadG6&-%.jets/frechetcG6%-%.jets/vec2charG6%F\oF8F =F8F=F2F8F=F^o@%-%%typeG6$F6%%listG%"%G-%#opG6#F]pF/F/F/F/, Q-jets/ldsrc.mF/ M7R0 I+jets/mksetf*6#%"LG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~righ ts~reserved.GF&@'-%%typeG6$9$%$setGF--F+6$F-%%listG-%(convertGF,<#F-F&F&F&F&, Q-jets/mkset.mF& M7R0 I,jets/nsbra3f*6&%#_HG%#_KG%&_ivarG%&_dvarG6(%"HG%"KG%%ivarG%%dvarG%"TG%%operG6 #%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)>8&-%, jets/mklistG6#9&>8'-F76#9'@%-%,jets/chkdopG6#9$>8$-%+jets/mkmatG6#7#7#FC>FEFC@% -FA6#9%>8%-FG6#7#7#FO>FQFO@%32""%9#/-%%nopsG6#-F76#&9"6#""&-Fhn6#F;>8(Fjn>Fco-% $mapG6$f*6#%"aGF26$%)operatorG%&arrowGF2-%$catG6$.T#FCF2F26$F.FcoF;-%+jets/jsim pG6$-%,jets/addmatG6$-%#opG6#-Ffo6$f*6#%"BGF2F[pF2-%,jets/submatG6%-%+jets/lddo pG6&-%/jets/char2evolG6$--%,jets/diffopG6%&FC6#"""T%7$-F[q6#Fbp-F[q6#T'FerFhr&F C6#""#FbrFcr-%+jets/asadjG6&-%,jets/cmpdopG6&-%.jets/frechetmG6'FirFbpFbrFhrFbp F_rFbrFcrFbrFcrQ!F2FbrF2F26(F.FcoF,F5F-F;7$7$FEFQ7$FQFEF57$-F[q6#Fco-F[qFao@%FM &%"%G6$FarFarF`tF2F2F2F2, Q.jets/nsbra3.mF2 M7R0 I0jets/projlinsysf*6&'%%_sysG%%listG'%$ordG%*nonnegintG%%ivarG%%dvarG6'%&ndvarG %$sysG%'ordSysG%%nsysG%&rprocG6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights ~reserved.G6"C)>8%-%.jets/sortivarG6%9$9&9'@%-%%typeG6$&F86#"""F'C%@$0-%%nopsG6 #F8""#YQfqExpecting~first~argument~to~be~a~list~of~jet~expressions~or~a~list~of ~two~lists~containing~jet~expressions!F5>8&&F86#FL>F8FCC%>F87#-%-selectremoveG6 $f*6#%"aGF56$%)operatorG%&arrowGF5@%2T$-%-jets/getiordG6$F<T&%%trueG%&falseGF5F 56&F)9%F,F>F8>FPFQ>F8FC>8(&%'linalgG6#%*gausselimG@%32""%9#-FA6$&9"6#""&F'>F8-% /jets/linReduceG6)F8FdoFhoF=F>FdpQ!F5>F8-Fjp6'F8FdoFhoF=F>@$3F_p-%'memberG6$Q,F actorBasisF57#&Fep6#;!"$!""C*>8'FI>8$-%$mapG6$f*6#%"iGF5FgnF5-%$catG6$%#_uGF<F5 F5F57#-%"$G6#;FEF^r>F87$-%#opG6#-Fbr6$f*FerF5FgnF5,&&T#6#F<FE&T%F[tFEF5F56&F/F8 F.F`rF[s-Fcs6#FP@%F^p>F8-Fjp6*F8Fdo&Fjo6#%*gaussjordGF=F>F`rFdpF\q>F8-Fjp6(F8Fd oFetF=F>F`r>F8-%'selectG6%%$hasGF8F`r>F8-Fbr6$f*FenF5FgnF5@$0F<""!F<F5F5F5-%%su bsG6$-Fbr6$f*6#%"bGF5FgnF5/F<FfuF5F5F5F`rF8@$/F87"O7#Ffu>FPFbv@$3F_p-Fcq6$Q*Eli minateF5FfqC$@%F^p>F8-Fjp6)7$-FcsFKF_tFdoFhoF=F>FdpF\q>F8-Fjp6'F`wFdoFhoF=F>>FP Fbv@%/FPFbvF8@%30F8Fdv0F8FbvF`wFPF5F5F5F5, Q2jets/projlinsys.mF5 M7R0 I-jets/prolccif*6"61%#arG%%itrlG%%dtrlG%"qG%%ivarG%%dvarG%%evarG%&oivarG%&odvar G%%jvarG%%svarG%&ojvarG%&osvarG%$ptrG%$itrG6#%[oCopyright~(C)~2004-2005~by~Moha med~Barakat.~All~rights~reserved.GF$C4@%-%%typeG6$&9"6#!""%'stringG>8$-%,jets/i npccvG6#&F=6#;"""!"#>FB-FD6#F=>8%&FB6#FI>8&&FB6#""#>8'&FB6#""$>8(&FB6#""%>8)&FB 6#""&@%2F_o-%%nopsG6#7#FB>8*&FB6#""'>Fgo%%NULLG>8+-%$mapG6$%$lhsGFO>8,-F`p6$Fbp FS>8--%-jets/jetcoorG6%7#-%"$G6#;""!FXFgnF\o>8.-F`p6%%(convertGFhp%'symbolG>8/- Fjp6%F\qF^pFdp>80-F`p6$%-jets/ind2subGFiq>81&-%-jets/prolcchG6(FOFSFgoFXFgnF\o6 #;,&-Fco6#FgnFIFIFIF?>Fbr-%*jets/ezipG6$F]r-F`p6$%$rhsGFbr>Fbr-%%subsG6$-F^s6$F hpFcqFbr>82&-%-jets/nrsolveG6$FbrFcqFQ@%F97$-%#opG6#FO-Fbt6#-F^s6$Fhp-Fes6$-F^s 6$F]rFiq-F`p6$FbsFjs7%Fat-Fbt6#FS-Fbt6#-F^s6$&Fhp6#;,&-Fco6#F\oFIFIFIF?-Fes6$Fj t-F`p6$Fbs&FjsFfuF$F$F$F$, Q/jets/prolcci.mF$ M7R0 I/jets/prolv.oldf*6&%$vecG%&_jvarG%%ivarG%%dvarG6#%%jvarG6#%[oCopyright~(C)~200 0-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C$>8$-%,jets/mklistG6#9%-%-je ts/simpconG6%7$-%#opG6#9$-F:6#-%-jets/proljetG6&F<F09&9'7%-F:6#FB-F:6#FC-F:6#F0 FCF-F-F-F-, Q1jets/prolv.old.mF- M7R0 I*jets/restf*6$%#IIG%#JJG6%%"iG%#KKG%#poG6%%[oCopyright~(C)~2000-2002~by~Mohame d~Barakat.~All~rights~reserved.G%'systemG%)rememberG6"C%>8%9$?&8$9%%%trueG@&-%' memberG6%F5F2.8&>F2-%'subsopG6$/F=%%NULLGF25/F27"2""#9#-%'RETURNG6#FFF2F/F/F/F/, Q,jets/rest.mF/ M7R0 I,jets/srccomf*6'%$_S1G%$_S2G%#_HG%%ivarG%%dvarG6%%#S1G%#S2G%"HG6#%[oCopyright~ (C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$-%,jets/mklistG6# 9$>8%-F56#9%@%-%,jets/chkdopG6#9&>8&7#7#FA>FCFA-%+jets/jsimpG6$,(-%,jets/lieder G6&-%/jets/char2evolG6$--%,jets/diffopG6%FC9'9(6#F3FVF9FUFV"""-FL6&-FO6$-FR6#F9 FVF3FUFV!""--FS6%-%.jets/AdjointFG6%-%.jets/frechetmG6&FCF3FUFVFUFVFUFVFhnFXFV@ %45-%%typeG6$F7%%listG-Fgo6$F<Fio&%"%G6#FXF]pF0F0F0F0, Q.jets/srccom.mF0 M7R0 I0jets/transform1f*6&%$eqnG%$lfnG%%lstrG%%dvarG6+%'resultG%#iiG%%lderG%$derG%%t derG%'lfdvarG%$funG%'lsubfnG%$lfdG6#%>Copyright~(c)~1997~by~Khai~VuG6"C->8+-%$z ipG6%f*6$%"xG%"yGF56$%)operatorG%&arrowGF5/9$-%(convertG6$9%%'symbolGF5F5F5FH9& >8$-%%subsG6$F8FD>8,-%'indetsG6$FL%)functionG>8)-%'selectG6%f*6$%"fG%#ldGF5F@F5 -%'memberG6$-%#opG6$""!FDFHF5F5F5FQ9'>FQ-%&minusG6$FQFW>F8-%$mapG6$f*6#FgnF5F@F 5/FDF\oF5F5F5FW>FL-FN6$F8FL>FQ-FN6$F8FQ>FQ-FY6$f*FjoF5F@F533-%$hasG6$F\o%"DG-%& evalbG6#/-%%nopsG6#FD"""-%%typeG6$-F]oFbq%%nameGF5F5F5FQ>F8-Fgo6$f*6#F-6$%'ordd erG%%funcGF5F5C%@%-Feq6$-F]o6$F_oF\oFU>FL-F]o6$""#Fer>FLFcq>8%--F]o6#F\o6#Fgq/F D-%%diffG6$F]s-%"$G6$-F]o6#F]sFLF5F5F5FQF]pF5F5F5F5, Q2jets/transform1.mF5 M7R0 I.jets/vec2charf*6%%%vconG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF(@%32""$9#-%%typeG6$&9"6#""%%*nonnegintG&-%,j ets/cflistG6$-%.jets/vec2evolG6%9$9%9&FA6#F3F9F(F(F(F(, Q0jets/vec2char.mF( M7R0 I/jets/jsubs.oldf*6&%$relG%%exprG%%ivarG%&_dvarG6)%%dvarG%#reG%#exG%#lsG%#rsG%# slG%"pG6#%inCopyright~(C)~2000-2005~by~Gehrt~Hartjen.~All~rights~reserved.G6"C& @%2""%9#>8$7$-%#opG6#-%,jets/mklistG6#9'-F=6#&9"6#""&>F:F?>8&9%?&8%-F@6#9$%%tru eG@'3-%%typeG6$-%$lhsG6#FN%(indexedG-%'memberG6$-F=6$""!FXF:C&>8'Fin>8)7#-F=6#F X>8(-%$rhsGFZ>FK-%%subsG6$-%$mapG6$f*6#%"rGF36$%)operatorG%&arrowGF3/FQ-%.jets/ totalderG6&T#-%,jets/remainG6$7#-F=FPT%T(T)F3F36*F.FeoF/F`oF'9&F*F:-F]p6$f*6#%" aGF3FbpF3@%-%-jets/sublistG6$FipF]qFQ%%NULLGF3F36$F/F`o-%-jets/getindsG6$FK7#F^ oFK-Fgn6%FXF:.8*>FK-%+jets/QsubsG6&-%'subsopG6$/FfrFfoF:FKFcqF:-%&ERRORG6#%_oOn ly~jet~variables~can~be~substituted~here,~please~check~your~input!G-%+jets/jsim pG6%FKF:-%"@G6$%)simplifyG%%evalGF3F3F3F3, Q1jets/jsubs.old.mF3 M7R0 I%jets=6"%&falseGE\[l`[l%&ldsrcGf*F$F$6#%[oCopyright~(C)~2000-2002~by~Mohamed~B arakat.~All~rights~reserved.GF$C$30%1jets/initializedG.%%trueG0-%*jets/initGF$" "!-%+jets/ldsrcG6#9"F$F$F$%)riemann3Gf*F$F$F)F$C$F,-%.jets/riemann3GF7F$F$F$%)g collectGf*F$F$6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserve d.GF$C$F,-%.jets/gcollectGF7F$F$F$%(getcmpnGf*F$F$6#%WCopyright~(C)~2003~by~Moh amed~Barakat~&~Anna~FabianskaGF$C$F,-%-jets/getcmpnGF7F$F$F$%&hjetsGf*F$F$F)F$C $F,-%+jets/hjetsGF7F$F$F$%'cchfrmGf*F$F$F)F$C$F,-%,jets/cchfrmGF7F$F$F$%&weyl2G f*F$F$F)F$C$F,-%+jets/weyl2GF7F$F$F$%'cchcurGf*F$F$F)F$C$F,-%,jets/cchcurGF7F$F $F$%'oderedGf*F$F$F)F$C$F,-%,jets/oderedGF7F$F$F$%)vec2charGf*F$F$F)F$C$F,-%.je ts/vec2charGF7F$F$F$%'ichfrmGf*F$F$F)F$C$F,-%,jets/ichfrmGF7F$F$F$%(prolccvGf*F $F$6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%-je ts/prolccvGF7F$F$F$%(currentGf*F$F$F@F$C$F,-%-jets/currentGF7F$F$F$%)frechetoGf *F$F$F)F$C$F,-%.jets/frechetoGF7F$F$F$%'hamvecGf*F$F$F)F$C$F,-%,jets/hamvecGF7F $F$F$%*interprodGf*F$F$F@F$C$F,-%/jets/interprodGF7F$F$F$%'cmpdopGf*F$F$F)F$C$F ,-%,jets/cmpdopGF7F$F$F$%'ichconGf*F$F$F)F$C$F,-%,jets/ichconGF7F$F$F$%'ichdopG f*F$F$F)F$C$F,-%,jets/ichdopGF7F$F$F$%%com3Gf*F$F$6#%[oCopyright~(C)~2000-2003~ by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%*jets/com3GF7F$F$F$%(casimopGf *F$F$F)F$C$F,-%-jets/casimopGF7F$F$F$%'cchsrcGf*F$F$F)F$C$F,-%,jets/cchsrcGF7F$ F$F$%)symsplitGf*F$F$F@F$C$F,-%.jets/symsplitGF7F$F$F$%)frechetaGf*F$F$F)F$C$F, -%.jets/frechetaGF7F$F$F$%&E1dimGf*F$F$6#%XCopyright~(C)~2005~by~Arne~Lorenz.~A ll~rights~reserved.GF$C$F,-%+jets/E1dimGF7F$F$F$%(fin2infGf*F$F$F)F$C$F,-%-jets /fin2infGF7F$F$F$%*invtargetGf*F$F$6#%[oCopyright~(C)~2004-2005~by~Mohamed~Bara kat.~All~rights~reserved.GF$C$F,-%/jets/invtargetGF7F$F$F$%'subs01Gf*F$F$F)F$C$ F,-%,jets/subs01GF7F$F$F$%)lddop1_1Gf*F$F$F)F$C$F,-%.jets/lddop1_1GF7F$F$F$%(mo p2sclGf*F$F$F)F$C$F,-%-jets/mop2sclGF7F$F$F$%)bascoeffGf*F$F$6#%joCopyright~(C) ~2000-2002~by~Gehrt~Hartjen,~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%.jet s/bascoeffGF7F$F$F$%'ricci0Gf*F$F$F)F$C$F,-%,jets/ricci0GF7F$F$F$%*classconsGf* F$F$F@F$C$F,-%/jets/classconsGF7F$F$F$%'nsbraLGf*F$F$F)F$C$F,-%,jets/nsbraLGF7F $F$F$%&prolcGf*F$F$6#%[oCopyright~(C)~2000-2005~by~Mohamed~Barakat.~All~rights~ reserved.GF$C$F,-%+jets/prolcGF7F$F$F$%*jsubs.oldGf*F$F$6#%inCopyright~(C)~2000 -2005~by~Gehrt~Hartjen.~All~rights~reserved.GF$C$F,-%/jets/jsubs.oldGF7F$F$F$%( getcondGf*F$F$F)F$C$F,-%-jets/getcondGF7F$F$F$%)riemannSGf*F$F$F)F$C$F,-%.jets/ riemannSGF7F$F$F$%'cchchrGf*F$F$F)F$C$F,-%,jets/cchchrGF7F$F$F$%'cchcnjGf*F$F$6 #%fnCopyright~(C)~2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%,jets/c chcnjGF7F$F$F$%(diagmatGf*F$F$6#%fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~r ights~reserved.GF$C$F,-%-jets/diagmatGF7F$F$F$%(prolsysGf*F$F$6#%[pCopyright~(C )~2004-2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%-j ets/prolsysGF7F$F$F$%(scalarcGf*F$F$F)F$C$F,-%-jets/scalarcGF7F$F$F$%'submatGf* F$F$F)F$C$F,-%,jets/submatGF7F$F$F$%'cchfncGf*F$F$F)F$C$F,-%,jets/cchfncGF7F$F$ F$%(invcondGf*F$F$FhwF$C$F,-%-jets/invcondGF7F$F$F$%'lstvecGf*F$F$F\uF$C$F,-%,j ets/lstvecGF7F$F$F$%(getindsGf*F$F$F)F$C$F,-%-jets/getindsGF7F$F$F$%'cchinvGf*F $F$F)F$C$F,-%,jets/cchinvGF7F$F$F$%(getindfGf*F$F$F)F$C$F,-%-jets/getindfGF7F$F $F$%'chkdopGf*F$F$F)F$C$F,-%,jets/chkdopGF7F$F$F$%(natfinGGf*F$F$F\uF$C$F,-%-je ts/natfinGGF7F$F$F$%(jetcoorGf*F$F$F)F$C$F,-%-jets/jetcoorGF7F$F$F$%(killingGf* F$F$F)F$C$F,-%-jets/killingGF7F$F$F$%(grp2algGf*F$F$F[pF$C$F,-%-jets/grp2algGF7 F$F$F$%'TakensGf*F$F$F)F$C$F,-%,jets/TakensGF7F$F$F$%(LdsolveGf*F$F$6#%[oCopyri ght~(C)~2000-2004~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%-jets/Ldsolv eGF7F$F$F$%'defvecGf*F$F$F)F$C$F,-%,jets/defvecGF7F$F$F$%*riemannT2Gf*F$F$F)F$C $F,-%/jets/riemannT2GF7F$F$F$%%sadjGf*F$F$F)F$C$F,-%*jets/sadjGF7F$F$F$%)ocliec omGf*F$F$F)F$C$F,-%.jets/ocliecomGF7F$F$F$%)oPoissonGf*F$F$F)F$C$F,-%.jets/oPoi ssonGF7F$F$F$%-kroneckermatGf*F$F$F\zF$C$F,-%2jets/kroneckermatGF7F$F$F$%%com2G f*F$F$F)F$C$F,-%*jets/com2GF7F$F$F$%)riemann2Gf*F$F$F)F$C$F,-%.jets/riemann2GF7 F$F$F$%)jvreduceGf*F$F$F)F$C$F,-%.jets/jvreduceGF7F$F$F$%&adrepGf*F$F$F)F$C$F,- %+jets/adrepGF7F$F$F$%)char2vecGf*F$F$F)F$C$F,-%.jets/char2vecGF7F$F$F$%'ichvec Gf*F$F$F)F$C$F,-%,jets/ichvecGF7F$F$F$%(divmultGf*F$F$F)F$C$F,-%-jets/divmultGF 7F$F$F$%'mulconGf*F$F$F)F$C$F,-%,jets/mulconGF7F$F$F$%,coeffmatrixGf*F$F$6#%\pC opyright~(C)~2000-2003~by~Gehrt~Hartjen~and~Daniel~Robertz.~All~rights~reserved .GF$C$F,-%1jets/coeffmatrixGF7F$F$F$%'eqnredGf*F$F$F)F$C$F,-%,jets/eqnredGF7F$F $F$%'ichlgrGf*F$F$F)F$C$F,-%,jets/ichlgrGF7F$F$F$%+symtestgenGf*F$F$F@F$C$F,-%0 jets/symtestgenGF7F$F$F$%'ichcurGf*F$F$F)F$C$F,-%,jets/ichcurGF7F$F$F$%(lddop02 Gf*F$F$F)F$C$F,-%-jets/lddop02GF7F$F$F$%'GEulerGf*F$F$F)F$C$F,-%,jets/GEulerGF7 F$F$F$%)LieFormGGf*F$F$F[pF$C$F,-%.jets/LieFormGGF7F$F$F$%'chkcntGf*F$F$F\zF$C$ F,-%,jets/chkcntGF7F$F$F$%'oldsrcGf*F$F$F)F$C$F,-%,jets/oldsrcGF7F$F$F$%*jacobi detGf*F$F$F)F$C$F,-%/jets/jacobidetGF7F$F$F$%'jacobiGf*F$F$6#%\pCopyright~(C)~2 000-2003~by~Mohamed~Barakat,~Pieter~Eendebak.~All~rights~reserved.GF$C$F,-%,jet s/jacobiGF7F$F$F$%'addconGf*F$F$F)F$C$F,-%,jets/addconGF7F$F$F$%(chkcnt1Gf*F$F$ F)F$C$F,-%-jets/chkcnt1GF7F$F$F$%&appadGf*F$F$F)F$C$F,-%+jets/appadGF7F$F$F$%,n atinfG.oldGf*F$F$FeyF$C$F,-%1jets/natinfG.oldGF7F$F$F$%)riemannKGf*F$F$F)F$C$F, -%.jets/riemannKGF7F$F$F$%&F1dimGf*F$F$FeyF$C$F,-%+jets/F1dimGF7F$F$F$%)nkillin gGf*F$F$F)F$C$F,-%.jets/nkillingGF7F$F$F$%)natfinG2Gf*F$F$F\uF$C$F,-%.jets/natf inG2GF7F$F$F$%'ichsrcGf*F$F$F)F$C$F,-%,jets/ichsrcGF7F$F$F$%(LieFormGf*F$F$F[pF $C$F,-%-jets/LieFormGF7F$F$F$%+xieta2charGf*F$F$F)F$C$F,-%0jets/xieta2charGF7F$ F$F$%*riemannF2Gf*F$F$F)F$C$F,-%/jets/riemannF2GF7F$F$F$%&appmtGf*F$F$F)F$C$F,- %+jets/appmtGF7F$F$F$%'comtabGf*F$F$FerF$C$F,-%,jets/comtabGF7F$F$F$%(ohamvecGf *F$F$F)F$C$F,-%-jets/ohamvecGF7F$F$F$%%jlinGf*F$F$F)F$C$F,-%*jets/jlinGF7F$F$F$ %&asadjGf*F$F$F)F$C$F,-%+jets/asadjGF7F$F$F$%(gen2symGf*F$F$F)F$C$F,-%-jets/gen 2symGF7F$F$F$%'ibpcurGf*F$F$F)F$C$F,-%,jets/ibpcurGF7F$F$F$%(prolvecGf*F$F$6#%[ pCopyright~(C)~2000-2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserve d.GF$C$F,-%-jets/prolvecGF7F$F$F$%'cflistGf*F$F$F)F$C$F,-%,jets/cflistGF7F$F$F$ %(prolcchGf*F$F$FhwF$C$F,-%-jets/prolcchGF7F$F$F$%'lieappGf*F$F$F)F$C$F,-%,jets /lieappGF7F$F$F$%)ijacobifGf*F$F$F)F$C$F,-%.jets/ijacobifGF7F$F$F$%(getiordGf*F $F$F)F$C$F,-%-jets/getiordGF7F$F$F$%+GinterprodGf*F$F$F)F$C$F,-%0jets/Ginterpro dGF7F$F$F$%'hameqnGf*F$F$F)F$C$F,-%,jets/hameqnGF7F$F$F$%)depcheckGf*F$F$F@F$C$ F,-%.jets/depcheckGF7F$F$F$%&tpderGf*F$F$F)F$C$F,-%+jets/tpderGF7F$F$F$%(divnor mGf*F$F$F@F$C$F,-%-jets/divnormGF7F$F$F$%*linmatrixGf*F$F$6#%inCopyright~(C)~20 00-2003~by~Gehrt~Hartjen.~All~rights~reserved.GF$C$F,-%/jets/linmatrixGF7F$F$F$ %'ricci2Gf*F$F$F)F$C$F,-%,jets/ricci2GF7F$F$F$%(simpconGf*F$F$F)F$C$F,-%-jets/s impconGF7F$F$F$%'mulmatGf*F$F$F)F$C$F,-%,jets/mulmatGF7F$F$F$%(upldsrcGf*F$F$F) F$C$F,-%-jets/upldsrcGF7F$F$F$%(hamflowGf*F$F$F)F$C$F,-%-jets/hamflowGF7F$F$F$% (jcoeffsGf*F$F$F)F$C$F,-%-jets/jcoeffsGF7F$F$F$%'nsbraFGf*F$F$F)F$C$F,-%,jets/n sbraFGF7F$F$F$%)evol2vecGf*F$F$F)F$C$F,-%.jets/evol2vecGF7F$F$F$%(partderGf*F$F $F)F$C$F,-%-jets/partderGF7F$F$F$%&E1defGf*F$F$F`tF$C$F,-%+jets/E1defGF7F$F$F$% 'diffopGf*F$F$F)F$C$F,-%,jets/diffopGF7F$F$F$%'cchlgrGf*F$F$F)F$C$F,-%,jets/cch lgrGF7F$F$F$%(eulprolGf*F$F$F@F$C$F,-%-jets/eulprolGF7F$F$F$%(lddop20Gf*F$F$F)F $C$F,-%-jets/lddop20GF7F$F$F$%'cchdopGf*F$F$F)F$C$F,-%,jets/cchdopGF7F$F$F$%+na tfin2infGf*F$F$F[pF$C$F,-%0jets/natfin2infGF7F$F$F$%$DivGf*F$F$F@F$C$F,-%)jets/ DivGF7F$F$F$%'cchjetGf*F$F$F)F$C$F,-%,jets/cchjetGF7F$F$F$%(intnormGf*F$F$F)F$C $F,-%-jets/intnormGF7F$F$F$%)geodesicGf*F$F$F)F$C$F,-%.jets/geodesicGF7F$F$F$%& dprodGf*F$F$F)F$C$F,-%+jets/dprodGF7F$F$F$%(extderdGf*F$F$F\zF$C$F,-%-jets/extd erdGF7F$F$F$%'cchconGf*F$F$F)F$C$F,-%,jets/cchconGF7F$F$F$%)frechetcGf*F$F$F)F$ C$F,-%.jets/frechetcGF7F$F$F$%&ldjetGf*F$F$F)F$C$F,-%+jets/ldjetGF7F$F$F$%'cchv ecGf*F$F$F)F$C$F,-%,jets/cchvecGF7F$F$F$%+projlinsysGf*F$F$F`tF$C$F,-%0jets/pro jlinsysGF7F$F$F$%'srccomGf*F$F$F)F$C$F,-%,jets/srccomGF7F$F$F$%*riemannS2Gf*F$F $F)F$C$F,-%/jets/riemannS2GF7F$F$F$%'natinfGf*F$F$6#%[pCopyright~(C)~2005-2007~ by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%,jets/natinfGF 7F$F$F$%'prolcvGf*F$F$F\uF$C$F,-%,jets/prolcvGF7F$F$F$%%CurlGf*F$F$F@F$C$F,-%*j ets/CurlGF7F$F$F$%)sortjetsGf*F$F$6%F]^m%'systemG%)rememberGF$C$F,-%.jets/sortj etsGF7F$F$F$%*vec2xietaGf*F$F$F)F$C$F,-%/jets/vec2xietaGF7F$F$F$%(cliecomGf*F$F $F)F$C$F,-%-jets/cliecomGF7F$F$F$%*riemannK2Gf*F$F$F)F$C$F,-%/jets/riemannK2GF7 F$F$F$%*linReduceGf*F$F$F`tF$C$F,-%/jets/linReduceGF7F$F$F$%(darbouxGf*F$F$F)F$ C$F,-%-jets/darbouxGF7F$F$F$%&prolfGf*F$F$F)F$C$F,-%+jets/prolfGF7F$F$F$%)ichdo p20Gf*F$F$F\zF$C$F,-%.jets/ichdop20GF7F$F$F$%'subconGf*F$F$F)F$C$F,-%,jets/subc onGF7F$F$F$%&EulerGf*F$F$F@F$C$F,-%+jets/EulerGF7F$F$F$%(prolcciGf*F$F$F\uF$C$F ,-%-jets/prolcciGF7F$F$F$%'jsolveGf*F$F$FhwF$C$F,-%,jets/jsolveGF7F$F$F$%'ichch rGf*F$F$F)F$C$F,-%,jets/ichchrGF7F$F$F$%&lddopGf*F$F$F)F$C$F,-%+jets/lddopGF7F$ F$F$%&nsbraGf*F$F$F)F$C$F,-%+jets/nsbraGF7F$F$F$%(jacobifGf*F$F$F)F$C$F,-%-jets /jacobifGF7F$F$F$%'liecomGf*F$F$F)F$C$F,-%,jets/liecomGF7F$F$F$%%weylGf*F$F$F)F $C$F,-%*jets/weylGF7F$F$F$%&apphhGf*F$F$F)F$C$F,-%+jets/apphhGF7F$F$F$%(sortcon Gf*F$F$F\^mF$C$F,-%-jets/sortconGF7F$F$F$%)AdjointFGf*F$F$F@F$C$F,-%.jets/Adjoi ntFGF7F$F$F$%'liederGf*F$F$FhwF$C$F,-%,jets/liederGF7F$F$F$%&prolvGf*F$F$F\^mF$ C$F,-%+jets/prolvGF7F$F$F$%0codim_of_actionGf*F$F$FeyF$C$F,-%5jets/codim_of_act ionGF7F$F$F$%)comtableGf*F$F$F)F$C$F,-%.jets/comtableGF7F$F$F$%'inf2MFGf*F$F$Fe yF$C$F,-%,jets/inf2MFGF7F$F$F$%(unldsrcGf*F$F$F)F$C$F,-%-jets/unldsrcGF7F$F$F$% *jsimplifyGf*F$F$FeyF$C$F,-%/jets/jsimplifyGF7F$F$F$%&ldlgrGf*F$F$F)F$C$F,-%+je ts/ldlgrGF7F$F$F$%&ssubsGf*F$F$FeyF$C$F,-%+jets/ssubsGF7F$F$F$%'getbasGf*F$F$F@ F$C$F,-%,jets/getbasGF7F$F$F$%(jsymbolGf*F$F$F)F$C$F,-%-jets/jsymbolGF7F$F$F$%' comdopGf*F$F$F)F$C$F,-%,jets/comdopGF7F$F$F$%*vhomotopyGf*F$F$F)F$C$F,-%/jets/v homotopyGF7F$F$F$%)frechetvGf*F$F$F\zF$C$F,-%.jets/frechetvGF7F$F$F$%)frechetmG f*F$F$F)F$C$F,-%.jets/frechetmGF7F$F$F$%%jfacGf*F$F$F)F$C$F,-%*jets/jfacGF7F$F$ F$%&ricciGf*F$F$F)F$C$F,-%+jets/ricciGF7F$F$F$%+getallindsGf*F$F$FeyF$C$F,-%0je ts/getallindsGF7F$F$F$%'addmatGf*F$F$F)F$C$F,-%,jets/addmatGF7F$F$F$%(hamcharGf *F$F$F)F$C$F,-%-jets/hamcharGF7F$F$F$%*xieta2vecGf*F$F$F)F$C$F,-%/jets/xieta2ve cGF7F$F$F$%+Helmholtz2Gf*F$F$F)F$C$F,-%0jets/Helmholtz2GF7F$F$F$%'aprolfGf*F$F$ F)F$C$F,-%,jets/aprolfGF7F$F$F$%*projIsoTrGf*F$F$F`tF$C$F,-%/jets/projIsoTrGF7F $F$F$%'apptrnGf*F$F$F)F$C$F,-%,jets/apptrnGF7F$F$F$%-conservationGf*F$F$F@F$C$F ,-%2jets/conservationGF7F$F$F$%+genvec.oldGf*F$F$FerF$C$F,-%0jets/genvec.oldGF7 F$F$F$%*HelmholtzGf*F$F$F@F$C$F,-%/jets/HelmholtzGF7F$F$F$%&ldfrmGf*F$F$F)F$C$F ,-%+jets/ldfrmGF7F$F$F$%+natinf.oldGf*F$F$FeyF$C$F,-%0jets/natinf.oldGF7F$F$F$% &ldchrGf*F$F$F)F$C$F,-%+jets/ldchrGF7F$F$F$%'nsbra3Gf*F$F$F)F$C$F,-%,jets/nsbra 3GF7F$F$F$%)einsteinGf*F$F$F)F$C$F,-%.jets/einsteinGF7F$F$F$%(aprolifGf*F$F$F)F $C$F,-%-jets/aprolifGF7F$F$F$%&sharpGf*F$F$F[pF$C$F,-%+jets/sharpGF7F$F$F$%(rie mannGf*F$F$F)F$C$F,-%-jets/riemannGF7F$F$F$%,christoffelGf*F$F$F)F$C$F,-%1jets/ christoffelGF7F$F$F$%(alljetsGf*F$F$F)F$C$F,-%-jets/alljetsGF7F$F$F$%(ind2eqnGf *F$F$F)F$C$F,-%-jets/ind2eqnGF7F$F$F$%'genvecGf*F$F$F\^mF$C$F,-%,jets/genvecGF7 F$F$F$%'natfinGf*F$F$F\uF$C$F,-%,jets/natfinGF7F$F$F$%(intpartGf*F$F$F@F$C$F,-% -jets/intpartGF7F$F$F$%'jcoeffGf*F$F$F)F$C$F,-%,jets/jcoeffGF7F$F$F$%'ichfncGf* F$F$F)F$C$F,-%,jets/ichfncGF7F$F$F$%&esubsGf*F$F$F)F$C$F,-%+jets/esubsGF7F$F$F$ %'trncmpGf*F$F$F)F$C$F,-%,jets/trncmpGF7F$F$F$%>F1coorByDegreeEliminationStepGf *F$F$6#%XCopyright~(C)~2007~by~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%Cjets/ F1coorByDegreeEliminationStepGF7F$F$F$%(jreduceGf*F$F$F)F$C$F,-%-jets/jreduceGF 7F$F$F$%(natinfGGf*F$F$F][nF$C$F,-%-jets/natinfGGF7F$F$F$%&jsimpGf*F$F$F\^mF$C$ F,-%+jets/jsimpGF7F$F$F$%'appitrGf*F$F$F)F$C$F,-%,jets/appitrGF7F$F$F$%/F1coorB yDegreeGf*F$F$6#%[pCopyright~(C)~2004-2007~by~Mohamed~Barakat~and~Arne~Lorenz.~ All~rights~reserved.GF$C$F,-%4jets/F1coorByDegreeGF7F$F$F$%'extderGf*F$F$F)F$C$ F,-%,jets/extderGF7F$F$F$%'vertpbGf*F$F$F\uF$C$F,-%,jets/vertpbGF7F$F$F$%'genge nGf*F$F$FerF$C$F,-%,jets/gengenGF7F$F$F$%,symtestdiffGf*F$F$F@F$C$F,-%1jets/sym testdiffGF7F$F$F$%(lddop11Gf*F$F$F)F$C$F,-%-jets/lddop11GF7F$F$F$%*char2evolGf* F$F$F)F$C$F,-%/jets/char2evolGF7F$F$F$%&mkmatGf*F$F$F)F$C$F,-%+jets/mkmatGF7F$F $F$%)chkVBinfGf*F$F$6#%XCopyright~(C)~2006~by~Arne~Lorenz.~All~rights~reserved. GF$C$F,-%.jets/chkVBinfGF7F$F$F$%%pDivGf*F$F$F)F$C$F,-%*jets/pDivGF7F$F$F$%-get IntFactorGf*F$F$F`tF$C$F,-%2jets/getIntFactorGF7F$F$F$%(prolfinGf*F$F$F)F$C$F,- %-jets/prolfinGF7F$F$F$%)riemannFGf*F$F$F)F$C$F,-%.jets/riemannFGF7F$F$F$%(scl2 mopGf*F$F$F)F$C$F,-%-jets/scl2mopGF7F$F$F$%)riemannTGf*F$F$F)F$C$F,-%.jets/riem annTGF7F$F$F$%)cchdop20Gf*F$F$F\zF$C$F,-%.jets/cchdop20GF7F$F$F$%%flatGf*F$F$F[ pF$C$F,-%*jets/flatGF7F$F$F$%'gensymGf*F$F$F)F$C$F,-%,jets/gensymGF7F$F$F$%(Poi ssonGf*F$F$F)F$C$F,-%-jets/PoissonGF7F$F$F$%)homotopyGf*F$F$F@F$C$F,-%.jets/hom otopyGF7F$F$F$%'ichjetGf*F$F$F)F$C$F,-%,jets/ichjetGF7F$F$F$%$totGf*F$F$F)F$C$F ,-%)jets/totGF7F$F$F$%'cchcmpGf*F$F$F)F$C$F,-%,jets/cchcmpGF7F$F$F$%+char2xieta Gf*F$F$F)F$C$F,-%0jets/char2xietaGF7F$F$F$%'trninvGf*F$F$F)F$C$F,-%,jets/trninv GF7F$F$F$%(extderpGf*F$F$F)F$C$F,-%-jets/extderpGF7F$F$F$%+JacobiCondGf*F$F$Fee oF$C$F,-%0jets/JacobiCondGF7F$F$F$%(eqn2indGf*F$F$F)F$C$F,-%-jets/eqn2indGF7F$F $F$%)vec2evolGf*F$F$F)F$C$F,-%.jets/vec2evolGF7F$F$F$%'chkvecGf*F$F$F)F$C$F,-%, jets/chkvecGF7F$F$F$%&jsubsGf*F$F$6#%ioCopyright~(C)~2000-2007~by~Gehrt~Hartjen ~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%+jets/jsubsGF7F$F$F$%'isoalgGf*F $F$F[pF$C$F,-%,jets/isoalgGF7F$F$F$%&ldvecGf*F$F$F)F$C$F,-%+jets/ldvecGF7F$F$F$ %)totalderGf*F$F$F\^mF$C$F,-%.jets/totalderGF7F$F$F$%&csubsGf*F$F$F)F$C$F,-%+je ts/csubsGF7F$F$F$%(inf2finGf*F$F$F)F$C$F,-%-jets/inf2finGF7F$F$F$%'F1coorGf*F$F $F\uF$C$F,-%,jets/F1coorGF7F$F$F$%(ijacobiGf*F$F$F)F$C$F,-%-jets/ijacobiGF7F$F$ F$%(charactGf*F$F$6%F*F_\nF`\nF$C$F,-%-jets/charactGF7F$F$F$%'inv2LFGf*F$F$F[pF $C$F,-%,jets/inv2LFGF7F$F$F$%(E1codimGf*F$F$6#%foCopyright~(C)~2005~by~Mohamed~ Barakat~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%-jets/E1codimGF7F$F$F$%&l dfnlGf*F$F$F)F$C$F,-%+jets/ldfnlGF7F$F$F$%'chkjacGf*F$F$F)F$C$F,-%,jets/chkjacG F7F$F$F$F$, Q'jets.mF$ M7R0 I-jets/Ldsolvef*6$%%_eqnG%&_dvarG6'%$eqnG%%dvarG%$ordG%%ljetG%$solG6#%[oCopyrig ht~(C)~2000-2004~by~Mohamed~Barakat.~All~rights~reserved.G6"C)>8$-%,jets/mklist G6#9$>8%-F46#9%>8&-%-jets/getiordG6$F2F8>8'-%'selectG6$f*6#%"xGF/6$%)operatorG% &arrowGF/-%&evalbG6#/-%,jets/jorderG6$F6T%T#F/F/6&F*F=F)F8-%-jets/getindsG6%F2F 8Q!F/@&32"""-%%nopsG6#FB/9#""#-%&ERRORG6#/%HToo~many~jet~variables~of~highest~o rderGFB2FhnFgn-F_o6#%QThe~set~of~highest~order~jet~variables~is~empty!G>8(-%-je ts/nrsolveG6$F2&FB6#Fgn-%+jets/jsimpG6%-%#opG6#&FhoF]pF8%'expandGF/F/F/F/, Q/jets/Ldsolve.mF/ M7R0 I-jets/Poissonf*6'%#H1G%#H2G%"JG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by ~Mohamed~Barakat.~All~rights~reserved.GF*-%+jets/jsimpG6$-%+jets/dprodG6$-%+jet s/EulerG6%9$9'9(-%-jets/hamcharG6&9%9&F7F8F8F*F*F*F*, Q/jets/Poisson.mF* M7R0 I,jets/Takensf*6%%#_KG%&_ivarG%&_dvarG6'%"KG%%ivarG%%dvarG%"TG%%operG6#%[oCopyr ight~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8%-%,jets/mkli stG6#9%>8&-F56#9&@%32""$9#/-%%nopsG6#-F56#&9"6#""%-FD6#F9>8'FF>FO-%$mapG6$f*6#% "aGF06$%)operatorG%&arrowGF0-%$catG6$.T#9$F0F06$F,FOF9@%-%,jets/chkdopG6#FinC$> 8$Fin>8(f*6$FV%"bGF0FWF0-%,jets/subconG6%FinF7FhnF0F06$F*F3C$>Fao-%+jets/mkmatG F^o>Fcof*FeoF0FWF0-%,jets/submatGFioF0F0Fjo-Fco6$-%+jets/lddopG6&-%/jets/char2e volG6$FOF9FaoF37$-%#opG6#FO-F]qFM-%+jets/asadjG6&-%.jets/frechetmG6'FaoFOF3F9FO F3F[qQ!F0F0F0F0F0, Q.jets/Takens.mF0 M7R0 I+jets/appadf*6&%#FFG%#EEG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF)-%+jets/appmtG6&-%.jets/AdjointFG6%9$9&9'9%F 3F4F)F)F)F), Q-jets/appad.mF) M7R0 I,jets/appmatf*6$'%%operG<&%'matrixG%&arrayG%%listG%)listlistG%&lexprG6&%&_oper G%'_lexprG%#rmG%#cmG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights ~reserved.G6"C(>8$-%+jets/mkmatG6#9$>8%-%,jets/mklistG6#9%>8&-%#opG6$7$"""""#7# -FE6$FI-%%evalG6#F7>8'-FE6$7$FIFIFJ@$0FQ-%%nopsG6#F=-%&ERRORG6#%\oThe~matrix~mu st~have~as~many~columns~as~the~elements~of~the~list!G-%$mapG6$f*6#%"iGF46$%)ope ratorG%&arrowGF4-%(convertG6$-Fin6$f*6#%"jGF4F^oF4-&T%6$T(F;6#&T#F:F4F46(F/F[pF .T'F]oF;7#-%"$G6#;FHF`p%"+GF4F46(F1FQF/F=F.F77#-Fep6#;FHFCF4F4F4F4, Q.jets/appmat.mF4 M7R0 I,jets/cchlgrf*6"6(%#arG%%itrlG%%dtrlG%$lgrG%%ivarG%%dvarG6#%[oCopyright~(C)~20 00-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C)>8$-%,jets/inpcchG6#9">8%& F06#""">8&&F06#""#>8'&F06#""$>8(&F06#""%>8)&F06#""&-%+jets/jsimpG6$*&-%,jets/cc hjetG6'F6F;F@FEFJF9-&%'linalgG6#%$detG6#-%,jets/jacobiG6%F6FEFJF9FJF$F$F$F$, Q.jets/cchlgr.mF$ M7R0 I,jets/chkjacf*6%%#_HG%&_ivarG%&_dvarG6*%"HG%%ivarG%%dvarG%#_PG%#_QG%#_RG%%oper G%%pathG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6 "C+>8%-%,jets/mklistG6#9%>8&-F86#9&@%-%,jets/chkdopG6#9$>8$7#7#FD>FFFD>8'-%$map G6$f*6#%"aGF36$%)operatorG%&arrowGF3-%$catG6$.T#FDF3F36$F,FKF<>8(-FM6$f*FPF3FRF 3FUF3F36$F-FfnF<>8)-FM6$f*FPF3FRF3FUF3F36$F.F\oF<@'32""$9#-%%typeG6$&9"6#""%%'s tringG>8*f*FPF3FRF3FDF3F3F33Fco/Fio""!>F_p%)OrdEulerG>F_p%(intnormG@%32F\pFeo/F _pFgp>8+&Fjo6#""&>F]q%%NULLG-F_p6%-%+jets/jsimpG6$-%(convertG6$-FM6$f*6#%"AGF3F RF3-%+jets/dprodG6$&FD6#"""--%,jets/diffopG6%-%+jets/lddopG6&-%/jets/char2evolG 6$--Fhr6%FYT%7$-%#opG6#T'-Ffs6#&FD6#FdoFjsFhsFYFcsFdsFcs7$Fes-Ffs6#&FD6#""#F_tF 3F36(F)FFF*F6F+F<7%7%FKFfnF\o7%F\oFKFfn7%FfnF\oFK%"+G7&-Ffs6#F<-Ffs6#FK-Ffs6#Ff n-Ffs6#F\oF6FitF3F3F3F3, Q.jets/chkjac.mF3 M7R0 I.jets/colbylstf*6$'%$lstG%%listG%$refG6'%$colG%$celG%$resG%"iG%#poG6#%[oCopyri ght~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$-%/jets/colle ctedG6#9$>8%-%$mapG6$f*6#%"aGF16$%)operatorG%&arrowGF1&F86#"""F1F1F1F4>8&%%NULL G?&8'9%%%trueG@%-%'memberG6%FKF:.8(>FH6$FH&F46#FS>FH6$FH7$FK""!7#FHF1F1F1F1, Q0jets/colbylst.mF1 M7R0 I-jets/currentf*6&%"QG%"LG%%ivarG%%dvarG61%#_QG%"nG%"mG%"aG%"iG%"jG%"kG%#ikG%"M G%"SG%"AG%#ISG%"JG%#poG%#ELG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~ rights~reserved.G6"C,>8$-%,jets/mklistG6#9$>8%-%%nopsG6#9&>8&-FF6#9'>8.7#-%$seq G6$""!/8(;"""FD>8,-%$mapG6$f*6#%"xGF;6$%)operatorG%&arrowGF;7#-%#opGFAF;F;F;-%- jets/getindsG6$9%FM>8/<"?&FVFZ%%trueGC$>8--&%)combinatG6#%(subsetsG6#FV?(F;FXFX F;4&F\p6#%)finishedG>Ffo-%&unionG6$Ffo<#-&F\p6#%*nextvalueGF;>Ffo-%&minusG6$Ffo <#7"?&80FfoFioC%>82-%+jets/EulerG6'FdoFHFMFhqQ!F;>8+7#-%.jets/ind2multG6$FhqFH? (8*FXFXFDFio@$-%'memberG6%&FH6#FgrFhq.81>&FOF]s,&FasFX*(&FarF]sFX-FF6#Fhq!""-%. jets/totalderG6&-%$addG6$*&&F>6#8'FX&F[rF`tFX/Fat;FXFJ-%'subsopG6$/F_s%%NULLGFh qFHFMFXFXFOF;F;F;F;, Q/jets/current.mF; M7R0 I-jets/diagmatf*6"6+%"MG%"iG%"mG%"nG%"AG%"rG%"cG%#Z1G%#Z2G6#%fnCopyright~(C)~20 03~by~Mohamed~Barakat.~All~rights~reserved.GF$C%>8$-%+jets/mkmatG6#&9"6#"""?&8% &F86#;""#!""%%trueGC*>8&-&%'linalgG6#%'rowdimG6#F3>8'-&FH6#%'coldimGFK>8(-F56#F <>8)-FG6#FT>8*-FOFY>8+-%'matrixG6#7#-%"$G6$7#-F^o6$""!FenFE>8,-Fjn6#7#-F^o6$7#- F^o6$FcoFMFW>F3-&FH6#%,blockmatrixG6%F@F@7&F3FhnFeoFS-%%copyGFKF$F$F$F$, Q/jets/diagmat.mF$ M7R0 I+jets/dlfacf*6'%"QG%#Q_G%"lG%%ivarG%%dvarG6"6#%inCopyright~(C)~2000-2002~by~Ge hrt~Hartjen.~All~rights~reserved.GF*-%)simplifyG6#-%$mapG6$f*6#%"aGF*6$%)operat orG%&arrowGF*-%+jets/QsubsG6&T$-%-jets/partderG6&9$T&7#FAT(T*FCF*F*6*F&9%F'9&F) 9(F(9'F@F*F*F*F*, Q-jets/dlfac.mF* M7R0 I-jets/eqn2indf*6%%$eqnG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.GF(-%%subsG6%-%$mapG6$f*6#%"xGF(6$%)operatorG%&ar rowGF(/9$-%-jets/map2indG6$F8T$F(F(6$F&9%-%-jets/getdrvsG6$F89&-F/6$f*F2F(F4F(/ -F86#-%#opG6#F<F8F(F(F=FBF8F(F(F(F(, Q/jets/eqn2ind.mF( M7R0 I-jets/eqn2smbf*6%%$eqnG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.GF(-%0jets/transform1G6&9$-%-jets/getdrvsG6$F.9&- %$mapG6%%-jets/map2indGF/9%F2F(F(F(F(, Q/jets/eqn2smb.mF( M7R0 I,jets/extderf*6$%%exprG%&_ivarG6(%%ivarG%"nG%%dvarG%$resG%"iG%"jG6#%[oCopyrigh t~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$-%,jets/mklistG 6#9%>8%-%%nopsG6#F3@%2""#9#>8&-F56#&9"6#""$>FB7"@'4-%%typeG6$9$%%listGC$>8'-%$m apG6$f*6#%"aGF06$%)operatorG%&arrowGF0-%.jets/totalderG6&T$FPT%T'F0F06(F%FPF(F3 F*FBF3@%-FN6$F7FQFT-%#opG6#FT3FM/-F;6#FPF9C%>FT-%'matrixG6%F9F97#-%"$G6$7#-F`p6 $""!F9F9?(8("""FhpF9%%trueG?(8),&FgpFhpFhpFhpFhpF9FipC$>&FT6$F[qFgp-%+jets/jsim pG6$,&-Fin6&&FP6#F[q&F36#FgpF3FBFhp-Fin6&&FPFjq&F3FhqF3FB!""FB>&FT6$FgpF[q,$F_q F_r-%%copyGFdo-%&ERRORG6$FP%bowhich~is~a~1-form~should~have~as~many~elements~as ~independent~variablesGF0F0F0F0, Q.jets/extder.mF0 M7R0 I-jets/extderpf*6%%%exprG%$numG%&_ivarG6)%%ivarG%"kG%%dvarG%%jvarG%$resG%"iG%"j G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$- %,jets/mklistG6#9&@%2""$9#>8&-F76#&9"6#""%>F?7"@'-%%typeG6$9%%(integerG>8'-%-je ts/alljetsG6%FLF5F?-FJ6$FL-%%listG6#FM>FO-%-jets/jetcoorGFR>FO-F76#FL>8%-%%nops G6#FO@'4-FJ6$9$FVC$>8(-%$mapG6$f*6#%"aGF26$%)operatorG%&arrowGF2-%-jets/partder G6&T$FaoT%T'F2F26(F%FaoF)F5F+F?FO@%-FJ6$F9FVFdo-%#opG6#Fdo3F_o/-F[o6#Fao-F[o6#F 5C%>Fdo-%'matrixG6%FinFin7#-%"$G6$7#-Fhq6$""!FinFin?(8)"""F`rFin%%trueG?(8*,&F_ rF`rF`rF`rF`rFinFarC$>&Fdo6$FcrF_r-%+jets/jsimpG6$,&-F_p6&&Fao6#Fcr&FO6#F_rF5F? #F`r""#-F_p6&&FaoFbs&FOF`sF5F?#!""FdsF?>&Fdo6$F_rFcr,$FgrFjs-%%copyGFjp-%&ERROR G6$Fao%bowhich~is~a~1-form~should~have~as~many~elements~as~independent~variable sGF2F2F2F2, Q/jets/extderp.mF2 M7R0 I.jets/frechetaf*6&%&_leqnG%#_QG%%ivarG%&_dvarG6(%%leqnG%"QG%%dvarG%%DvarG%#ndG %$afrG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C *>8$-%,jets/mklistG6#9$>8%-F76#9%>8&-F76#9'@%2""%9#>8'7$-%#opG6#F@-FL6#-F76#&9" 6#""&>FIF@>8(-%%nopsGFM@$0-FZ6#F;FX-%&ERRORG6#%`oThere~must~be~as~many~characte ristic~functions~as~dependent~variablesG>8)-%+jets/appmtG6&-%.jets/frechetcG6%F 59&F@F;FeoFI@%-%%typeG6$F9%%listGF^o-FL6#F^oF2F2F2F2, Q0jets/frecheta.mF2 M7R0 I,jets/getbasf*6$%$_KMG%$slsG6*%#KMG%#nrG%#ncG%#GMG%#rkG%#zlG%#vsG%#slG6#%inCop yright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C.>8$-%+jets/mkma tG6#9$>8*7">8+9%>8%-&%'linalgG6#%'rowdimG6#F5>8&-&FD6#%'coldimGFG@$0-%%nopsG6#F ?FA-%&ERRORG6#%enThere~must~be~as~many~names~(2nd~argument)~as~matrix~rows!G>8' -&FD6#%*gausselimG6$-&FD6#%(augmentG6$F5-%&arrayG6%;"""FAF`o%)identityGFI>8(-%+ jets/grankG6#-&FD6#%*submatrixG6%FXF`o;FaoFI>8)-%-jets/zerocolG6#-Fio6%FX;FaoFd o;,&FIFaoFaoFao,&FIFaoFAFao>F;7$-%#opG6#F;-F\q6#-%$mapG6$f*6#%"iGF26$%)operator G%&arrowGF2-%(convertG6$-%$zipG6%f*6$%"aG%"bGF2FfqF2*&F9FaoF?FaoF2F2F2-Fjq6$-&F D6#%*subvectorG6%T#F9;,&T%FaoFaoFao,&F^sFaoT'Fao%%listGT)%"+GF2F26*F+FXF*FIF)FA F/F>7#-%"$G6#;,&FdoFaoFaoFaoFA>F>-%'subsopG6$-F\q6#-Faq6$f*FdqF2FfqF2/F9%%NULLG F2F2F2F_pF>7$F>F;F2F2F2F2, Q.jets/getbas.mF2 M7R0 I+jets/grankf*6#%"MG6$%"iG%#zlG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~A ll~rights~reserved.G6"C&>8$-&%'linalgG6#%'rowdimG6#9$>8%7#-%"$G6$""!-&F16#%'col dimGF4?(F+"""FBF+32F<F./-%(convertG6$-&F16#%$rowG6$F5F.%%listGF7>F.,&F.FB!""FBF .F+F+F+F+, Q-jets/grank.mF+ M7R0 I,jets/hameqnf*6&%"HG%"JG'%%ivarG%%listG%%dvarG6"6#%[oCopyright~(C)~2000-2002~b y~Mohamed~Barakat.~All~rights~reserved.GF+C$@$/9&7"-%&ERRORG6#%Vivar~should~con tain~the~time~variable~as~first~entry!G-%*jets/ezipG6$-%-jets/jetcoorG6%"""7#&F 16#F=9'-%-jets/hamcharG6&9$9%F1FAF+F+F+F+, Q.jets/hameqn.mF+ M7R0 I-jets/hamflowf*6'%"PG%"HG%"JG'%%ivarG%%listG%%dvarG6"6#%[oCopyright~(C)~2000-2 002~by~Mohamed~Barakat.~All~rights~reserved.GF,C$@$/9'7"-%&ERRORG6#%Vivar~shoul d~contain~the~time~variable~as~first~entry!G-%+jets/jsimpG6$,&-%-jets/partderG6 &9$7#&F26#"""F29(FC-%-jets/PoissonG6'F?9%9&F2FDFCFDF,F,F,F,, Q/jets/hamflow.mF, M7R0 I,jets/hamvecf*6&%"HG%"JG'%%ivarG%%listG%%dvarG6"6#%[oCopyright~(C)~2000-2002~b y~Mohamed~Barakat.~All~rights~reserved.GF+-%*jets/vzipG6$-%-jets/hamcharG6&9$9% 9&9'F7F+F+F+F+, Q.jets/hamvec.mF+ M7R0 I-jets/ind2eqnf*6%%$eqnG%%ivarG%%dvarG6#%%jvarG6#%[oCopyright~(C)~2000-2002~by~ Mohamed~Barakat.~All~rights~reserved.G6"C$@%2""$9#>8$&9"6#""%>F3-%-jets/getinds G6$9$9&-%%subsG6&-%$mapG6$f*6#%"xGF,6$%)operatorG%&arrowGF,/F<-%(convertG6$F<%' symbolGF,F,F,F3-FB6$f*FEF,FGF,/F<-F<6#-%#opG6#T$F,F,6$F&9%F=-FB6$f*FEF,FGF,/FK- %-jets/ind2mapG6$F<FXF,F,FYF3F<F,F,F,F,, Q/jets/ind2eqn.mF, M7R0 I.jets/ind2multf*6$%"JG%%ivarG6&%"iG%"jG%$mulG%&multiG6#%inCopyright~(C)~2000-2 002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C$>8'%%NULLG?&8$9%%%trueGC%>8&""!? &8%9$F6@$/F<F4>F9,&F9"""FBFB>F16$F1F9F.F.F.F., Q0jets/ind2mult.mF. M7R0 I-jets/intpartf*6%%%exprG%&_ivarG%&_dvarG67%%ivarG%%dvarG%#lvG%#lrG%#rrG%#lpG%# exG%"iG%#caG%#giG%#reG%#rvG%#slG%#svG%#flG%#arG%%pathG%#dlG%$dilG%"pG%"dG6#%inC opyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C2@$-%%typeG6$9 $%%listG-%&ERRORG6#%Jwe~do~not~expect~a~list~as~first~argumentG>8$-%,jets/mklis tG6#9%>8%-FO6#9&@$2""$9#C$>83&9"6#""%@&53-FD6$FgnFG-%-jets/sublistG6$FgnFM-%'me mberGFcoC$>8&-FO6#Fgn@$32F[oFZ-FD6$&Fin6#""&FG>84-%#opG6#F`p3F_o4-FD6$&Fgn6#""" %'symbolG>Fdp-FfpFjo@$4-%)assignedG6#Fho>Fho7"@$4-Feq6#Fdp>Fdp%%NULLG@$45-FD6$& Fin6#!""FG-Feo6$FdrFM>85Fdr>8'-%*jets/restG6$FMFho>8(7#-%"$G6#;F^q-%%nopsG6#F\s >8)-%,jets/getposG6$F\sFM>8*-%'expandG6#FF>82%%trueG>867#-Fds6$""!-Fhs6#FM?(F@F ^qF^qF@FetC&>Fet%&falseG@%-FD6$F`t%"+G>F`t-%(convertG6$F`tFG>F`t7#F`t?(8+F^qF^q -Fhs6#F`tFftC$>8--%-jets/getiordG6%&F`t6#F^vFSQ!F@@&2F\uFcvC$>8,-%'selectG6$f*6 #%"aGF@F@F@-%&evalbG6#/-Fhs6#7#-FfpFctT#F@F@6$F2Fcv-%-jets/getindsG6$FgvFS@$/-F hs6#F^wF^qC&>8.-%)simplifyG6#*&FgvF^q-FfpFexFfr>8/-%%iquoG6$,&-Fhs6#7#-Ffp6#F]y F^q-Fev6%FhxFSFivFfr""#>80-%'removeG6$f*FcwF@F@F@-Feo6$FFF]xF@F@6$F+FhoFfy@$31F ^qF_y0F]zFhqC$@%-Feq6#FjrC&>F]z7#-Ffp6$FfrF]z>81-%%sortG6$-%,jets/remainG6$FfyF ]zf*6$Fdw%"bGF@F@F@-%,jets/iorderG6%FFFQF]xF@F@6$F)FM-Feo6%-Ffp6#F]zFM.87@%/Fc[ lFhqC$>F`t-%'subsopG6$/F^v,$*&-Ffp6$F\uF]yF^q-%.jets/totalderG6&FhxF]zFMFSF^qFf rF`t>Fht-F\]l6$/Ff\l-Fjx6#,&&Fht6#Ff\lF^q*&Fa]lF^qFhxF^qF^qFhtC$>F`t-F\]l6$/F^v ,$*&&Fa]l6#-Ffp6#Fc[lF^qFc]lF^qFfrF`t>Fht-F\]l6$/Ff\l-Fjx6#,&F]^lF^q*&Fg^lF^qFh xF^qF^qFhtC%>F]z7#-Ffp6$;,$-%$minG6$F_y-FhsFd\lFfrFfrF]z>Fc[l-Fe[l6$Fg[lf*F[\lF @F@F@F]\lF@F@F`\l@%Fh\l>F`t-F\]l6$/F^v*(Fa]lF^q)FfrF]`lF^qFc]lF^qF`t>F`t-F\]l6$ /F^v*(Fg^lF^qFh`lF^qFc]lF^qF`t>FetFft2FcvF\uC$>F`t-F\]l6$/F^v-%-jets/divnormG6' FgvF\sFS7#Fdp.88F`t@$F[[lC$-Ffp6#-%*jets/ezipG6$F[t-%$mapG6$f*FcwF@6$%)operator G%&arrowGF@,&&F]xFctF^q&T%6#&T'FctF^qF@F@6(F=FjalF;FhtF.F[tFas>Fht-F\]l6$%"%GFh t>F`t-Fjx6#-FiuFeu@$F[[l-%'assignG6$FjrFhtF`tF@F@F@F@, Q/jets/intpart.mF@ M7R0 I,jets/iorderf*6%%"aG%"bG%%ivarG6$%"pG%"qG6#%inCopyright~(C)~2000-2002~by~Gehrt ~Hartjen.~All~rights~reserved.G6"C%-%'memberG6%9$9&.8$-F06%9%F3.8%@%1F5F:-%'RET URNG6#%%trueG-F>6#%&falseGF-F-F-F-, Q.jets/iorder.mF- M7R0 I,jets/natinff*6%%%_invG%&_ivarG%&_dvarG61%$invG%%ivarG%%dvarG%"nG%$teqG%$LHSG% %lvarG%%uvarG%%SUBSG%%DvarG%$INDG%%pvecG%$vecG%&pvec2G%%cvarG6#%[pCopyright~(C) ~2005-2007~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"C0>8$-%,j ets/mklistG6#9$>8%-F?6#9%>8&-F?6#9&>8'-%%nopsG6#FC@$0FM-FO6#FH-%&ERRORG6#%[oThe ~number~of~independent~and~dependent~variables~must~coincide!G>8(-%+jets/mksetG 6#-%$mapG6$f*6#%"aGF:6$%)operatorG%&arrowGF:-%%typeG6$FA%"=GF:F:F:F=@'/FZ<#%%tr ueGC$>8)-Fin6$%$lhsGF=@'3-%-jets/chkdvarG6$F[pFC/-%-jets/getindsG6%F[pFHQ!F:7"C %>8*-%;jets/get_vars_to_eliminateG6%F=FCFH>8+F[p>8,&-%-jets/nrsolveG6$F=F\q6#"" "55/9#""$3/F]r""%5/&9"6#FarFip-Fbo6$Fdr%'stringG3F`r/-Ffp6%F=FdrFhpFip-FV6#%ipT he~left~hand~sides~of~the~first~argument~are~not~admissible~abstract~names~for~ the~invariantsGC%>Faq-F?6#Fdr>FcqF=>F=&-Ffq6$FcqFaqFhq332F^rF]r0FdrFip4FgrC$>Fa qFcs@%/FZ<#%&falseGC%>F\qF]q>F=-%*jets/ezipG6$FaqF=>FcqFdq-FV6#%=Inconsistent~f irst~argument!G-FV6#%dtI'm~not~able~to~extract~abstract~names~for~the~invariant s.~Either~specify~them~as~left~hand~sides~of~the~invariants~or~specify~them~in~ a~fourtth~argumentG@'32FarF]r4-Fbo6$&Fer6#""&Fir>8--F?6#Fhu33F`rF^tF[s>F\vFcs@% /FMFiq>F\v7#%#xiG>F\v-Fin6$f*F\oF:F^oF:-%$catG6$FfvFAF:F:F:7#-%"$G6#;FiqFM@%-Fb o6$&Fer6#!""Fir>80-%/jets/xieta2vecG6$F\vFC>Fjw-F\x6$-%-jets/ind2eqnG6%F\vFCF\v FC@%Fdw>8/-%+jets/ldjetG6'Fjw-Fin6$%$rhsGF=FCFHF\v>Ffx-Fhx6&FjwFjxFCFH@%0F\v%%N ULLG>827%-%#opG6#%%vvarG-Fgy6#-%(jetcoorG6%7#-F`w6#;""!-%-jets/getiordG6$FfxF\v FCF\v-Fgy6#-F]z6%7#-F`w6#;Fiq-Fez6$FfxFHFCFH>FdyFiy?(F:FiqFiqF:-%$hasG6$Ffx-Fin 6$F^pFcqC$>Ffx-%(collectG6%-%%subsG6$FcqFfxFdy%,distributedG>Ffx-Fin6$f*F\oF:F^ oF:-Fin6$%/jets/jsimplifyGFAF:F:F:Ffx>Ffx-%$zipG6%f*6$F]o%"bGF:F^oF:@$0FAFcz7$F A7#FFF:F:F:FfxFaq-%'RETURNG6#7$-Fgy6#Fjw-Fgy6#FfxF:F:F:F:, Q.jets/natinf.mF: M7R0 I.jets/oPoissonf*6&%&func1G%&func2G%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002 ~by~Mohamed~Barakat.~All~rights~reserved.GF)C$@$0-%%nopsG6#9&"""-%&ERRORG6#%Eiv ar~contains~more~than~one~variableG-%,jets/lieappG6&-%-jets/ohamvecG6%9$F29'9%F 2F?F)F)F)F), Q0jets/oPoisson.mF) M7R0 I*jets/pDivf*6$%"PG%%ivarG6&%#_PG%%dvarG%$divG%"iG6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8&""!>8$-%,jets/mklistG6#9$@%2""# 9#>8%-F66#&9"6#""$>F>7"@$0-%%nopsG6#F4-FJ6#9%-%&ERRORG6#%eoThere~must~be~as~man y~components~in~your~current~as~independent~variables!G?(8'"""FUFL%%trueG>F1,&F 1FU-%-jets/partderG6&&F46#FT7#&FNFgnFNF>FU@%-%%typeG6$&FB6#!""%'stringGF1-%+jet s/jsimpG6%F1F>-%"@G6$%'expandG%)simplifyGF.F.F.F., Q,jets/pDiv.mF. M7R0 I1jets/proljet.oldf*6&%'vecconG'%(jetvarsG%%listG%%ivarG%%dvarG6&%#XiG%$EtaG%$c onG%"iG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6" C'>8$-%$mapG6&%-jets/ind2eqnG-%,jets/cflistG6$9$9&F>9'>8%-F76&F9-F;6$F=F?F>F?>8 &%%NULLG?&8'9%%%trueG>FG6$FG7$-%-jets/eqn2indG6%-%+jets/infinG6'FJF5FAF>F?F>F?7 #FJ7#FGF2F2F2F2, Q3jets/proljet.old.mF2 M7R0 I0jets/symtestgenf*6&%$DOPG%#roG%%ivarG%%dvarG68%#DLG%$resG%#vsG%#dsG%#rsG%#slG %"iG%#KMG%#GMG%#ncG%#nrG%#zlG%#rkG%#eqG%#elG%%ressG%%sresG%#rcG%$slsG%$sltG%#co G%$dstG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"Ci o-%)userinfoG6&""#%+symtestgenG%TSo~this~is~the~very~beginning~of~our~new~missi on...G-%%timeGFB>8)9%>847">85FQ>8%-%$mapG6$f*6#%"aGFB6$%)operatorG%&arrowGFB-%' expandG6#-9$6#&T$6#"""FBFB6$F(9'FM>8&FQ>8'FQ>8(FQ>89FQ>8*Fbo?(FBFboFboFB1F^p-%% nopsG6#FM@%/&FU6#F^p""!C%>FU-%'subsopG6$/F^p%%NULLGFU>Ffo7$-%#opG6#Ffo&FMFgp>FM -F\q6$F^qFM>F^p,&F^pFboFboFbo-FE6&FGFH%GI~am~about~to~start~coeffmatrix~now...G FJ>8+-%1jets/coeffmatrixG6#FU-FE6&FGFH%jnI~have~done~it~and~so~I~am~looking~for ~the~Gauss~elimination...GFJ>8.-FbpFbr>8--&%'linalgG6#%'coldimG6#F_r>8,-&F]s6#% *gausselimG6$-&F]s6#%(augmentG6$F_r-%&arrayG6%;FboFgrF`t%)identityGFjr-FE6&FGFH %_oEven~this~could~be~done~and~so~I~am~calculating~the~submatrix~now...GFJ-FE6& FGFH%6ready~for~the~rank...GFJ>80-%+jets/grankG6#-&F]s6#%*submatrixG6%FbsF`t;Fb oFjr-FE6&FGFH%ASo~now~it~is~time~for~zerocol...GFJ>8/-%-jets/zerocolG6#-F^u6%Fb s;FboFit;,&FjrFboFboFbo,&FjrFboFgrFbo-FE6&FGFH%Oputting~the~vector~into~the~rig ht~shape~now...GFJ>Ffo7$Fbq-Fcq6#-FW6$f*6#F0FBFfnFB-%(convertG6$-%$zipG6%f*6$Fe n%"bGFBFfnFB*&F]oFboFNFboFBFBFB-F]w6$-&F]s6#%*subvectorG6%T#F]o;,&T%FboFboFbo,& F`xFboT'Fbo%%listGT)%"+GFBFB6*F2FbsF3FjrF4FgrF/FM7#-%"$G6#;,&FitFboFboFboFgr>FM -F\q6$-Fcq6#-FW6$f*F[wFBFfnFB/F]oF_qFBFBFBFguFM>FU-F\q6$-Fcq6#-FW6$f*F[wFBFfnFB FeyFBFBFBFguFU-FE6&FGFH%CStart~reduction~modulo~equation...GFJ>81-F]o6#&FdoFao> 82,&-%$rhsG6#FbzFbo-%$lhsGF[[l!""-%'assignG6$%$RedGf*FZFBFfnFB-Fjn6#-%-jets/jre duceG6&F]xF]oT&T(FBFB6(F7FbzF'9&F(Fdo>83-FW6$f*FZFBFfnFB-Fb[l6#F]oFBFBFBFU>86-F W6$f*FZFBFfnFB@'-%%typeG6$F]oFex-F]w6$-FW6$f*FZFBFfnFB@%/-F]o6#%"uG-Fg[l6&F]xFd ]lFi[lFj[lF]o-%"@G6$Fb[lF]oFBFB6(F7F]xF'Fi[lF(Fj[l-F]w6$F]oFcxFexFc]lF]oFi]lFBF BF[\lFM-FE6&FGFH%C...looking~for~new~dependencies...GFJ>F^pFbo?(FBFboFboFB1F^p- Fbp6#F^\l@%/&F^\lFgpFhpC%>F^\l-F\q6$F^qF^\l>Fjo7$-Fcq6#Fjo&Fe\lFgp>Fe\l-F\q6$F^ qFe\l>F^pFjqF[r>F_r-FarFf^lFcr>FgrFe^l>FjrF[s>FbsFcsFbtFet>FitFjtFcu>FguFhuFav> Fjo7$F`_l-Fcq6#-FW6$f*F[wFBFfnFB-F]w6$-F`w6%f*FcwFBFfnFBFewFBFBFBFfwFdxFexFBFB6 *F2FbsF3FjrF4FgrF<Fe\lFgx>Fe\l-F\q6$-Fcq6#-FW6$f*F[wFBFfnFBFeyFBFBFBFguFe\l>F^\ l-F\q6$-Fcq6#-FW6$f*F[wFBFfnFBFeyFBFBFBFguF^\l>F_r-Far6#7$-FcqFbr-FcqFf^l>FgrF[ s>Fbs-&F]s6#%*gaussjordG6#-&F]s6#%*transposeGF`s-FE6&FGFHFhr-F[u6#Fbs>Fbs-F^u6% FbsF`t;,&FhrFboFboFbo-&F]s6#%'rowdimGF`s>87Fe\l?(F^pFboFbo-Fbp6#Fjcl%%trueGC$>8 8-F]w6$-%$colG6$FbsF^pFcx@$/&Fadl6#;FdclF^[l7#-Fix6$Fhp,&FgrFboFhrF^[l>Fjcl-F\q 6$/F^p-F]w6$-F`w6%f*FcwFBFfnFBFewFBFBFB-F]w6$&Fadl6#;FboFhrFcxFMFexFjcl-FE6&FGF H%C...really~starting~with~Frechet...GFJ-FE6&FGFH%TFrechet~completed~and~now~up ~to~the~second~round...GFJ>FU-FW6$f*FZFBFfnFB-Fjn6#-Fcq6#-%+jets/EulerG6%*&F]xF boF]oFboFi[lFj[lFBFB6(F8FgzF'F\\lF(FdoF^\l>F^pFbo?(FBFboFboFB1F^p-Fbp6#Fe\l@%Fe pC)>FP7$-Fcq6#FPFi^l>FUF[q>F^\lF\_l>Fho7$-Fcq6#FhoFb_l>F\p7$-Fcq6#F\p&FjclFgp>F e\lFd_l>Fjcl-F\q6$F^qFjcl>F^pFjq-FE6&FGFH%I...and~so~I~go~into~coeffmatrix~agai n...GFJ>F_rF`r>FgrFhr>FjrF[s-FE6&FGFH%Wout~of~the~matrix~and~right~into~the~Gau ss~eliminationGFJ>FbsFcs-FE6&FGFH%XAfter~the~Gauss~we~have~almost~completed~our ~mission...GFJ>FitFjt>FguFhu>FP7$Fjgl-Fcq6#-FW6$f*F[wFBFfnFB-F]w6$-F`w6%f*FcwFB FfnFBFewFBFBFBFfwFdxFexFBFB6*F2FbsF3FjrF4FgrF9F^\lFgx>Fho7$F`hl-Fcq6#-FW6$f*F[w FBFfnFB-F]w6$-F`w6%f*FcwFBFfnFBFewFBFBFBFfwFdxFexFBFBFj`lFgx>F\p7$Fdhl-Fcq6#-FW 6$f*F[wFBFfnFB-F]w6$-F`w6%f*FcwFBFfnFBFewFBFBFBFfwFdxFexFBFB6*F2FbsF3FjrF4FgrF= FjclFgx>Fe\l-F\q6$-Fcq6#-FW6$f*F[wFBFfnFBFeyFBFBFBFguFe\l>Fjcl-F\q6$-Fcq6#-FW6$ f*F[wFBFfnFBFeyFBFBFBFguFjcl7)FfoFjoFhoF\pFe\lFjclFPFBFBFBFB, Q2jets/symtestgen.mFB M7R0 I,jets/trncmpf*6%%&_trn1G%&_trn2G%&_ivarG6&%%ivarG%%dvarG%%trn1G%%trn2G6#%[oCop yright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$-%,jets/mk listG6#9&@%2""$9#>8%-F46#&9"6#""%>F<7">8&-F46#9$>8'-F46#9%-%+jets/jsimpG6$-%*je ts/ezipG6$-%$mapG6$%$lhsGFK-%,jets/aprolfG6&FF-FV6$%$rhsGFKF2F<F<F/F/F/F/, Q.jets/trncmp.mF/ M7R0 ICjets/F1coorByDegreeEliminationStepf*6&%%_kerG%(_lstOldG%%ivarG%%uvarG6.%"nG%" qG%&ujvarG%"iG%"jG%"kG%%lstIG%'lstOldG%"aG%"bG%$kerG%)lstFoundG6#%XCopyright~(C )~2007~by~Arne~Lorenz.~All~rights~reserved.G6"C6>8.9$>8&-%-jets/jetcoorG6%"""9& 9'>8+9%>FF-%$mapG6&%(collectGFFF>%,distributedG>FF-FJ6$f*6#F2F86$%)operatorG%&a rrowGF8-FJ6$f*6#F3F8FSF8-%&coeffG6$T$F<F8F86$F2F<T#F8F86$F,F>FF>8$-%%nopsG6#F;> 8/-FJ6&FLF;F>FM>Fao-FJ6$f*FRF8FSF8-FJ6$f*FYF8FSF8FZF8F8FhnFinF8F8FjnFao>Fao-FJ6 $f*6#F-F8FSF87$-%#opG6#-%'subsopG6$/F<FB7#-%"$G6$""!Fin-Fbp6#&T%6#F<F8F86&F*F\o F5Fao7#-Fjp6#;FB-F^o6#Fao>Fao7$-FbpFhq-Fbp6#-FJ6$f*FRF8FSF87$Fip-FbpFaqF8F86$F* F\oFF-%)userinfoG6%FB<$%4jets/F1coorByDegreeG%/F1coorByDegreeG%>starting~the~el imination~stepG>Fao&-%(convertG6$-&%'linalgG6#%*gaussjordGFhq%)listlistG6#;FBF\ o-Fer6%FBFgr%&done.G>F;-FJ6$f*F_pF8FSF8@$0&&FinFaq6#;,&F`qFBFBFB!""7#-Fjp6$F\q, &-F^o6#FbtFBF`qFft&T'FaqF8F86(F5FaoF*F\oF4F;Fcq>Fao-FJ6$f*FRF8FSF8@$0&F<6#;,&Fi nFBFBFBFft7#-Fjp6$F\q,&-F^oFaqFBFinFftFfuF8F8FcrFao@$32""%9#-%%typeG6$&9"6#Fft% *procedureGC%-Fer6%FBFgr%8using~the~generic~pointG>Fao-%%subsG6$-FJ6$f*F_pF8FSF 8/&FgnFaq-FgvFaqF8F86$F(FD7#-Fjp6#;FB-F^o6#FDFao-Fer6&FBFgr%:solutions~to~be~ex pected:G-&Fbs6#%%rankGFhq>8*7"?(8'FBFBFgq%%trueGC$@$/-Fdx6#7$-Fbp6#-FJ6$f*6#F.F 8FSF8FbtF8F86$F5FaoFhx&Fao6#F[y,&-F^o6#FhxFBFBFB>Fhx7$-FbpF^zF[y-Fer6%FBFgrFhx> F;-FJ6$f*F_pF8FSF8FbtF8F86$F4F;FhxOF;F8F8F8F8, QEjets/F1coorByDegreeEliminationStep.mF8 M7R0 I+jetsA/initf*6"F$6#%fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserv ed.GF$-%*jets/initG6#9"F$F$F$F$, Q-jetsA/init.mF$ M7R0 I)jets/Divf*6$%"PG%%ivarG6&%#_PG%%dvarG%$divG%"iG6#%inCopyright~(C)~2000-2002~b y~Gehrt~Hartjen.~All~rights~reserved.G6"C(>8&""!>8$-%,jets/mklistG6#9$@%2""#9#> 8%-F66#&9"6#""$>F>7"@$0-%%nopsG6#F4-FJ6#9%-%&ERRORG6#%eoThere~must~be~as~many~c omponents~in~your~current~as~independent~variables!G?(8'"""FUFL%%trueG>F1,&F1FU -%.jets/totalderG6&&F46#FT7#&FNFgnFNF>FU@%-%%typeG6$&FB6#!""%'stringGF1-%+jets/ jsimpG6%F1F>-%"@G6$%'expandG%)simplifyGF.F.F.F., Q+jets/Div.mF. M7R0 I+jets/Qsubsf*6&%"QG%%exprG%%ivarG%%dvarG6#%#_QG6#%inCopyright~(C)~2000-2002~by ~Gehrt~Hartjen.~All~rights~reserved.G6"C%>8$-%,jets/mklistG6#9$@$0-%%nopsG6#F0- F86#9'-%&ERRORG6#%HQ~must~have~as~many~components~as~dvar!G-%+jets/jsimpG6$-%%s ubsG6$-%$mapG6$f*6#%"iGF-6$%)operatorG%&arrowGF--%#opG6#7$-FQ6#-FH6$f*6#%"aGF-F MF-/F4-%.jets/totalderG6&&T#6#T&7#-FQF3T(T*F-F-6*F*T'FLF4F'F`oF(F\o-%-jets/geti ndsG6$T$7#&F\oF3/Fho&FboF3F-F-6*F&9%F(F<F*F0F'9&7#-%"$G6#;"""F:F\pF<F-F-F-F-, Q-jets/Qsubs.mF- M7R0 I,jets/addconf*6%%%vec1G%%vec2G%%ivarG6#%%dvarG6#%[oCopyright~(C)~2000-2002~by~ Mohamed~Barakat.~All~rights~reserved.G6"C%@&5/9$""!/F17"-%'RETURNG6#9%5/F8F2/F8 F4-F66#F1@%2""$9#>8$&9"6#""%>FC%%NULLG-%.jets/gcollectG6%7$-%#opGF=-FOF79&FCF,F ,F,F,, Q.jets/addcon.mF, M7R0 I+jets/chainf*6&%%exprG%"iG%&_itrlG%%ivarG6(%%itrlG%&oivarG%#_iG%#poG%%dvarG%%I jacG6#%[oCopyright~(C)~2000-2003~by~Mohamed~Barakat.~All~rights~reserved.G6"C(> 8$-%,jets/mklistG6#9&@%-%%typeG6$&F56#"""%"=GC%-%$mapG6$%$lhsGF5>8%-FD6$%.jets/ funcnameG%"%G>F5-FD6$%$rhsGF5>FH7"@'33-F<6$9%%(integerG1F@FX1FX-%%nopsG6#9'>8&F X-%'memberG6%FXFH.8'>F[oF`o-%&ERRORG6$%evThe~second~argument~must~be~either~an~ integer~between~1~and~nops(ivar)~or~an~old~independent~variable~provided~the~tr ansformation~list~(=third~argument)~is~in~the~subs~notation.~But~got:GFX@%32""% 9#4-F<6$&9"6#""&%'stringG>8(F^p>FdpFR@%32FapFjo-F<6$&F_p6#!"#Fbp>8)&F_p6#!"">F_ q-%-jets/ijacobiG6%F5FinFdp-%+jets/dprodG6$-%(convertG6$-&%'linalgG6#%$colG6$F_ qF[o%%listG-FD6$f*6#%"bGF26$%)operatorG%&arrowGF2-%.jets/totalderG6&T$9$T&T'F2F 26(F%F`sF(FinF.FdpFinF2F2F2F2, Q-jets/chain.mF2 M7R0 I-jets/chkcnt1f*6%%%_trnG%%ivarG%%dvarG6$%$trnG%$ordG6#%[oCopyright~(C)~2000-20 02~by~Mohamed~Barakat.~All~rights~reserved.G6"C%>8$-%,jets/mklistG6#9$>8%-%-jet s/getiordG6$-%$mapG6$%$rhsGF09&@)32""!F62"""-%%nopsG6#F>-%&ERRORG6#/%\ra~non~ge ometric~contact~transformation~exists~due~to~B|_ycklund's~theorem~for~one~depen dent~variable~only!~But~dvarGF>2FDF6-FI6$%[sa~non~geometric~contact~transformat ion~is~due~to~B|_ycklund's~theorem~of~order~one,~but~found~in~trn~jets~of~order ~higher~than~oneG-%-jets/getindsG6$F0F>/F6FDC%>F0-%-jets/prolcchG6&F0FD9%F>@&2F DF7-FI6$%[ta~non~geometric~contact~transformation~is~due~to~B|_ycklund's~theore m~of~order~one,~but~found~in~the~_prolonged_~trn~jets~of~order~higher~than~oneG FQ32""$9#-%%typeG6$&9"6#""%%'symbolG-%'assignG6$FaoF0%%trueG%&falseGF-F-F-F-, Q/jets/chkcnt1.mF- M7R0 I,jets/chkcntf*6%%%_trnG%%ivarG%%dvarG6$%$trnG%$ordG6#%fnCopyright~(C)~2003~by~ Mohamed~Barakat.~All~rights~reserved.G6"C%>8$-%,jets/mklistG6#9$>8%-%-jets/geti ordG6$-%$mapG6$%$rhsGF09&@)32""!F62"""-%%nopsG6#F>%&falseG2FDF6FH/F6FDC%>F0-%-j ets/prolcchG6&F0FD9%F>@&2FDF7-%'RETURNG6#FH32""$9#-%%typeG6$&9"6#""%%'symbolG-% 'assignG6$FgnF0%%trueGF_oF-F-F-F-, Q.jets/chkcnt.mF- M7R0 I-jets/chkdvarf*6$%$lstG%%ivarG6#%"fG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Ba rakat.~All~rights~reserved.G6"@%2""#9#C$?&8$-%,jets/mklistG6#9$%%trueG@$543-%%t ypeG6$F2%)functionG-F=6$-%#opG6$""!F2%'symbolG-%'memberG6$FB9%-%'RETURNG6#%&fal seG-FL6#F7C$?&F2F3F7@$543/-FC6#F2F2-F=6$F2FF-FH6$F2FJFKFOF+F+F+F+, Q/jets/chkdvar.mF+ M7R0 I-jets/coltermf*6#%%lgrpG6(%#iiG%$lDIG%%tgrpG%&grpDIG%$temG%%tsumG6#%>Copyright ~(c)~1997~by~Khai~VuG6"C(@$/-%%nopsG6#9$""!-%'RETURNGF5>8&-%(convertG6$F6%$setG >8$F7>8%-%&tableGF/?(F/"""FGF/0F;<"C'>FA,&FAFGFGFG>8'-%#opG6$FGF;>F;-%'subsopG6 $/FG%%NULLGF;>8(-%'selectG6%f*6$%%gdi1G%%gdi2GF/F/F/@%/&F66#FG&9%F^o%%trueG%&fa lseGF/F/F/F;FN@%/FYFI>&FC6#FAFNC%>8),&-F=6$-%$mapG6$f*6#%$gdiGF/F/F/&F66#""#F/F /F/FY%"+GFG&FNFepFG>Ffo7$&FNF^oFjo>F;-%&minusG6$F;FY-F=6$FC%%listGF/F/F/F/, Q/jets/colterm.mF/ M7R0 I+jets/esubsf*6%%$relG%%exprG%%lvarG6#%*myunapplyG6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.G6"C%>8$f*F,6$%&fnameG%&snameGF,F,@%-%% typeG6$&9"6#"""%)functionGC&>F/-%#opG6$""!F8>8%-%(convertG6$F/%'symbolG-%(unapp lyG6$-FD6#-F@6#F8&F96#;""#!""-%%subsG6$/FDF/%"%G-FJ6#F9F,F,F,@%2FS9#-%$mapG6$f* 6#%"aGF,6$%)operatorG%&arrowGF,@%-F66$-%$lhsG6#9$F</-F@6$FBFeo-T#6$-%$rhsGFgo-F @6#Feo/Feo-F]p6$F_pT&F,F,6&F)F/F'9&-%,jets/mklistGFgo-Fjn6$f*F]oF,F_oF,@%FcoFio FhoF,F,6$F)F/Fip-%%evalG6$9%FYF,F,F,F,, Q-jets/esubs.mF, M7R0 I-jets/eulprolf*6&%"QG%"LG%%ivarG%%dvarG6"6#%inCopyright~(C)~2000-2002~by~Gehrt ~Hartjen.~All~rights~reserved.GF)-%+jets/jsimpG6$,&-%)jets/DivG6%-%-jets/curren tG6&9$9%9&9'F8F9"""-%+jets/dprodG6$F6-%+jets/EulerG6%F7F8F9F:F9F)F)F)F), Q/jets/eulprol.mF) M7R0 I0jets/genvec.oldf*6%%$lfnG%%lparG'%%lvarG%%listG6*%&_lvarG%&ldvarG%&fxvecG%%_l fnG%$parG%$GenG%(LievecsG%'symvecG6#%[oCopyright~(C)~2000-2003~by~Mohamed~Barak at.~All~rights~reserved.G6"C)@%3/-%%nopsG6#9&""$-%%typeG6$&F=6#F>F)C'@$5/&F=6#" """"!/FH7"-%'RETURNG6#FK>8%-%$mapG6$f*6#%"aGF56$%)operatorG%&arrowGF5&9$6$""#FJ F5F5F5FH>8'-%+jets/esubsG6$Fgn-FT6$f*FWF5FYF5&FgnFIF5F5F5FH>8$&F=6#Fin>8&FBC&>F RF=>F[o-%,jets/mklistG6#Fgn>FdoF=>FhoFM>8)-%$zipG6%f*6$%#exG%$varGF5F5F5@%-F@6$ Fgn%"=G*&-%$rhsGF^pFJ-%%DiffG6$-%$_PPG6#9%FgqFJ*&FgnFJFaqFJF5F5F5F[oFR>Fbp-%'ex pandG6#-%(convertG6$Fbp%"+G>8*%%NULLG?&8(Fgq%%trueGC)@%4-F@6$Fer%)functionGC$>8 +-%+jets/jsimpG6%-%1jets/coefficientG6$FbpFerFR%'factorG>Fbp-Fas6$,&FbpFJ*&F_sF JFerFJ!""FRC$>F_s-Fas6%-%-jets/deptermGFesFRFfs>Fbp-Fas6$,&FbpFJF_sF\tFR@$/F_sF K\@$4-F@6$&9"6#F\t%'stringG@$-F@6$F_s%"*G>F_s-%'selectG6%%$hasGF_sFdo>F_s-F[r6# F_s>F_s-%/jets/conDif2opGF]v>Fbr6$Fbr-%-jets/simpconG6$F_sFR@$3-%)assignedG6#&% *infolevelG6#%'genvecG2FKF[wC$-%&printG6$%*parameterGFer-FbwF]v@$0FbpFKC$-Fbw6# -%%subsG6$Fho7#Fbr-%&ERRORG6$%8Cannot~handle~the~rest:GFbpF[xF5F5F5F5, Q2jets/genvec.old.mF5 M7R0 I;jets/get_vars_to_eliminatef*6%%$invG%%ivarG%%dvarG6#%%jvarG6#%foCopyright~(C) ~2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"@%54-%)assigne dG6#%Bjets/get_vars_to_eliminate_methodG/F3%1jets/getSolveVarG-F56%9$9%9&C$>8$- %-jets/getindsG6%F8F:Q!F,&-%.jets/sortjetsG6%F=F9F:6#;,$-%%nopsG6#F8!""FLF,F2F, F,, Q=jets/get_vars_to_eliminate.mF, M7R0 I-jets/getindff*6$%$eqnG%&_dvarG6#%%dvarG6#%[oCopyright~(C)~2000-2002~by~Mohame d~Barakat.~All~rights~reserved.G6"C%@%2"""9#>8$-%,jets/mklistG6#9%>F27"@$32""#F 04-%%typeG6$&9"6#""$%'stringG-%&ERRORG6#%\qexpects~as~a~second~argument~dvar~(n ot~ivar!).~If~a~third~argument~is~given,~it~must~be~a~string.G-%(convertG6$-%'s electG6$f*6#%"aGF+6$%)operatorG%&arrowGF+4-%'memberG6$-%#opG6$""!9$T#F+F+6$F(F2 -%$mapG6%%-jets/gettypeG-%'indetsG6$Fhn<$%)functionG%(indexedGFdo%%listGF+F+F+F +, Q/jets/getindf.mF+ M7R0 I,jets/ichfncf*6&'%$trnG%%listG%%funcG%%ivarG%%dvarG6%%%lvarG%%nvarG%%trnsG6#%[ oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$7$-%#o pG6#9&-F76#9'>8%-%$mapG6$%$lhsG9$>8&-F@6$%$rhsGFC-%%subsG6$-%*jets/ezipG6$F4F>- %,jets/apptrnG6%FE9%&9"6#;""$!""F1F1F1F1, Q.jets/ichfnc.mF1 M7R0 I,jets/inf2MFf*6&%$vecG%%ivarG%%uvarG%%wvarG6"6#%fnCopyright~(C)~2005~by~Mohame d~Barakat.~All~rights~reserved.GF)C$-%$mapG6$f*6#%"aGF)6$%)operatorG%&arrowGF)/ ,$9$!""""!F)F)F)-%+jets/jsubsG6'-%*jets/ezipG6$9&9'-%.jets/vec2charG6%F89%FAFFF AFB@%-%%typeG6$&9"6#F9%'stringG-%(convertG6$%"%G%"DG-FP6$-%-jets/ind2eqnG6%FRFF FBFSF)F)F)F), Q.jets/inf2MF.mF) M7R0 I,jets/inpcchf*6"6-%$narG%%ivarG%%dvarG%%exprG%"iG%$trnG%"nG%"mG%"kG%%itrlG%%dt rlG6#%[oCopyright~(C)~2000-2003~by~Mohamed~Barakat.~All~rights~reserved.GF$C.>8 $9#@%43-%%typeG6$&9"6#!""%'stringG/F=Q!F$@'2""%F5C(>8%-%,jets/mklistG6#&F>6#,&F 5"""F@FP>8&-FK6#&F>6#F5>8'&F>6#,&F5FP!"#FP>8)%%NULLG?(8(FPFP,&F5FP!"$FP%%trueG@ $-F;6$&F>6#F[o<$%"=G%%listG>Fhn6$Fhn-%#opG6#-FK6#Fbo>Fhn7#Fhn2""#F5C&>FI-FK6#&F >6#""$@%2FhpF5>FR-FK6#&F>6#FF>FR7">FX&F>6#Fap>Fhn-FK6#&F>6#FP-%&ERRORG6#%Aat~le ast~three~arguments~needed!GC$@'FEC'>FI-FK6#FY>FRFJ>FhnFin?(F[oFPFPF\oF^o@$F`o> FhnFho>FhnF_pF`pC%>FI-FK6#Fcq@%Fjp>FRFdp>FRFaq>FhnFfqFjq>FXFC>8*-%%nopsG6#FI>8+ -Ffs6#FR>8,-Ffs6#Fhn@$2F]tFds-F[r6#%gnThere~must~be~as~many~new~independent~var iables~as~old~ones!G@$30F]t,&FdsFPFisFP4F:-F[r6#%QThere~must~be~as~many~new~var iables~as~old~ones!G&Fhn6#;FPFds>8--%$mapG6$f*6#%"aGF$6$%)operatorG%&arrowGF$/- %.jets/funcnameG6#-%$lhsG6#9$-%$rhsGFavF$F$F$%"%G&Fhn6#;,&FdsFPFPFPF]t>8.-Fcu6$ f*FfuF$FhuF$F[vF$F$F$Fev6'FauF[wFXFIFRF$F$F$F$, Q.jets/inpcch.mF$ M7R0 I-jets/intnormf*6%%%exprG%&_ivarG%&_dvarG6+%%ivarG%%dvarG%#arG%#lvG%%pathG%#dlG %$dl1G%$dl2G%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~r eserved.G6"C+@$-%%typeG6$9$%%listG-%&ERRORG6#%Jwe~do~not~expect~a~list~as~first ~argumentG>8$-%,jets/mklistG6#9%>8%-FC6#9&@$2""$9#C$>8&&9"6#""%@&53-F86$FQF;-%- jets/sublistG6$FQFA-%'memberGFgnC$>8'-FC6#FQ@$32FUFN-F86$&FS6#""&F;>8(-%#opG6#F do3FY4-F86$&FQ6#"""%'symbolG>Fho-FjoF^o@$4-%)assignedG6#F\o>F\o%%NULLG@$4-Fip6# Fho>FhoF\q@$45-F86$&FS6#!""F;-Fin6$FgqFA>8)Fgq@%-Fip6#F]rC$>8,-%-jets/divnormG6 (-%-jets/intpartG6(F:FAFGF\oFho8*FAFGF\oFho8+-%'assignG6$F]r-%+jets/jsimpG6$,&F jrFbpF[sFbpFG>Fcr-Fer6'-Fhr6'F:FAFGF\oFhoFAFGF\oFhoFcrF4F4F4F4, Q/jets/intnorm.mF4 M7R0 I-jets/lddop02f*6&%$vecG%#_HG%%ivarG%%dvarG6%%"QG%#dqG%"HG6#%[oCopyright~(C)~20 00-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@%-%,jets/chkvecG6#9$>8$-% .jets/vec2charG6%F59&9'C$>F7-%,jets/mklistGF4@$-%%typeG6$&F76#"""%"=G>F7-%$mapG 6$f*6#%"aGF/6$%)operatorG%&arrowGF/,&-%$lhsGF4FG-%$rhsGF4!""F/F/F/F7>8%-%.jets/ frechetcG6%F7F;F<@%-%,jets/chkdopG6#9%>8&-%+jets/mkmatG6#7#7#F\o>F^oF\o-%,jets/ addmatG6%-Ffo6%-%+jets/lddopG6&-%/jets/char2evolG6$F7F<-%%copyG6#F^oF;F<-%,jets /cmpdopG6&-%.jets/AdjointFG6%-Fap6#FZF;F<F`pF;F<F;-Fdp6&F`pFipF;F<F;@%Fin&%"%G6 $FGFGF_qF/F/F/F/, Q/jets/lddop02.mF/ M7R0 I-jets/map2indf*6$%$derG%%ivarG6(%&livarG%%funcG%'lindexG%%lvarG%#iiG%&sivarG6% %[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G%'systemG%) rememberG6"C%@-/-%#opG6#9$F9-%'RETURNGF8/-F76$""!F9%%diffGC'>8$%%NULLG>8%F9?(F2 """FHF2/-F76$F?FFF@C$>FC6$FC-F76$""#FF>FF-F76$FHFF>8'-F76#FF>FFFJ-%%typeG6$7#-F 76#-F76$7$F?F?F9-%%listG6#%'posintGC&>8&Fgn>FVF6>FC-%$seqG6$&7#FV6#&Fco6#8(/F^p ;FH-%%nopsG6#Fco>FF-F76#F=/Fjn%"DGC&>FVF6@$2FH-Fbp6#Fjo-%&ERRORG6$%GD~applies~t o~unary~functions,~but~got:GF9>FCFV>FFFep3/-F76$7%F?F?FHF9Fhp-Fen6$-F76$7%F?F?F QF9%(integerGC&>FVF6@$F\q-F`q6&%BD~applies~to~unary~functions,~butGF9%+depends~ onGFjo>FC-%"$G6$FVF\r>FFFep-F`q6$%.cannot~handleGF9@%2FH9#>8)-%-jets/sortvarG6$ 7#FC9%>FcsFC@)0-Fbp6#7#Fcs-Fbp6#Fgs-F`q6(%.The~variablesG-%&minusG6$<#FC<#Fcs%; are~not~contained~in~ivar:G&9"6#FQ%-appearing~inGF9/FcsFDFF2Fas""$&FF6#Fcs*&-%( convertG6$-%$mapG6$f*6#%"aGF26$%)operatorG%&arrowGF2)&Fhp6#&F96#FH&F9F\uF2F2F2- %/jets/collectedG6#-%,jets/getposG6$F^tFhs%"*GFHFFFHF2F2F2F2, Q/jets/map2ind.mF2 M7R0 I.jets/oind2eqnf*6%%$eqnG%%ivarG%%dvarG6#%%jvarG6#%[oCopyright~(C)~2000-2002~by ~Mohamed~Barakat.~All~rights~reserved.G6"C$@%2""$9#>8$&9"6#""%>F3-%-jets/getind sG6$9$9&-%%subsG6$-%$mapG6$f*6#%"xGF,6$%)operatorG%&arrowGF,/F<-%-jets/ind2mapG 6$F<T$F,F,6$F&9%F3F<F,F,F,F,, Q0jets/oind2eqn.mF, M7R0 I+jets/opdotf*6&%%lvarG%%exprG%%ivarG%%dvarG6%%#ISG%"SG%#lvG6#%inCopyright~(C)~ 2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C(@%09$""!>8&-%%sortG6$F3f*6 $%"aG%"bGF/F/F/-%,jets/iorderG6%F39%T$F/F/6$F'9&>F67">8$FF>8%-&%)combinatG6#%(s ubsetsG6#F6?(F/"""FRF/4&FJ6#%)finishedG>FH7$-%#opG6#FH-&FJ6#%*nextvalueGF/>FH-% $mapG6$f*6#%"cGF/6$%)operatorG%&arrowGF/-F86$F3f*F;F/F/F/F>F/F/6$F'FBF/F/FCFH-F \o6$f*6#%"JGF/FaoF/7$-%+jets/jsimpG6$*&-%.jets/multinomG6%T#F3T&FR-%.jets/total derG6&T(-%,jets/remainG6$FepF3FfpT*FRF^qF3F/F/6*F,F6F'FDF&FAF(9'FHF/F/F/F/, Q-jets/opdot.mF/ M7R0 I-jets/pol2eqnf*6$%$polG%&_ivarG6$%%ivarG%"dG6#%[oCopyright~(C)~2000-2002~by~Mo hamed~Barakat.~All~rights~reserved.G6"C%>8$-%,jets/mklistG6#9%@%2""#9#>8%-F16#& 9"6#""$>F97#.%"uG-%-jets/ind2eqnG6%-%-jets/pol2indG6#F=F/F9F,F,F,F,, Q/jets/pol2eqn.mF, M7R0 I-jets/prolccvf*6"6*%#arG%%itrlG%%dtrlG%$numG%%ivarG%%dvarG%&oivarG%&odvarG6#%f nCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.GF$C,@%-%%typeG6$&9 "6#!""%'stringG>8$-%,jets/inpcchG6#&F66#;"""!"#>F;-F=6#F6>8%&F;6#FB>8&&F;6#""#> 8'&F;6#""$>8*&F;6#""%>8)&F;6#""&>8(-%$mapG6$%$lhsGFH>8+-F\o6$F^oFL6'FHFL7$-%#op G6#Fjn-Ffo6#-%-jets/jetcoorG6%7#-%"$G6#;""!FQFVF`oFVFen@%F2C$-%,jets/prolcvG6#% "%G-%+jets/jsimpG6%FhpFen%'expandGFepF$F$F$F$, Q/jets/prolccv.mF$ M7R0 I+jets/prolff*6&%'_trnsfG%%jvarG%&_ivarG%&_dvarG6.%#arG%$trnG%%ivarG%%dvarG%"nG %"mG%&oivarG%&odvarG%&ojvarG%%itrlG%%dtrlG%"iG6#%[oCopyright~(C)~2000-2002~by~M ohamed~Barakat.~All~rights~reserved.G6"C.>8$-%,jets/inptrnG6&9$7"9&9'>8%&F;6#"" ">8&&F;6#""$>8'&F;6#""%>8(-%%nopsG6#FI>8)-FU6#FN>8*-%$mapG6$%-jets/ind2subGFI>8 +-Fhn6$FjnFN>8,-%%subsG6%-%*jets/ezipG6$FIFfn-Feo6$FNF\o9%>8-7#-%$seqG6$/&Ffn6# 8/-%$rhsG6#&FDFbp/Fcp;FGFS>8.7#-F^p6$/&F\oFbp-Fep6#&FD6#,&FSFGFcpFG/Fcp;FGFX-Fe o6$Fio-%,jets/cchjetG6'F[pF[qF`oFIFNF8F8F8F8, Q-jets/prolf.mF8 M7R0 I-jets/prolsysf*6&%%_sysG%%_numG%&_ivarG%&_dvarG6*%$sysG%$numG%%ivarG%%dvarG%"n G%&iivarG%#_ZG%$indG6#%[pCopyright~(C)~2004-2005~by~Mohamed~Barakat~and~Arne~Lo renz.~All~rights~reserved.G6"C)>8$-%,jets/mklistG6#9$@%-%%typeG6$9%%*nonnegintG C$>8%F@@$/FD""!-%'RETURNG6#F7>FD"""@%-F>6$F@%(numericGC%>8&-F96#9&>8'-F96#9'@$3 2""%9#4-F>6$&9"6#""&%'stringG>FX7$-%#opG6#FX-Ffo6#-F96#F^oC%>FS-F96#F@>FXFT@$32 ""$Fjn4-F>6$&F_o6#FinFbo>FX7$Feo-Ffo6#-F96#Fhp>8(-%%nopsG6#FS@%-F>6$&F_o6#!""Fb o>8)-%$mapG6$f*6#%"aGF46$%)operatorG%&arrowGF4&T#6#,$F;FjqF4F46$F,FS7#-%"$G6#;F LFaq>F\rFS>8+-F^r6$f*FarF4FcrF47#-%+jets/symchG6$,&FgrFLF;FjqT%F4F46&F+FDF/F\r7 #-F]s6#;FG,&FDFLFjqFL7$-Ffo6#-F^r6$f*6#%"bGF4FcrF4-Ffo6#-F^r6$f*FarF4FcrF4-Ffo6 #-F^r6$f*6#%"cGF4FcrF4-%.jets/totalderG6&T$F;F[tT'F4F46(FbrF;F,F[tF-FjuFiuF4F46 (FitF;F,F[tF-FjuFgrF4F46(F*F7F,FSF-FXFbs-Ffo6#-%.jets/sortivarG6%F7FSFXF4F4F4F4, Q/jets/prolsys.mF4 M7R0 I.jets/riemannKf*6$%#ggG%%dvarG6,%"mG%"RG%#ddG%#ZMG%%rieKG%$facG%"aG%"bG%"cG%"d G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C*>8$- &%'linalgG6#%'coldimG6#9$@%2""#9#>8%9%>FD-%-jets/scalarcG6$F>FE@%2F7""$>8)#!""F A>FN*&,&F7"""FPFTFP,&F7FT!"#FTFP>8&f*6$%"xG%"yGF4F4F4@%/F>FEFT""!F4F4F4>8'-%'ma trixG6%F7F7Fin>8(7#-%$seqG6$7#-Fco6$-%%copyG6#F[o/8*;FTF7/8+F]p?(8,FTFTF7%%true G?(8-FTFTF7Fbp?(F\pFTFTF7Fbp?(F_pFTFT,&F\pFTFPFTFbpC$>&&F`o6$F\pF_p6$FapFdp-%)s implifyG6#*(FNFTFDFT,&*&&F>6$F\pFdpFT-FX6$FapF_pFTFT*&&F>6$F_pFdpFT-FX6$FapF\pF TFPFT>&&F`o6$F_pF\pF]q,$FjpFP-%+jets/mkmatG6#F`oF4F4F4F4, Q0jets/riemannK.mF4 M7R0 I/jets/riemannS2f*6$%#ggG%%dvarG6+%"mG%"RG%#ZMG%%rieSG%$facG%"aG%"bG%"cG%"dG6#% [oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)>8$-&%'l inalgG6#%'coldimG6#9$@%2""#9#>8%9%>FC-%-jets/scalarcG6$F=FD>8(,$*$,&*$F6F@"""F6 !""FPFP>8&-%'matrixG6%F6F6""!>8'7#-%$seqG6$7#-Fen6$-%%copyG6#FR/8);FOF6/8*F_o?( 8+FOFOF6%%trueG?(8,FOFO,&FcoFOFPFOFdo?(F^oFOFOF6Fdo?(FaoFOFO,&F^oFOFPFOFdoC&>&& FX6$F^oFao6$FcoFfo-%)simplifyG6#*(FJFOFCFO,&*&&F=6$F^oFfoFO&F=6$FcoFaoFOFO*&&F= 6$FaoFfoFO&F=6$FcoF^oFOFPFO>&F^p6$FfoFco,$F]pFP>&&FX6$FaoF^oF`pFcq>&FfqFbqF]p-% +jets/mkmatG6#FXF3F3F3F3, Q1jets/riemannS2.mF3 M7R0 I,jets/trninvf*6$%%_trnG%&_ivarG6/%#arG%$trnG%%ivarG%&_dvarG%%dvarG%$varG%$ordG %%jvarG%$i2_G%#x_G%$x2_G%%var_G%$solG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Ba rakat.~All~rights~reserved.G6"C2@%2""#9#>8'&9"6#""$>F>%%NULLG>8$-%,jets/inptrnG 6&9$7"9%F>>8%&FF6#""">8&&FFFA>8(&FF6#""%>8)7$-%#opG6#FS-Fhn6#FV>8*-%-jets/getio rdG6$FNFV>8,FK@(32""!F]o2FQ-%%nopsGF[o-%&ERRORG6#/%\ra~non~geometric~contact~tr ansformation~exists~due~to~B|_ycklund's~theorem~for~one~dependent~variable~only !~But~dvarGFV2FQF]o-F[p6$%[sa~non~geometric~contact~transformation~is~due~to~B| _ycklund's~theorem~of~order~one,~but~found~in~trn~jets~of~order~higher~than~one G-%-jets/getindsGF`o/F]oFQC'>FN-%-jets/prolfinG6&FNFQFSFV@$2FQF^o-F[p6$%[ta~non ~geometric~contact~transformation~is~due~to~B|_ycklund's~theorem~of~order~one,~ but~found~in~the~_prolonged_~trn~jets~of~order~higher~than~oneGFcp>8+-%-jets/je tcoorG6%FQFSFV>Fbo-%$mapG6$f*6#%"aGF76$%)operatorG%&arrowGF7/FJ-%(convertG6$FJ% 'symbolGF7F7F7Faq>FN-Fgq6$f*FjqF7F\rF7/-%$lhsG6#FJ-%%subsG6$T#-%$rhsGF[sF7F76$F 0FboFN>8--Fgq6$%-jets/ind2subGFen>8.-%*jets/ezipG6$FenFds>FN-Fgq6$f*FjqF7F\rF7F hrF7F76$F2FisFN>8/7$-Fhn6#Fds-Fhn6#-Fgq6$FasFbo>80-%-jets/nrsolveG6$FNFct@%2FBF <>Fen7$-Fhn6#Fen-Fhn6#Faq>FctFds-Fhn6#-Fgq6$f*FjqF7F\rF7-F[t6$F_s-Fgq6$Fas-%.je ts/srtbylstG6$FJT%F7F76&F-FenF3FctF\uF7F7F7F7, Q.jets/trninv.mF7 M7R0 I+jets/weyl2f*6$%#ggG%%dvarG6-%"mG%$rieG%%rie2G%$ricG%"RG%%rieFG%%rieKG%#ZMG%%W eylG%"aG%"bG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserve d.G6"C.>8$-&%'linalgG6#%'coldimG6#9$@$32F8""%0&9"6#!""Q&checkF5-%'RETURNG6#-%$m apG6$f*6#F1F56$%)operatorG%&arrowGF5-FN6$f*6#F2F5FRF5-%%copyG6#-%'matrixG6#7#-% "$G6$7#-F[o6$""!T#FaoF5F56$F(Fao7#-F[o6#;"""FaoF5F56$F(F87#-F[o6#;FgoF8@%532""# 9#FD2""$Fbp>8%9%>Ffp-%-jets/riemannG6$F?Fgp>8&-%.jets/riemann2G6%F?FfpQ!F5>8'-% ,jets/ricci2G6#Ffp>8(-%-jets/scalarcG6%F?FcqFaq>8)-%/jets/riemannF2GF[r>8*-%/je ts/riemannK2G6%F?FhqFaq>8+-Fgn6%F8F8F`o>8,7#-%$seqG6$7#-F]s6$-FZ6#Ffr/8-F\p/8.F \p?(FesFgoFgoF8%%trueG?(FgsFgoFgo,&FesFgoFHFgoFisC$>&Fjr6$FesFgs-%)simplifyG6#- %&evalmG6#,(&F]qF_tFgo&F]rF_tFH&FarF_tFH>&Fjr6$FgsFes-Fdt6#,$F^tFH-%+jets/mkmat G6#FjrF5F5F5F5, Q-jets/weyl2.mF5 M7R0 I-jets/alljetsf*6%%$numG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.GF(-%-jets/jetcoorG6%7#-%"$G6#;!""9$9%9&F(F(F(F(, Q/jets/alljets.mF( M7R0 I,jets/cchcmpf*6%%&_trn1G%&_trn2G%&_ivarG6&%%ivarG%%dvarG%%trn1G%%trn2G6#%[oCop yright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$-%,jets/mk listG6#9&@%2""$9#>8%-F46#&9"6#""%>F<7">8&-F46#9$>8'-F46#9%-%+jets/jsimpG6$-%*je ts/ezipG6$-%$mapG6$%$lhsGFK-%,jets/cchjetG6&FF-FV6$%$rhsGFKF2F<F<F/F/F/F/, Q.jets/cchcmp.mF/ M7R0 I,jets/cchinvf*6$%%_trnG%&_ivarG60%$trnG%%ivarG%%dvarG%"nG%"mG%$ordG%&nivarG%&n dvarG%%jvarG%&sjvarG%&njvarG%'snjvarG%%lvarG%$solG6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.G6"C0>8$-%,jets/mklistG6#9$>8%-F=6#9%@% 32""#9#4-%%typeG6$&9"6#""$%'stringG>8&-F=6#FN>FT7">8'-%%nopsG6#FA>8(-Ffn6#FT>8* -%$mapG6$%$lhsG&F;6#;"""FZ>8+-F_o6$Fao&F;6#;,&FZFeoFeoFeo,&FZFeoFinFeo@%-%-jets /chkcnt1G6&F;FAFT.F;C&>8,-%-jets/jetcoorG6%FeoFAFT>8--F_o6%%(convertGFfp%'symbo lG>8.-%-jets/alljetsG6%FeoF]oFgo>8/-F_o6$%-jets/ind2subGFaqC&>FfpFX>F[qFX>Faq-F cq6%""!F]oFgo>FfqFgq>F;-F_o6$f*6#%"aGF86$%)operatorG%&arrowGF8/-%%subsG6$-%*jet s/ezipG6$T'T)-FaoF>-F]s6$-F`s6$T#T%-%$rhsGF>F8F86*F0FfpF1F[qF2FaqF3FfqF;>80-F_o 6$%#opG7%FAFTF[q>81-%-jets/nrsolveG6$F;F_t@$3343-FL6$&FO6#!""FR/-%+searchtextG6 $Q$allF8F`uF`r-FL6$Fet%$setG2Feo-Ffn6#Fet>Fet<#&Fet6#Feo@$43F^u2F`rFdu>F_t7$-Fb tFgn-FbtF[o-Fbt6#-F_o6$f*FfrF8FhrF8-F]s6%FgsF_s-%.jets/srtbylstG6$F?T+F8F86,F3F fqF2FaqF1F[qF0FfpF4F_tFetF8F8F8F8, Q.jets/cchinv.mF8 M7R0 I,jets/cchjetf*6"6+%#arG%%itrlG%%dtrlG%%exprG%%ivarG%%dvarG%&oivarG%&odvarG%&oj varG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C-> 8$-%,jets/inpcchG6#9">8%&F36#""">8&&F36#""#>8'&F36#""$>8(&F36#""%>8)&F36#""&>8* -%$mapG6$%$lhsGF9>8+-FT6$FVF>>8,7%-%#opG6#FR-Fin6#FX-Fin6#-%-jets/getindsG6$FCF X-%+jets/prolcG6'F9F>FfnFHFM-%+jets/jsimpG6$-%%subsG6$%"%GFCFMF$F$F$F$, Q.jets/cchjet.mF$ M7R0 I-jets/deptermf*6$%%expnG%%funcG6"6#%>Copyright~(c)~1997~by~Khai~VuGF'@'-%%type G6$9$%"+G-%'selectG6%f*6$%"tG%&fnameGF'F'F'-%$hasG6$F.9%F'F'F'F.-%#opG6$""!F:-F 86$F.F;F.F>F'F'F'F', Q/jets/depterm.mF' M7R0 I-jets/fin2inff*6#%&trnsfG6,%$epsG%%ivarG%%dvarG%%lvarG%#trG%#lsG%#arG%$infG%"i G%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6" C,>8(-%,jets/mklistG6#9$@%2"""9#>8$&9"6#""#>F@.%(epsilonG@%2FDF>C$>8%-F86#&FB6# ""$@%2FQF>>8&-F86#&FB6#""%>FU7"C$>FLFfn>FUFfn>8'-%-jets/alljetsG6%F=FLFU@&-%%ty peG6$&F66#F=%"=GC&>8)-%$mapG6$%$lhsGF6>F6-Fjo6$%$rhsGF6@$-%-jets/chklvarG6$Fho. 8*@(3/-%%nopsG6#FfpF=/F>F=>F@&FfpFdo0FjpF=-%&ERRORG6$Ffp%Eyou~gave~more~than~on e~lhs~argument!G0F_qF@-Fbq6$Feq%Rthe~lhs~argument~and~your~second~argument~diff er!G@$32-F[q6#F[o-F[q6#F60Fho-%.jets/srtbylstG6$FhoF[o@&-Fcp6#Fho>F[oFho-Fcp6$F hoQ!F3>F[o-Fjo6$f*6#%"aGF36$%)operatorG%&arrowGF3-%#opG6$""!F:F3F3F3Fho2F>FQ-Fb q6#%]sCannot~guess~the~variables.~Please~insert~them~as~left~hand~sides~in~your ~transformation~list~or~as~a~third~(and~fourth)~argument!G@$F[r-Fbq6$/%8too~few ~variables~givenGF[o/%:need~at~least~nops(trnsf)GF^r>8+-%%evalG6$-%%diffG6$F6F@ /F@Fgs>8-%%NULLG?(8,F=F=-F[q6#Fdt%%trueG>F]u6$F]u7$&Fdt6#F`u7#&F[oFhu@%30-F[q6# FLFgs0-F[q6#FUFgs-%.jets/gcollectG6%7#F]uFLFUFfvF3F3F3F3, Q/jets/fin2inf.mF3 M7R0 I/jets/find2multf*6%%%funcG%%ivarG%%dvarG6$%#poG%$resG6#%[oCopyright~(C)~2000-2 002~by~Mohamed~Barakat.~All~rights~reserved.G6"C%@'-%'memberG6%-%#opG6$""!9$9&8 $>8%-%.jets/ind2multG6$7#-F46#F79%-F16%F7F8F9>F;-F=6$7"FBC$>F9F6>F;F7@$2""$9#-% 'assignG6$&9"6#""%F9F;F-F-F-F-, Q1jets/find2mult.mF- M7R0 I/jets/frechetapf*6&%%leqnG%"QG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~ Mohamed~Barakat.~All~rights~reserved.GF)-%.jets/frechetaG6$-%-jets/eqn2indG6%9$ 9&9'&9"6#;""#!""F)F)F)F), Q1jets/frechetap.mF) M7R0 I,jets/gengenf*6&%%_objG%$symG%&_ivarG%&_dvarG6M%$objG%%ivarG%%dvarG%"nG%"mG%%l varG%(GEO_OBJG%)ONE_SIDEG%%dfvcG%#vfG%&fivarG%&fdvarG%&vfcmpG%&vfvarG%&charsG%& fjvarG%%nidtG%%sidtG%(cmpjvarG%'cmpvarG%&fjvecG%&fxvecG%$cndG%'sfdvarG%'SfdvarG %'sfivarG%(ldfeqnsG%%lfndG%%TYPEG%#LDG%&ldobjG%$redG%)ldfeqns1G%(sfdvar1G%(Sfdv ar1G%'ffivarG%&sleqnG%'osleqnG%%exprG%&oexprG%%avarG%%jvecG%'symconG6#%[oCopyri ght~(C)~2000-2003~by~Mohamed~Barakat.~All~rights~reserved.G6"CW>8%-%,jets/mklis tG6#9&>8&-Ffn6#9'>8'-%%nopsG6#FZ>8(-Fao6#Fjn>8)7$-%#opGFbo-F[pFfo>8$-%-jets/eqn 2indG6%-Ffn6#9$FZFjn>8,-%,jets/defvecG6&9%FZFjn&9"6#;""&!"">8-&Ffp6#""">8.&Ffp6 #""#>8/&Ffp6#""$@%/Fbq""!C$>807">81FfrC$>Fer-%$mapG6$f*6#%"aGFW6$%)operatorG%&a rrowGFW&FdpFdqFWFWFWFbq>Fhr-F\s6$f*F_sFWFasFW&Fdp6$FjqFeqFWFWFWFbq>82-%.jets/ve c2charG6%FbqFZFjn>83-%.jets/sortjetsG6&-%-jets/getindsG6$FerFjnFZFjnQ!FW>84-F\s 6$%.jets/funcnameGF\r>85-F\s6%%(convertGFjt%'symbolG>86-F\s6$%-jets/ind2subGFat >877$-F[p6#Fho-F[p6#Feu>88-%*jets/ezipG6$FatFeu>89-Fcv6$FeuFat>8?-F\s6%f*6$%"fG %"lGFWFasFW-Fdp6#-F[p6#FjpFWFWFWFjnFZ>8*%%trueG>8+%&falseG@=5-%,jets/chkstrG6%F jpQ$jetFW;FeqF_r-F^x6%FjpQ'0-formFW;Feq""'C%>8@F`x>FiwFgw>8Af*F_sFWFasFW-%+jets /ldjetG6&T#FdpT%T'FWFW6(F3FbqF+FZF,Fjn55-F^x6%FjpQ"DFWFeq-F^x6%FjpQ$srcFWFax-F^ x6%FjpQ'1-ffrmFWFexC&>FixF\z>FiwFgw@$0-Fao6#F^pFeo-%&ERRORG6#%[tDistinguished~s ymmetries~are~only~defined~for~source~forms!~A~source~form~(=first~argument)~mu st~have~as~many~components~as~dependent~variables!G>F\yf*F_sFWFasFW-%+jets/ldsr cGF`yFWFWFdy5-F^x6%FjpQ$fnlFWFax-F^x6%FjpQ'0-ffrmFWFexC%>FixFb[l@$2FeqFez-Fhz6# %gnA~functional~(=first~argument)~must~have~only~one~component!G>F\yf*F_sFWFasF W-F\s6&-%"@G6$F[p%&EulerG-%+jets/ldfnlGF`yFbyFcyFWFWFdy5-F^x6%FjpQ$frmFWFax-F^x 6%FjpQ'1-hfrmFWFexC%>FixF]]l@$0FezF`o-Fhz6#%ipA~(horizontal)~1-form~(=first~arg ument)~must~have~as~many~components~as~independent~variables!G>F\yf*F_sFWFasFW- %+jets/ldfrmGF`yFWFWFdy5-F^x6%FjpQ$lgrFWFax-F^x6%FjpQ'n-hfrmFWFexC%>FixF\^l@$Fi [l-Fhz6#%`oA~(horizontal)~n-form~(=first~argument)~must~have~only~one~component !G>F\yf*F_sFWFasFW-%+jets/ldlgrGF`yFWFWFdy5-F^x6%FjpQ$vecFWFax-F^x6%FjpQ#vfFW;F eqFjqC$>FixF]_l>F\yf*F_sFWFasFW-%+jets/ldvecGF`yFWFWFdy55-F^x6%FjpQ$chrFWFax-F^ x6%FjpQ%charFW;Feq""%-F^x6%FjpQ%evolFWF``lC&>FixF\`l>FiwFgw@$Fdz-Fhz6#%bpA~char acteristic~(=first~argument)~must~have~as~many~components~as~dependent~variable s!G>F\yf*F_sFWFasFW-%+jets/ldchrGF`yFWFWFdy-F^x6%FjpQ&dop20FW;FeqF_qC$>FixFbal> F\yf*F_sFWFasFW-%-jets/lddop20GF`yFWFWFdy-F^x6%FjpQ&dop11FWFcalC$>FixF\bl>F\yf* F_sFWFasFW-%-jets/lddop11GF`yFWFWFdy-F^x6%FjpQ'dop1_1FWFexC$>FixFebl>F\yf*F_sFW FasFW-%.jets/lddop1_1GF`yFWFWFdy-F^x6%FjpQ&dop02FWFcalC$>FixF^cl>F\yf*F_sFWFasF W-%-jets/lddop02GF`yFWFWFdy-F^x6%FjpQ$dopFWFaxC$>FixFgcl>F\yf*F_sFWFasFW-%+jets /lddopGF`yFWFWFdy55-F^x6%FjpQ"CFWFeq-F^x6%FjpQ$cnsFWFax-F^x6%FjpQ%consFWF``lC&> FixFedl>FiwFgw@$Fdz-Fhz6#%dtConservation~characterisitics~are~implemented~for~s ource~forms~only!~A~source~form~(=first~argument)~must~have~as~many~components~ as~dependent~variables!G>F\yf*F_sFWFasFW-%+jets/EulerG6%-%+jets/dprodG6$Fdp-F^t 6%FayFbyFcyFbyFcyFWFWFdyC&>FixQ$eqnFW>FfwFjw>FiwFgw>F\yf*F_sFWFasFWF^yFWFWFdy@$ 4Ffw@%3-%%typeG6$F^p%)listlistG/FezFeqC$>F^p&F^pFdq>8HF^pC&@$3-%)assignedG6#&%* infolevelG6#%'gengenG/FeglF`qC$>8I-F\s6$f*F_sFWFasFW@%-Fffl6$Fdp%"=G-%'expandG6 #-%&numerG6#,&-%$lhsGFcpFeq-%$rhsGFcpF`qFdpFWFWFWF^p>F\hl-F\s6%%-jets/LDsolveG- %-jets/ind2eqnG6%F\hlFZFjnFjv>F^gl-F\s6$f*F_sFWFasFW@%FahlFdhlFdpFWFWFWF^p>F^gl -F\s6%%-jets/LdsolveGF^glFjn@$Fagl-%&printG6#/.,&F\hlFeqF^glF`q-%)simplifyG6#Fe jl@$Fiw>F^p-F\s6$f*F_sFWFasFW@%Fahl-FehlFihlFdpFWFWFWF^p@$Fbfl>F^p-F\s6$f*F_sFW FasFW-%+jets/jsimpG6%FdpFay-Fb\l6$-Fb\l6$FehlFhhlFgjlFWFW6$F,FjnF^p>8B-F\yFfz>F ^\m-%-jets/getcmpnG6&F^\mFixFZFjn@$3Fbgl2FbrFegl-Fajl6#%=Calculate~defining~equ ationsG@$FbflC$>8Cf*6#FP6#%$resGFWFWC&@$FaglC%>Fay-%.jets/oind2eqnG6%FdpFbyFcy> Fay-%3desolv/clearderdepG6%FayT)T+>Fay-F`pFiel>F^p-%%subsG6$-Fcv6$T-T/-%-jets/j reduceG6'-F`p6%F]^mFbyFcy-Fc^m6$-Fcv6$Fh^mFg^mFdpFbyFcyFht@$Fagl-Fajl6#/%,oexpr ~-~resG-Fgjl6#,&FayFeqF^pF`qF^pFWFW60FQ8KF+FZF,FjnFNF^glFEFjvF;F_uF:Fjt>F^\m-F\ s6$F]]mF^\m>8:-%-jets/getcondG6&F^\mF\rFZFjn>8>-%+jets/mksetG6#&F``mFdq>8=&F``m Fiq>8;&F``mF^r>8<-Fg`m6#F^am>8E-Fc^m6$FavF\r>8F-Fg`m6#Feam>8D%%NULLG?&8JF^\mFgw C)@$/-Ff[m6$F`bmFjnFbr\>8L-%*jets/restG6$7$Fjo-F[p6#-Fft6%F`bmFjnFhtFgq@%0FhbmF frC$>8M-F\s6$f*F_sFWFasFW/Fdp-FhuFcpFWFWFWFhbm>F`bm-%+jets/csubsG6%Fecm7$F`bmFh bmF\r>F`bmF_dm>8N7#-%-jets/jcoeffsG6#-F[p6#F`bm@$0FavFfr>Fbdm-F]dm6%FavFbdmF\r@ $Fe\m-Fajl6#-%$catG6$%8#~defining~equations~:~G-Fao6#Fbdm>F]bm6$F]bm-F[pFfem>F] bm<#F]bm>F]bm-F\s6%%+jets/rmfacGF]bmFaam-%&minusG6$F]bmFe`m-Fafm6$Fe`mF]bm-Fafm 6$-Fg`m6#F[am-Fg`m6#-Fc^m6$FavFgq-Fafm6$FifmFgfm-Fafm6$FiamFaam-Fafm6$FaamFiam@ $Fe\m-Fajl6#-Fbem6$%A#~defining~equations~in~total~:~G-Fao6#Fe`m@$Fe\m-Fajl6#-F bem6#%3#~start~convertingG>Fe`m-Fbu6$-Fbu6$Fe`m%%listG%%diffG@$Fe\m-Fajl6#-Fbem 6#%1#~end~convertingG>Fe`m-%,jets/eqsortGFjgm7&Fe`mF[amF^am7%-%/jets/xieta2vecG 6$-Fc^m6$FavFerFhrFjuFfvFWFWFWFW, Q.jets/gengen.mFW M7R0 I0jets/getallindsf*6#%%_eqnG6#%$eqnG6#%fnCopyright~(C)~2005~by~Mohamed~Barakat. ~All~rights~reserved.G6"C$@%-%%typeG6$9$%&arrayG>8$-%,jets/mklistG6#F0>F3F0-%(c onvertG6$-%'indetsG6$F3%(indexedG%%listGF*F*F*F*, Q2jets/getallinds.mF* M7R0 I,jets/ichlgrf*6"6*%#arG%%itrlG%%dtrlG%$lgrG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchlgrG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichlgr.mF$ M7R0 I+jets/jsimpf*6$%%exprG%%dvarG6%%$cmdG%$indG%%_indG6#%[pCopyright~(C)~2000-2005 ~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"C&@%2""#9#>8$&9"6#" "$@%-%)assignedG6#%._jsimpDefaultG>F4F=>F4%)simplifyG>8%-%-jets/getindsG6$9$9%> 8&-%$mapG6%%(convertGFB%'symbolG-%%subsG6$-%*jets/ezipG6$FIFB-F46#-FP6$-FS6$FBF IFFF-F<F-F-, Q-jets/jsimp.mF- M7R0 I2jets/kroneckermatf*6$%#_AG%#_BG6'%"AG%"BG%"rG%"cG%"ZG6#%fnCopyright~(C)~2003~ by~Mohamed~Barakat.~All~rights~reserved.G6"C(>8$-%+jets/mkmatG6#9$>8%-F46#9%>8& -&%'linalgG6#%'rowdimG6#F2>8'-&F@6#%'coldimGFC>8(-%'matrixG6#7#-%"$G6$7#-FQ6$"" !-FG6#F8-F?FX-&F@6#%,blockmatrixG6%F=FE-%$mapG6$f*6#%"aGF/F/F/C$-%)simplifyG6#- %&evalmG6#*&T#"""F6Fho@%/%"%GFVT%F[pF/F/6&F)F8F,FK-Fjn6$%#opG-%(convertG6$F2%)l istlistGF/F/F/F/, Q4jets/kroneckermat.mF/ M7R0 I,jets/liecomf*6%%%vec1G%%vec2G%%ivarG6+%%dvarG%#DEG%$cmdG%$varG%&svec1G%&svec2 G%&pvec1G%&pvec2G%"iG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~right s~reserved.G6"C,@%2""$9#>8$-%,jets/mklistG6#&9"6#""%>F;7"@%32FBF9-%%typeG6$&F@6 #""&<%%"=G-%%listG6#FO-%$setGFR>8%FK>FVFD@%3FG4-FI6$&F@6#!""FN>8&Fgn>F[o%)simpl ifyG>8'7$-%#opG6#9&-Fbo6#F;>8(-%-jets/sortconG6$9$F_o>8)-Fjo6$9%F_o@%0F;FDC$>8* -%+jets/prolvG6&Fho-%-jets/getindsG6$FapF;FdoF;>8+-Fhp6&F^p-F[q6$F\pF;FdoF;C$>F fpFho>F^qF^p@$0FVFDC$>Ffp-%$mapG6$f*6#%"bGF46$%)operatorG%&arrowGF47$-%-jets/jr educeG6'T#&F\p6#"""T&T'F]o&F\p6#""#F4F46(F*FVF'FdoF)F;Ffp>F^q-F[r6$f*F^rF4F`rF4 FcrF4F4F`sF^q-Fer6'FV7#-%$seqG6$,&-%,jets/lieappG6'Ffp&F^p6$8,FjrFdoF;F[oFjr-F] t6'F^q&FhoF`tFdoF;F[oFin/Fat;Fjr-%%nopsG6#F_oFdoF;F[o-%*jets/vzipG6%%"%GF_oQ!F4 F4F4F4F4, Q.jets/liecom.mF4 M7R0 I.jets/liederivf*6&%$vecG%%exprG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by ~Mohamed~Barakat.~All~rights~reserved.GF)-%,jets/liederG6&9$-%-jets/eqn2indG6%9 %9&9'F4F5F)F)F)F), Q0jets/liederiv.mF) M7R0 I,jets/lstvecf*6%%&_pvecG%%ivarG%%dvarG6+%%pvecG%&jivarG%&sivarG%&jdvarG%&sdvar G%%svecG%%fncsG%$parG%%lvarG6#%[oCopyright~(C)~2004-2005~by~Mohamed~Barakat.~Al l~rights~reserved.G6"C,>8$-%-jets/eqn2indG6%9$9%9&>8%-%-jets/getindsG6$F7F<>8&- %$mapG6$%-jets/ind2subGF?>8'-%.jets/sortjetsG6%-FA6$F7F=F<F=>8(-FF6$FHFJ>8)-%%s ubsG6%-%*jets/ezipG6$F?FD-FZ6$FJFQF7>8*-FF6$f*6#%"aGF46$%)operatorG%&arrowGF4&F ;6#"""F4F4F4FU>8+-FF6$%#opG7$F=FQ@%5/FU""!/FU7">8,F`p>Fbp-FF6$f*F]oF4F_oF4&F;6$ ""#FdoF4F4F4FU@%-%%typeG6$&9"6#!""%'stringG6%-%,jets/genvecG6&FinFfoFbpQ!F4Fbp- FZ6$FDF?6%-Feq6%FinFfoFbpFbpFhqF4F4F4F4, Q.jets/lstvec.mF4 M7R0 I.jets/nkillingf*6#%%lmatG6'%#iiG%#jjG%#kkG%$numG%"KG6#%[oCopyright~(C)~2000-20 02~by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8'-%%nopsG6#9$>8(-%'matrixG6$F 1F1?(8$"""F=F1%%trueG?(8%F<F=F1F>C$>&F76$F<F@-%$addG6$-%&evalmG6#-%#&*G6$-&%'li nalgG6#%$rowG6$&F56#F<8&-&FP6#%$colG6$&F56#F@FV/FV;F=F1>&F76$F@F<FC-%%copyG6#F7 F.F.F.F., Q0jets/nkilling.mF. M7R0 I*jets/sadjf*6$%"HG%%ivarG6%%%dvarG%&oper1G%&oper2G6#%[oCopyright~(C)~2000-2002 ~by~Mohamed~Barakat.~All~rights~reserved.G6"C&@%32""#9#4-%%typeG6$&9"6#""$%'str ingG>8$-%,jets/mklistG6#F8>F>7"@%-F66$&F96#!""F<>8%f*6#%"aGF-6$%)operatorG%&arr owGF-9$F-F-F-@%-%,jets/chkdopG6#FR>FKf*FMF-FOF--%,jets/mulconG6%#"""F2FRT$F-F-6 $F&9%>FKf*FMF-FOF--%,jets/mulmatGFenF-F-Fin@%FT>8&f*6$FN%"bGF-FOF--%,jets/addco nG6%FRFjnFhnF-F-Fin>Faof*FcoF-FOF--%,jets/addmatGFgoF-F-Fin-FK6#-Fao6$FR-%.jets /AdjointFG6%FRFjnF>F-F-F-F-, Q,jets/sadj.mF- M7R0 I,jets/subs01f*6$%%_relG%%exprG6,%$relG%(rel_lhsG%(rel_rhsG%%consG%$lirG%$licG% "iG%"pG%"cG%#zzG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~res erved.G6"C0>8$-%,jets/mklistG6#9$@%2""#9#>8'-F96#&9"6#""$>FA7">8%-%$mapG6$%$lhs GF7>8&-FM6$%$rhsGF7>8(%%NULLG>8)FW?(8*"""Ffn-%%nopsG6#F7%%trueGC$>8+-%,jets/get posG6$&FK6#FenFA@&/Fao&FQFboC$>FV6$FV/FenFW@$/F]oFW>FA7$-%#opG6#FAFao0F]oFW>FY6 $FYF[p>FA-%'subsopG6$FYFA>F7-FM6$F_p7$-Ffp6$FVF7-%*jets/ezipG6$FAFA>FKFL>FQFR>8 ,-FhnF`p>8-7#-%"$G6$""!Fdq-FM6$f*6#F.F46$%)operatorG%&arrowGF4-%%subsG6$-F_q6$T #-Fer6$-F_q6$T%-Ffp6$/F;FfnT'T)T,F4F46,F)FKF+FAF1FgqF*FQF&9%7#-Fjq6#;FfnFdqF4F4 F4F4, Q.jets/subs01.mF4 M7R0 I1jets/symtestdifff*6&%"LG%#roG%%ivarG%%dvarG6.%#DLG%$resG%#vsG%#dsG%#slG%"iG%# KMG%#GMG%#ncG%#nrG%#zlG%#rkG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~ rights~reserved.G6"CI-%)userinfoG6&""#%,symtestdiffG%TSo~this~is~the~very~begin ning~of~our~new~mission...G-%%timeGF8>8(9%>8%FC>8&7">8'FI>8)"""?(F8FNFNF81FM-%% nopsG6#FC@%/&FF6#FM""!C%>FF-%'subsopG6$/FM%%NULLGFF>FH7$-%#opG6#FH&FCFW>FC-Ffn6 $FhnFC>FM,&FMFNFNFN-F;6&F=F>%GI~am~about~to~start~coeffmatrix~now...GF@>8*-%1je ts/coeffmatrixG6#FF-F;6&F=F>%jnI~have~done~it~and~so~I~am~looking~for~the~Gauss ~elimination...GF@>8--FRF\p>8,-&%'linalgG6#%'coldimG6#Fio>8+-&Fgp6#%*gausselimG 6$-&Fgp6#%(augmentG6$Fio-%&arrayG6%;FNFapFjq%)identityGFdp-F;6&F=F>%_oEven~this ~could~be~done~and~so~I~am~calculating~the~submatrix~now...GF@-F;6&F=F>%6ready~ for~the~rank...GF@>8/-%+jets/grankG6#-&Fgp6#%*submatrixG6%F\qFjq;FNFdp-F;6&F=F> %ASo~now~it~is~time~for~zerocol...GF@>8.-%-jets/zerocolG6#-Fhr6%F\q;FNFcr;,&Fdp FNFNFN,&FdpFNFapFN-F;6&F=F>%Oputting~the~vector~into~the~right~shape~now...GF@> FH7$F\o-F]o6#-%$mapG6$f*6#F/F86$%)operatorG%&arrowGF8-%(convertG6$-%$zipG6%f*6$ %"aG%"bGF8FgtF8*&9$FNFDFNF8F8F8-F[u6$-&Fgp6#%*subvectorG6%T#Feu;,&T%FNFNFN,&F`v FNT'FN%%listGT)%"+GF8F86*F1F\qF2FdpF3FapF.FC7#-%"$G6#;,&FcrFNFNFNFap>FC-Ffn6$-F ]o6#-Fct6$f*FftF8FgtF8/FeuFinF8F8F8FasFC-F;6&F=F>%C...really~starting~with~Frec het...GF@@%/-FR6#9'FN>8$7#-%-jets/list2opG6%-%.jets/frechetcG6%Feu9&F]xFgxF]x>F _x-%,jets/mat2opG6%-F]o6#-F[u6$Fdx%)listlistGFgxF]x-F;6&F=F>%TFrechet~completed ~and~now~up~to~the~second~round...GF@>FF-Fct6#f*6#FbuF8FgtF8-%'expandG6$-F]o6#- %+jets/EulerG6%-F]o6#-F]v6#FeuT&T(-Ffn6$-F]o6#-Fct6$f*FftF8FgtF8FewF8F8F8FdvT+F 8F86,F*F_xF'FgxF(F]xF4FasF+FF>FMFN?(F8FNFNF8FP@%FUC%>FFFen>FK7$-F]o6#FKF_o>FCFa o>FMFdo-F;6&F=F>%I...and~so~I~go~into~coeffmatrix~again...GF@>FioFjo>FapFbp>Fdp Fep-F;6&F=F>%Wout~of~the~matrix~and~right~into~the~Gauss~eliminationGF@>F\qF]q- F;6&F=F>%XAfter~the~Gauss~we~have~almost~completed~our~mission...GF@>FcrFdr>Fas Fbs>FK7$Fg[l-F]o6#-Fct6$f*FftF8FgtF8-F[u6$-F^u6%f*FauF8FgtF8FduF8F8F8FfuFdvFevF 8F8FfvFgv>FC-Ffn6$-F]o6#-Fct6$f*FftF8FgtF8FewF8F8F8FasFC7%FHFKFCF8F8F8F8, Q3jets/symtestdiff.mF8 M7R0 I+jets/tpderf*6&%%funcG%&_lvarG%%ivarG%%dvarG6#%%lvarG6#%[oCopyright~(C)~2000-2 002~by~Mohamed~Barakat.~All~rights~reserved.G6"C$>8$-%,jets/mklistG6#9%@'/F07"9 $3/-%%nopsG6#F0"""4-%'memberG6$&F06#F>9&-%-jets/partderG6#9"-%.jets/totalderGFH F-F-F-F-, Q-jets/tpder.mF- M7R0 I.jets/vec2evolf*6%%%vconG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.GF(-%-jets/simpconG6%-%*jets/vzipG6$-%%subsG6$- %$zipG6%f*6$%"xG%"yGF(6$%)operatorG%&arrowGF(/9$&9%6#"""F(F(F(-%+jets/xietaG6$F A9&-%-jets/sortconG6$F?7$-%#opG6#FA-FM6#FG-%-jets/charactGFFFGFGFGF(F(F(F(, Q0jets/vec2evol.mF( M7R0 I+jets/Eulerf*6%%%exprG%%ivarG%%dvarG6+%$eulG%%heulG%#dvG%#jcG%#reG%%jcorG%"JG% "iG%"jG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C$ @$-%%typeG6$9$%%listG-%&ERRORG6#%Jwe~do~not~expect~a~list~as~first~argumentG@%3 32""$9#-F86$&9"6#""%F;0FH7"C'>8*FH@$3-%)assignedG6#&%*infolevelG6#%&EulerG2""!F V-%&printG6#/%:Euler:~higher~Euler~indexGFP>8%%%NULLG?&8&9&%%trueGC)@$FR-Fgn6#/ %:Euler:~dependent~variableGF_o>8$-%-jets/partderG6&F:&F_o6#-%#opG6#FP9%F`o>8)- %-jets/getindsG6$F:7#F_o@$FR-Fgn6#/%?Euler:~list~of~jet~coordinatesGFdp?&8'FdpF aoC%@$FR-Fgn6#/%6Euler:~jet~coordinateGF_q>8(-%,jets/remainG6$7#-F`p6#F_qFP@$0F gqFM>Fio,&Fio"""*()!""-%%nopsG6#FgqFbr-%.jets/multinomG6%F[rFPFbpFbr-%.jets/tot alderG6&-F[p6&F:7#F_qFbpF`oFgqFbpF`oFbrFbr@$FR-Fgn6#/%1Euler:~done~withGFdp@%-F 86$&FI6#Fer%'stringG>F\o6$F\oFio>F\o6$F\o-%'expandG6#-%+jets/jsimpG6$FioF`o7#F\ o@%Fhs-%.jets/OrdEulerG6&F:FbpF`oQ!F4-Fjt6%F:FbpF`oF4F4F4F4, Q-jets/Euler.mF4 M7R0 I+jets/F1dimf*6'%#_RG%%_numG%&_ivarG%&_DvarG%%_varG6.%"RG%$numG%$posG%%ivarG%%D varG%%wvarG%%uvarG%&juvarG%$InvG%#rdG%3generic_point_procG%#rkG6#%fnCopyright~( C)~2005~by~Mohamed~Barakat.~All~rights~reserved.G6"C/@%-%%typeG6$9%%'posintG>8% F?>FB"""@%-F=6$&9"6#""#%(numericG>8&FD>FN""!>8'-%,jets/mklistG6#&FI6#,&FKFDFNFD >8(-FT6#&FI6#,&""$FDFNFD@%-%,jets/chkvecG6#9$C%>8*-FT6#&FI6#,&""%FDFNFD>8$-%-je ts/eqn2indG6%F_oFRFZ>Fjo-%$mapG6$f*6#%"aGF96$%)operatorG%&arrowGF9,$F_o!""F9F9F 9-%.jets/vec2charG6%FjoFRFboC'>8)Fco@%29#""&@%/-%%nopsG6#F_qFD>Fbo7#%"uG>Fbo-F` p6$f*FcpF9FepF9-%$catG6$F[rF_oF9F9F97#-%"$G6#;FDFfq>Fbo-FT6#&FI6#,&FcqFDFNFD>Fj o-F`p6$f*FcpF9FepF9@%-F=6$F_o%"=G,&-%$lhsGF^oFD-%$rhsGF^oFipF_oF9F9F9-FTF^o>Fjo -F\p6%FjoFRF_q>Fjo-%%subsG6$-%*jets/ezipG6$F_qFboFjo>8+-%-jets/jetcoorG6%7#-Fer 6#;FPFBFRFbo>8,-%/jets/F1coorMatG6'FjoFRFZFboFbo>8--&%'linalgG6#%'rowdimG6#F`u@ &-F=6$&FI6#Fip%*procedureG>8.F_v-F=6$&FI6#!"#Fav>FcvFfv@$-%)assignedG6#FcvC$-Fd t6$Fgt-F`p6$Fcv7#-Fer6#;FD-Fgq6#Fgt>F`u-Fat6$%"%GF`u>F`u-&Fhu6#%*gausselimGF[v> 8/-%+jets/grankGF[v,&FeuFDFcxFipF9F9F9F9, Q-jets/F1dim.mF9 M7R0 I,jets/cchdopf*6"62%$repG%#arG%%itrlG%%dtrlG%$dopG%%ivarG%%dvarG%#jmG%#jdG%&ire pSG%&trepTG%&oivarG%&odvarG%"nG%&ndvarG%$Z_ZG6#%[oCopyright~(C)~2000-2002~by~Mo hamed~Barakat.~All~rights~reserved.GF$C1@'3334-%%typeG6$&9"6#""#<$%"=G-%%listG6 #FF-F?6$FAFH5/-%%nopsG6#FAFD3/FN""$-F?6$&FA6#FS%'stringG4-%,jets/chkdopGFPC$>8$ FA>8%-%,jets/inpcchG6$&FB6#"""&FB6#;FS!""333F>-F?6$&FBFWFH2""&9#5/-FO6#FjoFD3/F `pFS-F?6$&FjoFWFXC$>FhnFjo>Fjn-F\o6$&FB6#;F`oFD&FB6#;""%FdoC$>Fhn7$F`oF`o>Fjn-F \o6#FB>8&&FjnF_o>8'&FjnFC@%-Fen6#&FjnFW>8(-%+jets/mkmatG6#7#7#Fbr>FdrFbr>8)&Fjn 6#Fbq>8*&Fjn6#F\p@%3-F?6$&Fhn6#FdoFX2""!-%+searchtextG6$Q#adF$FgsC&>8+-%,jets/j acobiG6%FjqF\sF`s>8,-%+jets/jsimpG6$-&%'linalgG6#%$detG6#FatF`s@%-%,jets/chkscl G6#&FhnFC>8-*&FftFdoFduF`o>Ffu-%&evalmG6#Fgu@%-Fbu6#&FhnF_o>8.*&FftF`oF_vFdo>Fa v-Fju6#*&FftF`o-Fht6%F_vF`sf*6#%"aGF$F$F$-%)simplifyG6#-&F\u6#%(inverseG6#9$F$F $F$F`oC$@%F]v>Ffu*$F_vFdo>Ffu-&F\u6#%*transposeG6#-Fht6%F_vF`sf*FjvF$F$F$F\wF$F $F$@%Fau>FavFdu>Fav-F[xFcu>8/-%$mapG6$%$lhsGFjq>80-Fix6$F[yF]r>81-&F\u6#%'coldi mG6#Fdr>82-Fix6$f*FjvF$6$%)operatorG%&arrowGF$-%$catG6$.T#FdwF$F$6$F5837#-%"$G6 #;F`oFay-%.jets/frechetcG6%-%,jets/cchjetG6'Fjq7$-%#opG6#F]r-Fc[l6#-%*jets/ezip G6$FhyFhy-%+jets/appmtG6&FdrFhyFgx7$-Fc[l6#F]y-Fc[l6#FhyF\s7$-Fc[l6#F`sF`\lF\sF hy@$4/FavF`o-%,jets/cmpdopG6&Fav%"%GF\sF`s@$4/FfuF`o-Fi\l6&F[]lFfuF\sF`s@%F`r&F []l6$F`oF`o-%%copyG6#F[]lF$F$F$F$, Q.jets/cchdop.mF$ M7R0 I,jets/cchfrmf*6"6,%#arG%%itrlG%%dtrlG%$frmG%%ivarG%%dvarG%"nG%#jmG%%nfrmG%$res G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C.>8$- %,jets/inpcchG6#9">8%&F46#""">8&&F46#""#>8'-%,jets/mklistG6#&F46#""$>8(&F46#""% >8)&F46#""&>8*-%%nopsG6#FL@$0-FX6#FDFV-%&ERRORG6#%\oThe~1-form~must~have~as~man y~components~as~independent~variables!G>8+-%,jets/jacobiG6%F:FLFQ>8,-%,jets/cch jetG6'F:F?FDFLFQ>8--%+jets/jsimpG6$-%$mapG6$f*6#%"bGF$6$%)operatorG%&arrowGF$-% (convertG6$-F\p6$f*6#%"aGF$FapF$*&&T#6#9$F=&T%6$F`qT(F=F$F$6(F.FbqF-T'F`pF`q7#- %"$G6#;F=F^q%"+GF$F$6(F,FVF.FboF-F]o7#-Fiq6#;F=FVFQ@%-%%typeG6$FH%%listGFgo-%#o pG6#FgoF$F$F$F$, Q.jets/cchfrm.mF$ M7R0 I/jets/char2evolf*6$%'chlistG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~B arakat.~All~rights~reserved.GF'C$@$2""#9#-%&ERRORG6#%csThe~function~expects~two ~arguments,~the~second~of~which~should~be~dvar.~Probably~you~inserted~ivar~as~s econd~and~dvar~as~third~argument!G-%*jets/vzipG6%9$9%Q!F'F'F'F'F', Q1jets/char2evol.mF' M7R0 I,jets/chkstrf*6%%$lstG%$strG%$posG6#%"iG6#%[oCopyright~(C)~2000-2002~by~Mohame d~Barakat.~All~rights~reserved.G6"C$?&8$-%,jets/mklistG6#9$%%trueG@$3-%%typeG6$ F/%'stringG/-%*substringG6$F/9&9%-%'RETURNG6#F4%&falseGF,F,F,F,, Q.jets/chkstr.mF, M7R0 I,jets/comdopf*6%%&_dop1G%&_dop2G%%ivarG6&%%dop1G%%dop2G%%dvarG%$subG6#%[oCopyr ight~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@%-%,jets/chkdo pG6$9$Q!F/>8$-%+jets/mkmatG6#7#7#F5>F8F5@%-F36$9%F6>8%-F:6#7#7#FB>FDFB@%2""$9#> 8&-%,jets/mklistG6#&9"6#""%>FO7">8'-%,jets/submatG6%-%,jets/cmpdopG6&-%%copyG6# F8-F\o6#FD9&FO-Fin6&F^oF[oF`oFOF`o@%F2&FZ6$"""Ffo-F\o6#FZF/F/F/F/, Q.jets/comdop.mF/ M7R0 I*jets/ezipf*6$%#L1G%#L2G6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All ~rights~reserved.GF'-%$zipG6%f*6$%"aG%"bGF'6$%)operatorG%&arrowGF'/9$9%F'F'F'-% ,jets/mklistG6#F5-F86#F6F'F'F'F', Q,jets/ezip.mF' M7R0 I-jets/fmemberf*6$%$eqnG%$lfnG6"6#%>Copyright~(c)~1997~by~Khai~VuGF'-%'selectG6 %f*6$%"fG%#exGF'F'F'@%-%%typeG6$9$%)functionG-%$hasG6$9%-%#opG6$""!F5-F86$F:F5F 'F'F'F:F5F'F'F'F', Q/jets/fmember.mF' M7R0 I/jets/frechetopf*6%%%leqnG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moha med~Barakat.~All~rights~reserved.GF(-%.jets/frechetoG6%-%-jets/eqn2indG6%9$9%9& F2F3F(F(F(F(, Q1jets/frechetop.mF( M7R0 I-jets/getindsf*6$%%_eqnG%%dvarG6#%$eqnG6#%[oCopyright~(C)~2000-2002~by~Mohamed ~Barakat.~All~rights~reserved.G6"C$@%-%%typeG6$9$%&arrayG>8$-%,jets/mklistG6#F1 >F4F1@'/9%7"F<2""#9#@%-F/6$&9"6#""$%'stringG7$-%#opG6#-%'selectG6$f*6#%"xGF+6$% )operatorG%&arrowGF+-%'memberG6$F1T$F+F+6$F&F;-%'indetsG6$F4%'symbolG-FJ6#-F"6$ F4F;-%&ERRORG6#%\qexpects~as~a~second~argument~dvar~(not~ivar!).~If~a~third~arg ument~is~given,~it~must~be~a~string.G-%(convertG6$-FM6$f*FPF+FRF+-FV6$-FJ6$""!F 1FXF+F+FY-Fen6$F4%(indexedG%%listGF+F+F+F+, Q/jets/getinds.mF+ M7R0 I-jets/ijacobif*6$%$_trG%&_ivarG6$%%ivarG%%dvarG6#%[oCopyright~(C)~2000-2002~by ~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$-%,jets/mklistG6#9%@$/F/7"-%'RETU RNG6#-%'matrixG6#7#7#"""@%2""#9#>8%-F16#&9"6#""$>FEF6-%+jets/jsimpG6%-%,jets/ja cobiG6#FIFEf*6#%"aGF,F,F,-%)simplifyG6#-&%'linalgG6#%(inverseG6#9$F,F,F,F,F,F,F ,, Q/jets/ijacobi.mF, M7R0 I+jets/infinf*6'%%funcG%#xiG%$etaG%%ivarG%%dvarG6)%#iiG%'resultG%)zeta_km1G%&fn ameG%%lvarG%&ldvarG%#poG6#%[oCopyright~(C)~2000-2003~by~Mohamed~Barakat.~All~ri ghts~reserved.G6"C$>8(-%+jets/gendlG6$9'9(@'4-%%typeG6$9$%(indexedG@&-%'memberG 6%FBF;.8*&9%6#FI-FF6%FBF<FH&9&FL/-%%nopsG6#FB"""C'>8'-%#opG6$""!FB-FF6%FXF<FH>8 )7#-FZFT>8%-%'expandG6#-%$addG6$*&-%%diffG6$-FX6#-FZ6#F;&F;6#8$FU-Fgo6$&FKF^pF\ oFU/F_p;FU-FSF\p,&-Fgo6$FOF\oFUF^o!""C'>FXFY>FjnF[o>8&-F"6'-%'subsopG6$/FU%%NUL LGFBFKFPF;F<>F^o-Fco6$*&-Fgo6$Fio-FZ6#-Fbq6$/FUF]pFjnFU-Fgo6$Fbp-FZ6$FUFjnFUFcp ,&-Fgo6$F^qFcrFUF^oFipF4F4F4F4, Q-jets/infin.mF4 M7R0 I/jets/killwheref*6#%$solG6"6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rig hts~reserved.GF&@'/-%#opG6$""!9$%'&whereG@%3/-F,6$7&""#"""F8F7F/%:~are~arbitrar y~functions.G/-F,6$7&F7F8F8F8F/-%$rhsG6#-F,6$F8F/FA-%&ERRORG6$%/Cannot~handle:G F//F+%,PDESolStrucG@%3/-F,6$7%F7F8F7F/F9/-F,6$7%F7F8F8F/F>FAFCF/F&F&F&F&, Q1jets/killwhere.mF& M7R0 I/jets/linmatrixf*6$%$resG%"bG6+%#KMG%#KLG%#baG%#reG%#cvG%"rG%"nG%"iG%#zcG6#%in Copyright~(C)~2000-2003~by~Gehrt~Hartjen.~All~rights~reserved.G6"C+>8$-&%'linal gG6#%'matrixG6$""!F=>8&9%>8%%%NULLG?&8'9$%%trueGC'@%-%%typeG6$FE%"+G>FE-%(conve rtG6$FE%%listG>FE7#FE>8*-%%nopsG6#F?>8(7#-%"$G6$F=,&FV"""F[oF[o?&8)FEFGC%>8+F[o ?(F3F[oF[oF331F`oFV4-%$hasG6$F]o&F?6#F`o>F`o,&F`oF[oF[oF[o@%Fco>Fen-%'subsopG6$ /F`o-%)simplifyG6#*&F]oF[oFho!""Fen>Fen-F_p6$/Fjn-Fcp6#,&&Fen6#FjnF[oF]oF[oFen> FB6$FBFen>F6-FP6$7#FBF;>8,-%-jets/zerocolG6#F6?(F`oF[oF[o-FX6#FgqFG@$1&Fgq6#,$F `oFfpFWC$@$-FK6$&9"6#Ffp%'stringG>F6-&F96#%(delcolsG6$F6;F`rF`r>F?-F_p6$/F`rFCF ?@$32""#9#4-FK6$&Fhr6#""$Fjr-%'assignG6$F^tF?-%%copyGFjqF3F3F3F3, Q1jets/linmatrix.mF3 M7R0 I,jets/mulmatf*6%%%scalG'%$matG%'matrixG%%ivarG6'%"AG%#rmG%#cmG%"iG%"jG6#%[oCop yright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8%-%#opG6$7$ """""#7#-F76$F;-%%evalG6#9%>8&-F76$7$F;F;F<>8$-F(6$F5FD@%2""$9#?(8'F:F:F5%%true G?(8(F:F:FDFR>&FI6$FQFT-%,jets/mulconG6&9$&FBFW9&&9"6#""%?(FQF:F:F5FR?(FTF:F:FD FR>FV-FY6%FenFfnFgn-%%copyG6#FIF2F2F2F2, Q.jets/mulmat.mF2 M7R0 I,jets/oldsrcf*6&%$vecG%#SSG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moh amed~Barakat.~All~rights~reserved.GF)-%'expandG6#,&-%$mapG6$f*6#%"aGF)6$%)opera torG%&arrowGF)-%,jets/liederG6&T$9$T&T(F)F)6(F%F=F'9&F(9'9%"""-F16$f*F4F)F6F)-% +jets/dprodG6$F<F=F)F)6$F&FC-%(convertG6$-&%'linalgG6#%*transposeG6#-F16&%.jets /OrdEulerG-%.jets/vec2charG6%F=FAFBFAFB%)listlistGFDF)F)F)F), Q.jets/oldsrc.mF) M7R0 I.jets/roporderf*6%%"aG%"bG%%ivarG6%%"iG%"pG%"qG6#%inCopyright~(C)~2000-2002~by ~Gehrt~Hartjen.~All~rights~reserved.G6"@'2-%%nopsG6#&9%6#""#-F26#&9$F6-%'RETURN G6#%%trueG2F8F1-F=6#%&falseGC$?(8$"""FGF8F?C&-%'memberG6%&F;6$F7FF9&.8%-FJ6%&F5 FMFN.8&@$2FPFUF<@$2FUFPFAF<F.F.F.F., Q0jets/roporder.mF. M7R0 I-jets/simpconf*6$%%vconG%%lvarG6'%%simpG%%dvarG%#iiG%$vecG%#vvG6#%[oCopyright~ (C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C(@$5/9$""!/F47"-%'RET URNG6#F5@%2""#9#>8%-%,jets/mklistG6#&9"6#""$>F@F7>8$f*6#%"aGF/6$%)operatorG%&ar rowGF/-%+jets/jsimpG6$F4T#F/F/6$F)F@>8'%%NULLG?&8&-%-jets/sortconG6$F49%%%trueG C$>8(-FJ6#&FZ6#"""@$0F\oF5>FW6$FW7$F\o&FZ6#F=@%/FWFXF57#FWF/F/F/F/, Q/jets/simpcon.mF/ M7R0 I/jets/srtbysizef*6#'%$lstG%%listG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Bar akat.~All~rights~reserved.GF(-%$mapG6%f*6#%"bGF(6$%)operatorG%&arrowGF(&T$6#&9$ 6#""#F(F(6$F&F8-%%sortG6$-F,6$f*6#%"aGF(F1F(@%-%%typeG6$F8%)functionG7$-%%nopsG 6#F8-%#opG6#-%,jets/getposG6$7#F8F57$""!FMF(F(F;F8f*6$FCF0F(F1F(-%&evalbG6#2&F8 6#"""&9%FgnF(F(F(F8F(F(F(F(, Q1jets/srtbysize.mF( M7R0 I,jets/sumsepf*6$%$eqnG%$varG6$%%numeG%%denoG6#%>Copyright~(c)~1997~by~Khai~VuG 6"C%>8%-%,jets/facsepG6$-%&denomG6#9$9%>8$-%'expandG6#-%&numerGF5@%-%%typeG6$F9 %"+GC%>F9-%$mapG6%F1-%(convertG6$F9%%listGF7>F9-%-jets/coltermG6#F9-FG6%f*6$%$n umG%$denGF,6$%)operatorG%&arrowGF,7$*&&F66#"""Fhn&F7Fgn!""*&&F66#""#Fhn&F7F]oFj nF,F,F,F9F/C$>F9-F16$F9F77#7$*&&F9FgnFhn&F/FgnFjn*&&F9F]oFhn&F/F]oFjnF,F,F,F,, Q.jets/sumsep.mF, M7R0 I*jets/vzipf*6$%#L1G%#L2G6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All ~rights~reserved.GF'@%-%%typeG6$&9"6#!""%'stringGC$-%$zipG6%f*6$%"aG%"bGF'F'F'@ %09$""!7$F=7#9%%%NULLGF'F'F'-%,jets/mklistG6#F=-FD6#FA@%/%"%G7"F>FJ-F56%f*F8F'6 $%)operatorG%&arrowGF'F?F'F'F'FCFFF'F'F'F', Q,jets/vzip.mF' M7R0 I-jets/zerorowf*6#%"MG6$%#_MG%#ZLG6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen .~All~rights~reserved.G6"C%>8$-%(convertG6$9$%)listlistG>8%7#-%"$G6$""!-&%'lina lgG6#%'coldimG6#F2-%$mapG6$f*6#%"iGF+6$%)operatorG%&arrowGF+@%-%&evalbG6#/&T%F@ T#F2%%NULLGF+F+6&F(F5F'F.7#-F86#;"""-%%nopsG6#F.F+F+F+F+, Q/jets/zerorow.mF+ M7R0 I1jets/natinfG.oldf*6&%%_vecG%%_invG%&_ivarG%&_dvarG6.%$invG%%ivarG%%dvarG%$teq G%$LHSG%%lvarG%%vvarG%%SUBSG%%DvarG%%pvecG%$vecG%&pvec2G6#%fnCopyright~(C)~2005 ~by~Mohamed~Barakat.~All~rights~reserved.G6"C->8$-%,jets/mklistG6#9%>8%-F=6#9&> 8&-F=6#9'>8'-%+jets/mksetG6#-%$mapG6$f*6#%"aGF86$%)operatorG%&arrowGF8-%%typeG6 $9$%"=GF8F8F8F;@'/FK<#%%trueGC$>8(-FP6$%$lhsGF;@'3-%-jets/chkdvarG6$F]oFA/-%-je ts/getindsG6%F]oFFQ!F87"C%>8)-%;jets/get_vars_to_eliminateG6%F;FAFF>8*F]o>8+&-% -jets/nrsolveG6$F;F^p6#"""55/9#""%3/F_q""&5/&9"6#FcqF[p-FY6$Ffq%'stringG3Fbq/-F ho6%F;FfqFjoF[p-%&ERRORG6#%ipThe~left~hand~sides~of~the~first~argument~are~not~ admissible~abstract~names~for~the~invariantsGC%>Fcp-F=6#Ffq>FepF;>F;&-Fhp6$FepF cpFjp332F`qF_q0FfqF[p4FiqC$>FcpFfr@%/FK<#%&falseGC%>F^pF_p>F;-%*jets/ezipG6$Fcp F;>FepFfp-Far6#%=Inconsistent~first~argument!G-Far6#%dtI'm~not~able~to~extract~ abstract~names~for~the~invariants.~Either~specify~them~as~left~hand~sides~of~th e~invariants~or~specify~them~in~a~fourtth~argumentG@%32FcqF_q4-FY6$&Fgq6#""'F[r >8,-F=6#F[u>F_u%%NULLG@%30F_uFcu-FY6$&Fgq6#!""F[r>8.-%-jets/ind2eqnG6%FenFAF_u> F]vFen>8--%$zipG6%f*6$FT%"bGF8FUF87$Fen7#F?F8F8F8-%+jets/ldjetG6'F]v-FP6$%$rhsG F;FAFFF_uFcp@$FfuC$>F]v-%-jets/eqn2indGF`v>Fcv-Ffw6%FcvFAF_u>Fcv-%.jets/gcollec tG6%-%%subsG6$FepFcvFAFcp?(F8F[qF[qF8FjnC%>8/F[x@$/FdxFcvC%>Fcv-%,jets/addconG6 &F]vFcvFA7$-%#opG6#FF-F^y6#Fcp@$-FY6$Fcv-%%listG6#Ffy>Fcv-FP6&%(collectGFcvFcp% ,distributedG-%'RETURNG6#Fcv>FcvFdxF8F8F8F8, Q3jets/natinfG.old.mF8 M7R0 I*jets/Curlf*6$%"PG%%ivarG6'%#_PG%%dvarG%%curlG%"iG%"jG6#%inCopyright~(C)~2000- 2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C(>8&7#-%"$G6$""!-%%nopsG6#9%>8$- %,jets/mklistG6#9$@%2""#9#>8%-F?6#&9"6#""$>FG7"@$0-F96#F=F8-%&ERRORG6#%foThere~ must~be~as~many~components~in~your~function~as~independent~variables!G?(8("""FZ F8%%trueG?(8'FZFZF8Fen>&F26#FY,&FinFZ-%.jets/totalderG6&&F=6$FgnFY7#&F;6#FgnF;F GFZ@%-%%typeG6$&FK6#!""%'stringGF2-%+jets/jsimpG6%F2FG-%"@G6$%'expandG%)simplif yGF/F/F/F/, Q,jets/Curl.mF/ M7R0 I+jets/E1dimf*6"6#%%vvarG6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~rese rved.GF$C$@%-%,jets/chkvecG6#&9"6#""">8$-%,jets/mklistG6#&F/6#""&>F3-F56#&F/6#" "',&-%%nopsG6#F3F1-%-jets/E1codimG6#F/!""F$F$F$F$, Q-jets/E1dim.mF$ M7R0 I,jets/GEulerf*6%%%exprG%%ivarG%%dvarG6+%$eulG%%heulG%#dvG%#jcG%#reG%%jcorG%"JG %"iG%"jG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6 "C$@$-%%typeG6$9$%%listG-%&ERRORG6#%Jwe~do~not~expect~a~list~as~first~argumentG @%32""$9#0&9"6#""%7"C'>8*FF@$3-%)assignedG6#&%*infolevelG6#%&EulerG2""!FS-%&pri ntG6#/%;GEuler:~higher~Euler~indexGFM>8%%%NULLG?&8&9&%%trueGC)@$FO-FZ6#/%;GEule r:~dependent~variableGF\o>8$7$-%-jets/partderG6&F:&F\o6#-%#opG6#FM9%F]oFJ>8)-%- jets/getindsG6$F:7#F\o@$FO-FZ6#/%@GEuler:~list~of~jet~coordinatesGFbp?&8'FbpF^o C%@$FO-FZ6#/%7GEuler:~jet~coordinateGF]q>8(-%,jets/remainG6$7#-F^p6#F]qFM@$0Feq FJ>Ffo6$Ffo-F^p6#-%+jets/opdotG6&Feq*()!""-%%nopsG6#Feq"""-%.jets/multinomG6%Fi qFMF`pF[s-Fio6&F:7#F]qF`pF]oF[sF`pF]o@$FO-FZ6#/%2GEuler:~done~withGFbp>Fin6$Fin -%.jets/gcollectG6$7#FfoF`p7#Fin-%/jets/GOrdEulerG6%F:F`pF]oF4F4F4F4, Q.jets/GEuler.mF4 M7R0 I/jets/Helmholtzf*6%%#eqG%%ivarG%%dvarG6(%$_eqG%#ndG%%vfreG%"AG%"iG%"jG6#%inCop yright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C*>8%-%%nopsG6#9& >8$-%,jets/mklistG6#9$>F:-%$mapG6$f*6#%"aGF1F1F1@%-%%typeG6$F>%"=G,&-%$lhsGF="" "-%$rhsGF=!""F>F1F1F1F:@$0-F66#F:F4-%&ERRORG6#%`pThe~source~form~(=first~argume nt)~must~have~as~many~components~as~dependent~variablesG>8&-%.jets/frechetcG6%F :9%F8>8'-%'matrixG6$F4F4@%-FH6$Fen%&arrayG>F[o-%,jets/submatG6%Fen-%.jets/Adjoi ntFG6%FenFinF8Fin>&F[o6$FNFN-%,jets/subconGFfo-%%copyG6#F[oF1F1F1F1, Q1jets/Helmholtz.mF1 M7R0 I.jets/LieFormGf*6&%%_finG%&_ivarG%&_dvarG%&_IvarG6)%$finG%%ivarG%%dvarG%%IvarG %%uvarG%%wvarG%%WvarG6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~res erved.G6"C->8$-%,jets/mklistG6#9$>8%-F86#9%>8&-F86#9&>8'-F86#9'>F6&F66#;,&-%%no psG6#F<"""FRFR!"">8(-%$mapG6$%$lhsGF6@%2""%9#>8)-F86#&9"6#""&@%/-FP6#F6FR>Fin7# %&omegaG>Fin-FW6$f*6#%"aGF36$%)operatorG%&arrowGF3-%$catG6$FfoF:F3F3F37#-%"$G6# ;FRFbo>8*-%-jets/ind2eqnG6%FinFAFin-%-jets/eqn2indG6%-FW6$%$rhsGF6F<FF-%%subsG6 $-FW6$%#opG7$-%*jets/ezipG6$FFFA-F[r6$FUFip%"%G-F[r6$F_r-F[q6%FinF<FinF3F3F3F3, Q0jets/LieFormG.mF3 M7R0 I,jets/cchcurf*6"6,%#arG%%itrlG%%dtrlG%$curG%%ivarG%%dvarG%"nG%#adG%%ncurG%$res G6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C0>8$- %,jets/inpcchG6#9">8%&F46#""">8&&F46#""#>8'-%,jets/mklistG6#&F46#""$>8(&F46#""% >8)&F46#""&>8*-%%nopsG6#FL@$0-FX6#FDFV-%&ERRORG6#%]oThe~current~must~have~as~ma ny~components~as~independent~variables!G-%)unassignG6#%(AdjointG>8+-%+jets/jsim pG6%-FF6#-%,jets/jacobiG6%F:FLFQFQ&%'linalgG6#%$adjG-%%withG6$%%jetsGF_o>8,-%,j ets/cchjetG6'F:F?FDFLFQ>8--Fco6$-%$mapG6$f*6#%"aGF$6$%)operatorG%&arrowGF$-%(co nvertG6$-F\q6$f*6#%"bGF$FaqF$*&&T#6$T&9$F=&T'6#FarF=F$F$6(F-T%F`qFarF.Fcr7#-%"$ G6#;F=F^r%"+GF$F$6(F,FVF-FaoF.Fcp7#-Fir6#;F=FVFQ@%-%%typeG6$FH%%listGFhp-%#opG6 #FhpF$F$F$F$, Q.jets/cchcur.mF$ M7R0 I,jets/cchvecf*6"62%#arG%%itrlG%%dtrlG%$vecG%%ivarG%%dvarG%&oivarG%&odvarG%$ord G%$trnG%%jvarG%&sjvarG%&ojvarG%'sojvarG%$Z_ZG%$resG6#%[oCopyright~(C)~2000-2002 ~by~Mohamed~Barakat.~All~rights~reserved.GF$C<>8$-%,jets/inpcchG6#9">8%&F:6#""" >8&&F:6#""#>8'&F:6#""$>8(&F:6#""%>8)&F:6#""&>8*-%$mapG6$%$lhsGF@>8+-Fen6$FgnFE> 8-7$-%#opG6#F@-F`o6#FE-%-jets/chkcnt1G6%F]oFOFT>8,-%-jets/getiordG6$FJFin>Fho-% $maxG6$-Fjo6$F]oFTFho>FJ-%-jets/prolvecG6&FJFhoFYFin>8.-%-jets/alljetsG6%FhoFOF T>8/-Fen6%%(convertGFgp%'symbolG>80-Fip6%FhoFYFin>81-Fen6%F_qFbqF`q>F]o-%-jets/ prolcchG6&F]oFhoFOFT>F]o-%%subsG6%-%*jets/ezipG6$FgpF\q-Fbr6$FbqFfqF]o-%(collec tG6$-F_r6$Fdr-F_q6$-Fen6$f*6#%"aGF$6$%)operatorG%&arrowGF$*&&9$FBFC&T#6#&Fgs6$F HFCFCF$F$6$F482FJ%"+G-Fen6$f*F`sF$FbsF$&Fis6#FgsF$F$F]tFfq>83-%,jets/cchjetG6'F ]o7#/F^tF^t%"%GF\q7#F^t>Fft-Fgr6$Fft-Fen6$f*F`sF$FbsF$FctF$F$F]tF\q>Fft-Fen6$f* F`sF$FbsF$-%&coeffG6$FisFgsF$F$6$F5Fft-Fen6$f*F`sF$FbsF$FctF$F$F]tF\q>FJ-F_r6$- Fbr6$F\qFgp-%-jets/simpconG6%-%*jets/vzipG6$FftFgpFgpFT>FJ-%-jets/sortconG6$FJ7 $-F`o6#FO-F`o6#FT-%.jets/gcollectG6%FJFOFTF$F$F$F$, Q.jets/cchvec.mF$ M7R0 I+jets/csubsf*6%%$relG%%exprG%%fncsG6$%&_fncsG%&sfncsG6#%[oCopyright~(C)~2000-2 002~by~Mohamed~Barakat.~All~rights~reserved.G6"@%3-%%typeG6$9$%%listG/F37"9%C%> 8$-%$mapG6$%.jets/funcnameG9&>8%-F<6%%(convertGF:%'symbolG-%%subsG6&-%*jets/ezi pG6$F:FAF3-FJ6$FAF:F7F-F-F-F-, Q-jets/csubs.mF- M7R0 I.jets/homotopyf*6%%%exprG%%ivarG%%dvarG6(%#ssG%#QQG%%qinvG%"iG%"jG%"MG6#%inCop yright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C&@%2""$9#@%2F6"" &-%&ERRORG6#%MIf~not~3~then~5~or~6~arguments~are~expected!GC%@&/F6""'>8&&9"6#FA -%,jets/QcheckG6%&FE6#""%&FE6#F99&>FC-%.jets/QinverseG6%FJ9%FO>8%-%+jets/dlfacG 6'FJFCFMFTFO>8$"""C$>FVFO>Fen""!>8)-%/jets/interprodG6&FV9$FTFO@%-%%typeG6$F\o% 'matrixG?(8'FfnFfn-%%nopsG6#FT%%trueG?(8(,&FgoFfnFfnFfnFfnFhoF[pC%@%/FenFjn>&F\ o6$FgoF]p-%+jets/dlintG6$FcpFO>Fcp-%,jets/sdlintG6(FcpFTFOFJFMFC@$0F6FL>Fcp,(Fc pFfn*&&FT6#FgoFfn-%+jets/ilintG6&&F`o6#F]pFTFO,&FhoFfn!""FfnFfnFfn*&&FTFgqFfn-F dq6&&F`oFbqFTFOFhqFfnFiq>&F\o6$F]pFgo,$FcpFiq?(FgoFfnFfnFhoF[pC$@%Fap>&F\oFbq-F fp6$FgrFO>Fgr-Fjp6(FgrFTFOFJFMFC@&2F6FL>Fgr,&FgrFfn*&FaqFfn-Fdq6&F`oFTFOFhoFfnF fn2FLF6>Fgr,&FgrFfn*&FaqFfn-Fdq6'F`oFTFOFho-%%evalG6$FJ/FMFjnFfnFfn@%-Fco6$&FE6 #Fiq%'stringG-%%copyG6#F\o-%+jets/jsimpG6%FdtFO-%"@G6$%'expandG%)simplifyGF1F1F 1F1, Q0jets/homotopy.mF1 M7R0 I,jets/ichjetf*6"6*%#arG%%itrlG%%dtrlG%%exprG%%ivarG%%dvarG%&oivarG%&odvarG6#%[ oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jet s/inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6 $%$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchjetG6& %"%GFBFQFWF$F$F$F$, Q.jets/ichjet.mF$ M7R0 I+jets/ilintf*6&%%exprG%%ivarG%%dvarG%$numG6$%"lG%"gG6#%inCopyright~(C)~2000-20 02~by~Gehrt~Hartjen.~All~rights~reserved.G6"C%@%2""%9#>8%&9"6#""&>F57#-%"$G6$"" !-%%nopsG6#9&-%'assumeG6#1F?8$-%'expandG6#-%)simplifyG6#-%$intG6$-FM6#*&-%%subs G6$-%$mapG6$f*6#%"aGF.6$%)operatorG%&arrowGF./9$*&T#"""F\oF_oF.F.6$F*FH9%-%+jet s/QsubsG6&F5F\oFaoFCF_o)FH,&9'F_o!""F_oF_o/FH;F?F_oF.F.F.F., Q-jets/ilint.mF. M7R0 I/jets/interprodf*6&%"QG%"LG%%ivarG%%dvarG63%#_QG%"nG%"mG%#ipG%"iG%"jG%"kG%"aG% "pG%"MG%"SG%#ISG%"JG%#jkG%#poG%"RG%#ELG6#%inCopyright~(C)~2000-2002~by~Gehrt~Ha rtjen.~All~rights~reserved.G6"C'>8$-%,jets/mklistG6#9$>8%-%%nopsG6#9&>8&-FH6#9' @%-%%typeG6$9%%%listGC&>8,-FH6#FT>8'-%'matrixG6%FXFX""!?(8("""F]oFX%%trueGC'>8- -%$mapG6$f*6#%"xGF=6$%)operatorG%&arrowGF=7#-%#opGFCF=F=F=-%-jets/getindsG6$&FT 6#F\oFO>8/<"?&8)FaoF^oC$>8.-&%)combinatG6#%(subsetsG6#Fgp?(F=F]oF]oF=4&Fjp6#%)f inishedG>Fdp-%&unionG6$Fdp<#-&Fjp6#%*nextvalueGF=>Fdp-%&minusG6$Fdp<#7"?&80FdpF ^oC%>84-%+jets/EulerG6'FapFJFOFfrQ!F=>817#-%.jets/ind2multG6$FfrFJ?(8*F]oF]oFFF ^o@$3-%'memberG6%&FJ6#FesFfr.820F\oFesC$>83*(&F_sF\tF]o,&-FH6#FfrF]oF]oF]o!""-% .jets/totalderG6&-%$addG6$*&&F@6#8+F]o&FirFauF]o/Fbu;F]oFL-%'subsopG6$/F^t%%NUL LGFfrFJFOF]o@%2FesF\o>&Ffn6$FesF\o,&F^vF]oFbtF]o>&Ffn6$F\oFes,&FbvF]oFbtFht?(Fe sF]oF]oFXF^o?(FgpF]oF]o,&FesF]oFhtF]oF^o>&Ffn6$FesFgp,$&Ffn6$FgpFesFht>Ffn-%-je ts/currentG6&F@FTFJFO@%-FR6$&9"6#Fht%'stringG-%%copyG6#Ffn-%+jets/jsimpG6%FiwFO -%"@G6$%'expandG%)simplifyGF=F=F=F=, Q1jets/interprod.mF= M7R0 I,jets/jD2jetf*6"F$6%%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~reserved.G %'systemG%)rememberGF$@%/&9"6#""#7"&F,6#"""&F06#-%#opG6#F+F$F$F$F$, Q.jets/jD2jet.mF$ M7R0 I-jets/lddop11f*6&%$vecG%%_dopG%%ivarG%%dvarG6%%"QG%#dqG%$dopG6#%[oCopyright~(C )~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@%-%,jets/chkvecG6#9$> 8$-%.jets/vec2charG6%F59&9'C$>F7-%,jets/mklistGF4@$-%%typeG6$&F76#"""%"=G>F7-%$ mapG6$f*6#%"aGF/6$%)operatorG%&arrowGF/,&-%$lhsGF4FG-%$rhsGF4!""F/F/F/F7>8%-%.j ets/frechetcG6%F7F;F<@%-%,jets/chkdopG6#9%>8&-%+jets/mkmatG6#7#7#F\o>F^oF\o-%,j ets/addmatG6%-%+jets/lddopG6&-%/jets/char2evolG6$F7F<-%%copyG6#F^oF;F<-%,jets/c omdopG6&F^p-F_p6#FZF;F<F;@%Fin&%"%G6$FGFGFhpF/F/F/F/, Q/jets/lddop11.mF/ M7R0 I,jets/natfinf*6%%%_invG%&_ivarG%&_dvarG61%$invG%%ivarG%%dvarG%"nG%$teqG%$LHSG% %lvarG%%uvarG%%IvarG%#trG%%SUBSG%"qG%$itrG%$natG%%nat2G6#%[oCopyright~(C)~2004- 2005~by~Mohamed~Barakat.~All~rights~reserved.G6"C0>8$-%,jets/mklistG6#9$>8%-F?6 #9%>8&-F?6#9&>8'-%%nopsG6#FC@$0FM-FO6#FH-%&ERRORG6#%[oThe~number~of~independent ~and~dependent~variables~must~coincide!G>8(-%+jets/mksetG6#-%$mapG6$f*6#%"aGF:6 $%)operatorG%&arrowGF:-%%typeG6$FA%"=GF:F:F:F=@'/FZ<#%%trueGC$>8)-Fin6$%$lhsGF= @'3-%-jets/chkdvarG6$F[pFC/-%-jets/getindsG6%F[pFHQ!F:7"C%>8*-%;jets/get_vars_t o_eliminateG6%F=FCFH>8+F[p>8.&-%-jets/nrsolveG6$F=F\q6#"""55/9#""$3/F]r""%5/&9" 6#FarFip-Fbo6$Fdr%'stringG3F`r/-Ffp6%F=FdrFhpFip-FV6#%ipThe~left~hand~sides~of~ the~first~argument~are~not~admissible~abstract~names~for~the~invariantsGC%>Faq- F?6#Fdr>FcqF=>F=&-Ffq6$FcqFaqFhq332F^rF]r0FdrFip4FgrC$>FaqFcs@%/FZ<#%&falseGC%> F\qF]q>F=-%*jets/ezipG6$FaqF=>FcqFdq-FV6#%=Inconsistent~first~argument!G-FV6#%d tI'm~not~able~to~extract~abstract~names~for~the~invariants.~Either~specify~them ~as~left~hand~sides~of~the~invariants~or~specify~them~in~a~fourtth~argumentG@'3 2FarF]r4-Fbo6$&Fer6#""&Fir>8,-F?6#Fhu33F`rF^tF[s>F\vFcs@%/FMFiq>F\v7#%$phiG>F\v -Fin6$f*F\oF:F^oF:-%$catG6$FfvFAF:F:F:7#-%"$G6#;FiqFM>8--Fin6$%#opG7$-Fit6$FC-% -jets/ind2eqnG6%F\vFCF\v-Fit6$FHFH>8/-%-jets/getiordG6$F=FH>80&-%-jets/prolccvG 6&FdwFaxFCFH6#;,&FM""#FiqFiq!"">81-%+jets/jsimpG6$-%%subsG6$FfxF=FH>Fay-Fcy6$-F fy6$FcqFayFH?(F:FiqFiqF:FhoC%>82Fiy@$/F`zFay@%-Fbo6$&Fer6#F_yFir-%'RETURNG6#7$- Fgw6#&FdwFaw-Fgw6#-%)simplifyG6#Fay-Fiz6#7$F\[l-Fgw6#-%(collectG6%-%'expandGFc[ lFaq%,distributedG>FayF`zF:F:F:F:, Q.jets/natfin.mF: M7R0 I+jets/rmfacf*6$%$eqnG%$lfnG6'%%teqnG%%termG%%lfacG%$facG%'resultG6#%WCopyright ~(c)~1997-2002~by~Khai~Vu~and~Mohamed~BarakatG6"C&@$/9$""!-%'RETURNG6#F4-%/jets /storecaseG6#-%&denomG6#F3>8$*&-%'factorG6#-%&numerGF="""-%)icontentGF=!""@'-%% typeG6$F?%"*GC'>8&%%NULLG?&8'F?%%trueGC%@$/-%%nopsG6#-%-jets/fmemberG6$FT9%F4\@ $-FL6$FT%"^G>FT-%#opG6$FFFT>FQ6$FQFT>8(-%(convertG6$7#FQFN-F96#*&F?FFFfoFI@%/Ff oFF-%&ERRORG6$%.contradictionGF2Ffo-FL6$F?F^o@%2F4-FZ6#-Fgn6$-Fao6$FFF?FinC$-F9 6#-Fao6$""#F?F\q-Fap6$%Icontradiction:~Desolv~can't~handle~'eqn'GF2F?F/F/F/F/, Q-jets/rmfac.mF/ M7R0 I+jets/sharpf*6%%%RsecG%&_ivarG%&_dvarG6*%%ivarG%%dvarG%%TvarG%"qG%%jvarG%%Jvar G%$vecG%%pvecG6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.G 6"C.@$5/9$""!/F87"-%'RETURNG6#F9>8$-%,jets/mklistG6#9%>8%-FB6#9&>8&-%$mapG6$f*6 #%"aGF36$%)operatorG%&arrowGF3-%$catG6$.%#_TGF8F3F3F3FF@%32""$9#-%%typeG6$&9"6# ""%%*nonnegintG>8'F\oC$-FM6$f*FPF3FRF3&F86$""#"""F3F3F3F8>Fbo-%-jets/getiordG6$ %"%GFF>8(-%+jets/hjetsG6%FboF@FF>8)-Fcp6%FboFFFK>8*-%/jets/char2evolG6$-FK6#-%# opG6#FFFF-%-jets/prolvecG6&FjpFboF@FF>8+-%-jets/eqn2indG6%F_pFFFK6$-%*jets/ezip G6$Ffp-FM6$f*FPF3FRF3&F86#FjoF3F3F3-%-jets/sortconG6$F8Fap-F]r6$FK-FM6$f*FPF3FR F3FbrF3F3F3-Fer6$F8FF-%%subsG6$F_pFgqF3F3F3F3, Q-jets/sharp.mF3 M7R0 I&jetsT=6"%&falseGE\[lfr%)roporderGf*F$F$6#%inCopyright~(C)~2000-2002~by~Gehrt~ Hartjen.~All~rights~reserved.GF$C$30%1jets/initializedG.%%trueG0-%*jets/initGF$ ""!-%.jets/roporderG6#9"F$F$F$%)OrdEulerGf*F$F$F)F$C$F,-%.jets/OrdEulerGF7F$F$F $%)liederivGf*F$F$6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~r eserved.GF$C$F,-%.jets/liederivGF7F$F$F$%(sortderGf*F$F$6%FA%'systemG%)remember GF$C$F,-%-jets/sortderGF7F$F$F$%'sepsumGf*F$F$6#%>Copyright~(c)~1997~by~Khai~Vu GF$C$F,-%,jets/sepsumGF7F$F$F$%'orderdGf*F$F$FGF$C$F,-%,jets/orderdGF7F$F$F$%'m klistGf*F$F$F@F$C$F,-%,jets/mklistGF7F$F$F$%(coltermGf*F$F$FOF$C$F,-%-jets/colt ermGF7F$F$F$%)sortivarGf*F$F$6#%XCopyright~(C)~2005~by~Arne~Lorenz.~All~rights~ reserved.GF$C$F,-%.jets/sortivarGF7F$F$F$%6get_vars_to_eliminateGf*F$F$6#%foCop yright~(C)~2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.GF$C$F, -%;jets/get_vars_to_eliminateGF7F$F$F$%(map2conGf*F$F$F@F$C$F,-%-jets/map2conGF 7F$F$F$%(ind2mapGf*F$F$FGF$C$F,-%-jets/ind2mapGF7F$F$F$%(affpartGf*F$F$F@F$C$F, -%-jets/affpartGF7F$F$F$%(Der2mapGf*F$F$FOF$C$F,-%-jets/Der2mapGF7F$F$F$%*find2 multGf*F$F$F@F$C$F,-%/jets/find2multGF7F$F$F$%&opdotGf*F$F$F)F$C$F,-%+jets/opdo tGF7F$F$F$%(eqn2prdGf*F$F$F@F$C$F,-%-jets/eqn2prdGF7F$F$F$%)colbylstGf*F$F$F@F$ C$F,-%.jets/colbylstGF7F$F$F$%)mult2indGf*F$F$FGF$C$F,-%.jets/mult2indGF7F$F$F$ %'sumsepGf*F$F$FOF$C$F,-%,jets/sumsepGF7F$F$F$%(fmemberGf*F$F$FOF$C$F,-%-jets/f memberGF7F$F$F$%'appmatGf*F$F$F@F$C$F,-%,jets/appmatGF7F$F$F$%)oind2eqnGf*F$F$F @F$C$F,-%.jets/oind2eqnGF7F$F$F$%*collectedGf*F$F$F@F$C$F,-%/jets/collectedGF7F $F$F$%'iorderGf*F$F$F)F$C$F,-%,jets/iorderGF7F$F$F$%&infinGf*F$F$6#%[oCopyright ~(C)~2000-2003~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%+jets/infinGF7F $F$F$%&dlfacGf*F$F$F)F$C$F,-%+jets/dlfacGF7F$F$F$%&mksetGf*F$F$F@F$C$F,-%+jets/ mksetGF7F$F$F$%&constGf*F$F$F)F$C$F,-%+jets/constGF7F$F$F$%'liebraGf*F$F$F@F$C$ F,-%,jets/liebraGF7F$F$F$%(con2mapGf*F$F$F@F$C$F,-%-jets/con2mapGF7F$F$F$%(nrso lveGf*F$F$6#%[oCopyright~(C)~2000-2005~by~Mohamed~Barakat.~All~rights~reserved. GF$C$F,-%-jets/nrsolveGF7F$F$F$%(deptermGf*F$F$FOF$C$F,-%-jets/deptermGF7F$F$F$ %'inpccvGf*F$F$6#%fnCopyright~(C)~2005~by~Mohamed~Barakat.~All~rights~reserved. GF$C$F,-%,jets/inpccvGF7F$F$F$%'ind2jDGf*F$F$F_oF$C$F,-%,jets/ind2jDGF7F$F$F$%( eqn2smbGf*F$F$F@F$C$F,-%-jets/eqn2smbGF7F$F$F$%)rvforderGf*F$F$F)F$C$F,-%.jets/ rvforderGF7F$F$F$%(smb2indGf*F$F$F@F$C$F,-%-jets/smb2indGF7F$F$F$%(ind2revGf*F$ F$F@F$C$F,-%-jets/ind2revGF7F$F$F$%*F1coorMatGf*F$F$FdwF$C$F,-%/jets/F1coorMatG F7F$F$F$%(vforderGf*F$F$F)F$C$F,-%-jets/vforderGF7F$F$F$%(map2indGf*F$F$FGF$C$F ,-%-jets/map2indGF7F$F$F$%(getmordGf*F$F$F@F$C$F,-%-jets/getmordGF7F$F$F$%,getS olveVarGf*F$F$6#%gnCopyright~(C)~2005-2007~by~Arne~Lorenz.~All~rights~reserved. GF$C$F,-%1jets/getSolveVarGF7F$F$F$%,coefficientGf*F$F$FOF$C$F,-%1jets/coeffici entGF7F$F$F$%&xietaGf*F$F$FGF$C$F,-%+jets/xietaGF7F$F$F$%&rmfacGf*F$F$6#%WCopyr ight~(c)~1997-2002~by~Khai~Vu~and~Mohamed~BarakatGF$C$F,-%+jets/rmfacGF7F$F$F$% 'jD2jetGf*F$F$6%F`oFHFIF$C$F,-%,jets/jD2jetGF7F$F$F$%'diffvfGf*F$F$F@F$C$F,-%,j ets/diffvfGF7F$F$F$%(sortvarGf*F$F$FGF$C$F,-%-jets/sortvarGF7F$F$F$%'setNewGf*F $F$F_oF$C$F,-%,jets/setNewGF7F$F$F$%(chklvarGf*F$F$F@F$C$F,-%-jets/chklvarGF7F$ F$F$%(sublistGf*F$F$F)F$C$F,-%-jets/sublistGF7F$F$F$%'chksclGf*F$F$F@F$C$F,-%,j ets/chksclGF7F$F$F$%(chkdvarGf*F$F$F@F$C$F,-%-jets/chkdvarGF7F$F$F$%&sdfacGf*F$ F$F@F$C$F,-%+jets/sdfacGF7F$F$F$%'lorderGf*F$F$F)F$C$F,-%,jets/lorderGF7F$F$F$% %pzipGf*F$F$F@F$C$F,-%*jets/pzipGF7F$F$F$%)spartderGf*F$F$F@F$C$F,-%.jets/spart derGF7F$F$F$%*killwhereGf*F$F$6#%fnCopyright~(C)~2004~by~Mohamed~Barakat.~All~r ights~reserved.GF$C$F,-%/jets/killwhereGF7F$F$F$%+transform1Gf*F$F$FOF$C$F,-%0j ets/transform1GF7F$F$F$%*frechetopGf*F$F$F@F$C$F,-%/jets/frechetopGF7F$F$F$%(ge tdrvsGf*F$F$F@F$C$F,-%-jets/getdrvsGF7F$F$F$%)ind2multGf*F$F$F)F$C$F,-%.jets/in d2multGF7F$F$F$%'jD2indGf*F$F$F_oF$C$F,-%,jets/jD2indGF7F$F$F$%(list2vfGf*F$F$F )F$C$F,-%-jets/list2vfGF7F$F$F$%&symchGf*F$F$FGF$C$F,-%+jets/symchGF7F$F$F$%(pr d2eqnGf*F$F$F@F$C$F,-%-jets/prd2eqnGF7F$F$F$%&dlintGf*F$F$F)F$C$F,-%+jets/dlint GF7F$F$F$%'chkstrGf*F$F$F@F$C$F,-%,jets/chkstrGF7F$F$F$%'intgeoGf*F$F$F@F$C$F,- %,jets/intgeoGF7F$F$F$%(pol2eqnGf*F$F$F@F$C$F,-%-jets/pol2eqnGF7F$F$F$%*conDif2 opGf*F$F$FOF$C$F,-%/jets/conDif2opGF7F$F$F$%'jorderGf*F$F$F@F$C$F,-%,jets/jorde rGF7F$F$F$%'remainGf*F$F$6%F*FHFIF$C$F,-%,jets/remainGF7F$F$F$%)repljetsGf*F$F$ F@F$C$F,-%.jets/repljetsGF7F$F$F$%(zerorowGf*F$F$F)F$C$F,-%-jets/zerorowGF7F$F$ F$%(isderivGf*F$F$F@F$C$F,-%-jets/isderivGF7F$F$F$%'eqsortGf*F$F$FOF$C$F,-%,jet s/eqsortGF7F$F$F$%(zerocolGf*F$F$F)F$C$F,-%-jets/zerocolGF7F$F$F$%)jpdesolvGf*F $F$FhtF$C$F,-%.jets/jpdesolvGF7F$F$F$%)lieapplyGf*F$F$F@F$C$F,-%.jets/lieapplyG F7F$F$F$%)jet2formGf*F$F$F_oF$C$F,-%.jets/jet2formGF7F$F$F$%'QcheckGf*F$F$F)F$C $F,-%,jets/QcheckGF7F$F$F$%(oporderGf*F$F$F)F$C$F,-%-jets/oporderGF7F$F$F$%%vzi pGf*F$F$F@F$C$F,-%*jets/vzipGF7F$F$F$%'getposGf*F$F$FGF$C$F,-%,jets/getposGF7F$ F$F$%(LDsolveGf*F$F$FOF$C$F,-%-jets/LDsolveGF7F$F$F$%(map2DerGf*F$F$FOF$C$F,-%- jets/map2DerGF7F$F$F$%-dividebyunitGf*F$F$F]`lF$C$F,-%2jets/dividebyunitGF7F$F$ F$%'facsepGf*F$F$FOF$C$F,-%,jets/facsepGF7F$F$F$%)SEPARATEGf*F$F$FOF$C$F,-%.jet s/SEPARATEGF7F$F$F$%)multinomGf*F$F$F)F$C$F,-%.jets/multinomGF7F$F$F$%'mat2opGf *F$F$F)F$C$F,-%,jets/mat2opGF7F$F$F$%&QsubsGf*F$F$F)F$C$F,-%+jets/QsubsGF7F$F$F $%&isubsGf*F$F$6#%fnCopyright~(C)~2003~by~Pieter~Eendebak.~All~rights~reserved. GF$C$F,-%+jets/isubsGF7F$F$F$%&ilintGf*F$F$F)F$C$F,-%+jets/ilintGF7F$F$F$%)Qinv erseGf*F$F$F)F$C$F,-%.jets/QinverseGF7F$F$F$%(pol2indGf*F$F$F@F$C$F,-%-jets/pol 2indGF7F$F$F$%%restGf*F$F$FGF$C$F,-%*jets/restGF7F$F$F$%'jet2jDGf*F$F$F`\lF$C$F ,-%,jets/jet2jDGF7F$F$F$%*sepfactorGf*F$F$FOF$C$F,-%/jets/sepfactorGF7F$F$F$%*s rtbysizeGf*F$F$F@F$C$F,-%/jets/srtbysizeGF7F$F$F$%/copyright_jetsGf*F$F$6#%jpCo pyright~(C)~2000-2010~by~Mohamed~Barakat,~Gehrt~Hartjen~and~Arne~Lorenz.~All~ri ghts~reserved.GF$C$F,-%4jets/copyright_jetsGF7F$F$F$%(ind2subGf*F$F$6#%[oCopyri ght~(C)~2000-2004~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%-jets/ind2su bGF7F$F$F$%'sdlintGf*F$F$F)F$C$F,-%,jets/sdlintGF7F$F$F$%&grankGf*F$F$F)F$C$F,- %+jets/grankGF7F$F$F$%(ind2smbGf*F$F$F@F$C$F,-%-jets/ind2smbGF7F$F$F$%'inptrnGf *F$F$F@F$C$F,-%,jets/inptrnGF7F$F$F$%*storecaseGf*F$F$FOF$C$F,-%/jets/storecase GF7F$F$F$%)funcnameGf*F$F$F@F$C$F,-%.jets/funcnameGF7F$F$F$%%ezipGf*F$F$F@F$C$F ,-%*jets/ezipGF7F$F$F$%*GOrdEulerGf*F$F$F@F$C$F,-%/jets/GOrdEulerGF7F$F$F$%)col term2Gf*F$F$FOF$C$F,-%.jets/colterm2GF7F$F$F$%(gettypeGf*F$F$F@F$C$F,-%-jets/ge ttypeGF7F$F$F$%&chainGf*F$F$FhtF$C$F,-%+jets/chainGF7F$F$F$%'setOldGf*F$F$FhzF$ C$F,-%,jets/setOldGF7F$F$F$%)srtbylstGf*F$F$F@F$C$F,-%.jets/srtbylstGF7F$F$F$%' inpcchGf*F$F$FhtF$C$F,-%,jets/inpcchGF7F$F$F$%&gendlGf*F$F$FGF$C$F,-%+jets/gend lGF7F$F$F$%(list2opGf*F$F$F)F$C$F,-%-jets/list2opGF7F$F$F$%(proljetGf*F$F$6#%[p Copyright~(C)~2000-2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved .GF$C$F,-%-jets/proljetGF7F$F$F$%'comDerGf*F$F$FOF$C$F,-%,jets/comDerGF7F$F$F$F $, Q(jetsT.mF$ M7R0 I+jetsT/initf*6"F$6#%fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserv ed.GF$-%*jets/initG6#9"F$F$F$F$, Q-jetsT/init.mF$ M7R0 I-jets/E1codimf*6"6.%$vecG%$InvG%%ivarG%%dvarG%%vvarG%%DvarG%%mVecG%$varG%"nG%3 generic_point_procG%#rkG%&juvarG6#%foCopyright~(C)~2005~by~Mohamed~Barakat~and~ Arne~Lorenz.~All~rights~reserved.GF$C1@%-%,jets/chkvecG6#&9"6#"""C/>8$F9>8%&F:6 #""#>8&-%,jets/mklistG6#&F:6#""$>8'-FH6#&F:6#""%>8(-FH6#&F:6#""&>8)-FH6#&F:6#"" '>8+7$-%#opG6#FU-F`o6#FN>8,-%-jets/getiordG6$FAFN>8*-%-jets/natinfGG6(F?FAFFFNF UFfn@$/,&-Fgo6$FjoFfnF<-Fgo6$F?Ffn!""FeoC$>Fjo-%+jets/jsimpG6$Fjo7$Fbo-F`o6#Ffn @$F_pYQPThe~given~invariants~do~not~match~vector~fieldsF$>Fjo-%,jets/lstvecG6&- %-jets/sortconG6$FjoF]oFFFfnQ!F$>F]o-%.jets/srtbylstG6$&FjoFCF]o>Fjo&FjoF;C'>Fj oF9>F]oFB>FFFO>FNFV>FUFgn>Feo-%$mapG6$f*6#%"aGF$6$%)operatorG%&arrowGF$7#7$F<7# 9$F$F$F$FU>Fjo7$-F`o6#Feo-F`o6#Fjo>Feo-%%nopsGFgs>Fjo-Fhr6$f*F[sF$F]sF$-Fhr6$f* 6#%"bGF$F]sF$&FcsF;F$F$F$-Ffq6$FcsT#F$F$6$F-F]oFjo@&-%%typeG6$&F:6#Fep%*procedu reG>8-F_u-F]u6$&F:6#!"#Fau>FcuFfu@$-%)assignedG6#FcuC%>8/-%-jets/getindsG6%FjoF NFhq-%*jets/ezipG6$F`v-Fhr6$Fcu7#-%"$G6#;F<-F\t6#F`v>Fjo-%%subsG6$%"%GFjo>Fjo-& %'linalgG6#%*transposeG6#-%'matrixGFis>Fjo-&Fhw6#%*gaussjordGFis>Fjo-&Fhw6#%*su bmatrixG6%Fjo;F<Feo;,&FeoF<F<F<-&Fhw6#%'coldimGFis>Fjo-Fhr6$F`o-%(convertG6$Fjo %)listlistG>Fjo-Fhr6$f*F[sF$F]sF$@$0Fcs""!FcsF$F$F$Fjo>Fjo-Fhr6$f*F[sF$F]sF$-Fh r6$f*FdtF$F]sF$-%&coeffG6$T$FcsF$F$6$F\sFcsFitF$F$6$F*FUFjo-&Fhw6#%*gausselimG6 $Fjo.8.Fa[lF$F$F$F$, Q/jets/E1codim.mF$ M7R0 I,jets/appitrf*6"60%#arG%&trnsfG%%funcG%%ivarG%%dvarG%$braG%"nG%$ordG%%jvarG%&j var_G%&dfuncG%$prbG%$solG%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat. ~All~rights~reserved.GF$C.>8$-%,jets/inptrnG6#9">8%&F86#""">8&&F86#""#>8'&F86#" "$>8(&F86#""%@%2FP9#>8)&F<6#""&>FU%%NULLG>8*-%%nopsG6#FH>8+-%-jets/getiordG6$F> FM@$32FAF[o2FA-Fhn6#FM-%&ERRORG6#/%hqa~non~geometric~contact~transformation~exi sts~due~to~B|_ycklund's~theorem~for~one~dependent~variable~only!~dvarGFM@'/F[oF AC)>F>-%-jets/prolfinG6&F>FAFHFM@$2FAF\o-Ffo6$%]ta~non~geometric~contact~transf ormation~is~due~to~B|_ycklund's~theorem~of~order~one,~but~found~in~the~_prolong ed_~trnsf~jets~of~order~higher~than~oneG-%-jets/getindsGF^o>8,-%-jets/jetcoorG6 %FAFHFM>8--%$mapG6%%(convertGFip%'symbolG>F>-%%subsG6$-%*jets/ezipG6$FipF^qF>@% /FUFZC(>8.-%$zipG6%f*6$%"aG%"bGF$6$%)operatorG%&arrowGF$/9$-%%diffG6$-%$rhsG6#& T#F@9%F$F$6$F(FCF^qFH>81-%'expandG6#-%)simplifyG6#-Ffq6$F>F_r>8/6$-%+jets/mkset G6#Fgs-Fdt6#F^q>80-%-jets/nrsolveG6#Fat>Fit-F`q6$f*6#FerF$FgrF$-Fis6#-F\t6#-%.j ets/srtbylstG6$F[sFcsF$F$6$F/F^qFit@%2FA-Fhn6#FitC$-%&printG6$%\oappitr:~please ~choose~one~branch~and~insert~it~as~fifth~argument:GFit-%'RETURNG6#FZ>Fit&FitF@ >FitFU>Fgs-Ffq6%F>FitFCFao-Ffo6$%]sa~non~geometric~contact~transformation~is~du e~to~B|_ycklund's~theorem~of~order~one,~but~found~in~trnsf~jets~of~order~higher ~than~oneGFfp>Fgs-Ffq6$F>FC>Fgs-F\tFet@%0FM7"C%>Fat6$Fct-FdtFdo>FitFjt-%#opG6#- F`q6$f*FauF$FgrF$FduF$F$6$F*FMFitFgsF$F$F$F$, Q.jets/appitr.mF$ M7R0 I+jets/appmtf*6%'%%operG<&%'matrixG%&arrayG%%listG%)listlistG%&lexprG%%ivarG6#% %dvarG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C %@%2""$9#>8$&9"6#""%>F97"@'-%,jets/chkdopG6#9$-F"6&7#7#FD9%9&F93-%%typeG6$FDF*0 FDF?-%,jets/appmatG6$-%$mapG6&%,jets/diffopG-%+jets/mkmatGFCFJF9FI-FQ6$-FT6&FVF DFJF9FI@%5-FM6$FI<$F)F*4-FM6$%"%GF*F_o-%#opG6#F_oF2F2F2F2, Q-jets/appmt.mF2 M7R0 I-jets/aproliff*6&%&trnsfG%%exprG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~b y~Mohamed~Barakat.~All~rights~reserved.GF)C$-%,jets/trninvG6%9$9&9'-%,jets/apro lfG6&%"%G9%F1F2F)F)F)F), Q/jets/aprolif.mF) M7R0 I+jets/asadjf*6$%"HG%%ivarG6%%%dvarG%&oper1G%&oper2G6#%[oCopyright~(C)~2000-200 2~by~Mohamed~Barakat.~All~rights~reserved.G6"C&@%32""#9#4-%%typeG6$&9"6#""$%'st ringG>8$-%,jets/mklistG6#F8>F>7"@%-F66$&F96#!""F<>8%f*6#%"aGF-6$%)operatorG%&ar rowGF-9$F-F-F-@%-%,jets/chkdopG6#FR>FKf*FMF-FOF--%,jets/mulconG6%#"""F2FRT$F-F- 6$F&9%>FKf*FMF-FOF--%,jets/mulmatGFenF-F-Fin@%FT>8&f*6$FN%"bGF-FOF--%,jets/subc onG6%FRFjnFhnF-F-Fin>Faof*FcoF-FOF--%,jets/submatGFgoF-F-Fin-FK6#-Fao6$FR-%.jet s/AdjointFG6%FRFjnF>F-F-F-F-, Q-jets/asadj.mF- M7R0 I-jets/chklvarf*6#%$lstG6$%"fG%#arG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Bara kat.~All~rights~reserved.G6"@%2"""9#C&>8%%%NULLG?&8$-%,jets/mklistG6#9$%%trueG@ %4-%%typeG6$F5%)functionG-%'RETURNG6#%&falseG>F26$F2-%#opG6#F5@$-F>6$&9"6#""#%' symbolG-%'assignG6$FM<#F2-FB6#F:C$?&F5F6F:@$F=FAFVF+F+F+F+, Q/jets/chklvar.mF+ M7R0 I5jets/codim_of_actionf*6"61%$vecG%$numG%%ivarG%%dvarG%%DvarG%3generic_point_pr ocG%%pvecG%%lvecG%%lvarG%+dim_of_grpG%,dim_of_mfldG%%LvarG%%LvecG%%mvecG%5dim_o f_generic_orbitG6#%fnCopyright~(C)~2005~by~Mohamed~Barakat.~All~rights~reserved .GF$C+@%-%%typeG6$&9"6#""#%*nonnegintGC,@&29#""&-%&ERRORG6#%apIf~the~second~arg ument~is~nonnegative~integer,~then~at~least~5~arguments~are~expected!G-F:6$&F=6 #FE%'stringG-FG6#%\rIf~the~second~argument~is~nonnegative~integer,~then~at~leas t~5~arguments~before~the~optional~string~are~expected!G>8$&F=6#""">8%F<>8&&F=6# ""$>8'&F=6#""%>8(FL@$32FEFD-F:6$&F=6#""'%*procedureG>8)Fdo>8*-%-jets/prolvecG6' FSFXFZFinF^o@%/&F=6#!""Q%baseF$>8,-%-jets/alljetsG6%FXFZFinC$>Ffp-%-jets/jetcoo rG6%7#-%"$G6#;""!FXFZFin>F[p-%-jets/sortconG6$F[pFfp>8+&-%,jets/lstvecG6&F[pFZF ^oQ!F$FUC%>FjqFT>FfpF<@$32FgnFD-F:6$FjnFgo>FioFjn>8--%%nopsG6#Fjq>8.-F\s6#Ffp>8 /-%$mapG6%%-jets/ind2subGFfpF_r>80-%%subsG6$-%*jets/ezipG6$FfpFcsFjq>81-Fes6%%/ jets/vec2xietaGFisFcs@$-%)assignedG6#Fio>Fat-F[t6$-F^t6$Fcs-Fes6$Fio7#-Faq6#;FV -F\s6#FcsFat@%0Fat7"C$>Fat-&%'linalgG6#%*gausselimG6#Fat>82-%+jets/grankGF`v>Fb vFdq@%-F:6$FapFN6',&F_sFVFbvFcpF_sFbvFjr,&FjrFVFbvFcpFjvF$F$F$F$, Q7jets/codim_of_action.mF$ M7R0 I,jets/comDerf*6%%%der1G%%der2G%$lfnG6(%'resultG%#iiG%'fnord1G%'fnord2G%&countG %&lnameG6#%>Copyright~(c)~1997~by~Khai~VuG6"C&>8)-%$mapG6$f*6#%"fGF16$%)operato rG%&arrowGF1@%-%%typeG6$9$%)functionG-%#opG6$""!FBFBF1F1F19&>8$,&-%(convertG6$- FE6$""#FB%"+G"""-FM6$-FE6$FQ9%FR!""@$/FJFGC%>8(-%$minG6$-%%nopsG6#FO-F]o6#FV?(8 %FSFSFhnFen>FJ,&-FE6$FboFOFS-FE6$FboFVFY@$FenC%-%'memberG6%-FE6$FSFBF4.8&-F\p6% -FE6$FSFXF4.8'>FJ,&FgpFSFapFYFJF1F1F1F1, Q.jets/comDer.mF1 M7R0 I.jets/comtablef*6#%%lmatG6'%#iiG%#jjG%$numG%"KG%#ppG6#%[oCopyright~(C)~2000-20 02~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8&-%%nopsG6#9$>8'-%'matrixG6$F 1F1>8(7#-%$seqG6$&.%$psiG6#8$/FE;"""F1?(FEFHFHF1%%trueG?(8%FHFHF1FJ>&F76$FEFL-% +jets/dprodG6$-%(convertG6$-&%'linalgG6#%$colG6$&F5FDFL%%listGF<-%%copyG6#F7F.F .F.F., Q0jets/comtable.mF. M7R0 I+jets/dprodf*6$%"aG%"bG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~ rights~reserved.GF'@%0-%%nopsG6#9$-F-6#9%-%&ERRORG6#%EThe~two~lists~have~differ ent~length!G-%'expandG6#-%(convertG6$-%$zipG6%f*6$%"xG%"yGF'6$%)operatorG%&arro wGF'*&F/"""F2FHF'F'F'F/F2%"+GF'F'F'F', Q-jets/dprod.mF' M7R0 I.jets/geodesicf*6$%#ggG%&_dvarG6-%%dvarG%$tauG%"mG%"VG%"LG%#eqG%$indG%%_indG%$ _eqG%#_AG%$solG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~rese rved.G6"C-@%2""#9#C$>8$&9"6#""$>8%&-%,jets/mklistG6#&F?6#F96#"""C$>F=FH>FC.FC>8 &-%%nopsG6#F=>8'-%.jets/totalderG6&F=FC7#FCF=>8(,$-%&evalmG6#-%#&*G6$-F\o6$-&%' linalgG6#%*transposeG6#FV9$FV#!""F9>8)-%$mapG6$f*6#%"aGF56$%)operatorG%&arrowGF 5/Ffo""!F5F5F5-%+jets/EulerG6%FfnFZF=>8*-%-jets/getindsG6$FjoF=>8+-F\p6%%(conve rtGFjp%'symbolG>8,-%%subsG6$-%*jets/ezipG6$FjpF_qFjo>8--Fgq6$Fiq-FX6&FVFCFZF=>8 .-Fgq6$-Fjq6$F_qFjp-%)simplifyG6#-%-jets/nrsolveG6$FeqF]r-F\p6$f*F_pF5FapF5/-%$ lhsG6#Ffo-%(collectG6%-%$rhsGFdsT#%,distributedGF5F56$F+FV&FcrFJF5F5F5F5, Q0jets/geodesic.mF5 M7R0 I,jets/ichdopf*6"6,%$repG%#arG%%itrlG%%dtrlG%$dopG%%ivarG%%dvarG%&oivarG%&odvar G%$invG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$ C-@'3334-%%typeG6$&9"6#""#<$%"=G-%%listG6#F@-F96$F;FB5/-%%nopsG6#F;F>3/FH""$-F9 6$&F;6#FM%'stringG4-%,jets/chkdopGFJC$>8$F;>8%-%,jets/inpcchG6$&F<6#"""&F<6#;FM !""333F8-F96$&F<FQFB2""&9#5/-FI6#FdoF>3/FjoFM-F96$&FdoFQFRC$>FXFdo>FZ-Ffn6$&F<6 #;FjnF>&F<6#;""%F^oC$>FX7$FjnFjn>FZ-Ffn6#F<>8&&FZFin>8'&FZF=>8(&FZFQ>8)&FZ6#F\q >8*&FZ6#Ffo>8+-%$mapG6$%$lhsGFdq>8,-Fgr6$FirFgq>8--%,jets/cchinvG6%7$-%#opG6#Fd q-Fes6#FgqF]rFar>FX-%+jets/jsimpG6$-Fgr6$f*6#%"aGF$6$%)operatorG%&arrowGF$-%%su bsG6$T#-%%copyG6#9$F$F$6$F/F_sFXFar-%,jets/cchdopG6'F_sFXFjqFerF[sF$F$F$F$, Q.jets/ichdop.mF$ M7R0 I,jets/intgeof*6$%$vecG%%ivarG6#%%lvarG6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.G6"C&@$-%)assignedG6#%(epsilonGC%-%&printG6$/.F1F1 %>~is~redefined~to~'epsilon'!!!G-F46#%!G>F1F7@%2""#9#>8$7$-%#opG6#9%-FE6#&9"6#" "$>FB-%,jets/mklistGFF@$-%'memberG6$F7FB-%&ERRORG6#%?epsilon~is~already~a~varia ble!G-%)simplifyG6#-%.jets/srtbylstG6$-FP6#-%'dsolveG6$-%&unionG6$-%+jets/mkset G6#-%$mapG6$f*6#%"aGF+6$%)operatorG%&arrowGF+-%-jets/ind2eqnG6%/&&9$6$F?"""6#F7 &Fcp6#FepF7T#F+F+6$F(FB-%-jets/sortconG6$FcpFB-Fbo6#-Feo6$f*FhoF+FjoF+/-Fcp6#"" !FcpF+F+F+FB-Fbo6#-F^p6%FBF7FBFBF+F0F+F+, Q.jets/intgeo.mF+ M7R0 I-jets/jacobiff*6"6-%#arG%%itrlG%%dtrlG%%ivarG%%dvarG%"nG%"mG%"kG%%atrnG%'detsi gG%$resG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF $C.>8$-%,jets/inpcchG6$9"Q!F$>8%&F56#""">8&&F56#""#>8'&F56#""%>8(&F56#""&>8)-%% nopsG6#FF>8*-FR6#FK>8+-FR6#FA>8,-%.jets/frechetcG6%-%$mapG6$%$rhsG7$-%#opG6#F<- FaoFenFFFK>8-f*6#%"iGF$F$F$@%2T#9$F?)!"",(F\pF?F[pF?F?F?F$F$6$F+FP>8.-%+jets/js impG6$-F\o6$f*6#%"aGF$6$%)operatorG%&arrowGF$-F\o6$f*6#%"bGF$F[qF$-%.jets/gcoll ectG6$-F\o6$f*FgoF$F$F$C$-%,jets/mulconG6%-F[p6#F\p-%,jets/cmpdopG6&-&%'linalgG 6#%$detG6#-%,jets/jacobiG6'T%T'T)F\p&T+6#T.&T/6$F\pT2F\sF]sF\s@$-%%typeG6$%"%G% %listG-Fao6#FjsF$F$62F/F]sF'F_sF)F\sF*T-F(FcsFjpT&F.T1FbqF\p7$-%"$G6#;F?F[p,&F[ pF?F`tF?F\sF$F$62F+F[sFjpF\pF)F\sF/F]sF'F_sF*F_tF(FcsF.Fat7#FctF$F$62F,FUF+FPF) FFF/FeoF'F<F*FKF(FAF.Fgn7#-Fdt6#;F?FYFK-%+jets/mkmatG6#FbpF$F$F$F$, Q/jets/jacobif.mF$ M7R0 I-jets/mop2sclf*6#%$dopG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~ rights~reserved.GF&@)/9$""!F,5-%%typeG6$F+<$%'matrixG%&arrayG34-%,jets/chkdopG6 #F+-F/6$F+%%listG-%$mapG6$F"F+3F6F9@'/F+7"-%&ERRORG6$%-wrong~input:GF+/&F+6$!"" ""#FB&F+6$FJ"""F,FCF&F&F&F&, Q/jets/mop2scl.mF& M7R0 I-jets/natinfGf*6&%%_vecG%%_invG%&_ivarG%&_dvarG60%"aG%$invG%%ivarG%%dvarG%$teq G%$LHSG%%lvarG%%vvarG%%SUBSG%%DvarG%%pvecG%$vecG%&pvec2G%%cvarG6#%[pCopyright~( C)~2005-2007~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"C/>8%-% ,jets/mklistG6#9%>8&-F?6#9&>8'-F?6#9'>8(-%+jets/mksetG6#-%$mapG6$f*6#F*F:6$%)op eratorG%&arrowGF:-%%typeG6$9$%"=GF:F:F:F=@'/FM<#%%trueGC$>8)-FR6$%$lhsGF=@'3-%- jets/chkdvarG6$F^oFC/-%-jets/getindsG6%F^oFHQ!F:7"C%>8*-%;jets/get_vars_to_elim inateG6%F=FCFH>8+F^o>8,&-%-jets/nrsolveG6$F=F_p6#"""55/9#""%3/F`q""&5/&9"6#FdqF \p-FZ6$Fgq%'stringG3Fcq/-Fio6%F=FgqF[pF\p-%&ERRORG6#%ipThe~left~hand~sides~of~t he~first~argument~are~not~admissible~abstract~names~for~the~invariantsGC%>Fdp-F ?6#Fgq>FfpF=>F=&-Fip6$FfpFdpF[q332FaqF`q0FgqF\p4FjqC$>FdpFgr@%/FM<#%&falseGC%>F _pF`p>F=-%*jets/ezipG6$FdpF=>FfpFgp-Fbr6#%=Inconsistent~first~argument!G-Fbr6#% dtI'm~not~able~to~extract~abstract~names~for~the~invariants.~Either~specify~the m~as~left~hand~sides~of~the~invariants~or~specify~them~in~a~fourtth~argumentG@% 32FdqF`q4-FZ6$&Fhq6#""'F\r>8--F?6#F\u>F`u%%NULLG@%30F`uFdu-FZ6$&Fhq6#!""F\r>8/- %-jets/ind2eqnG6%FfnFCF`u>F^vFfn>8.-%+jets/ldjetG6'F^v-FR6$%$rhsGF=FCFHF`u@$Ffu C$>F^v-%-jets/eqn2indGFav>Fdv-F_w6%FdvFCF`u@%Fgu>817%-%#opG6#Fdp-Fhw6#-%(jetcoo rG6%7#-%"$G6#;""!-%-jets/getiordG6$FdvF`uFCF`u-Fhw6#-F]x6%7#-Fax6#;F\q-Ffx6$Fdv FHFCFH>FewFdp?(F:F\qF\qF:-%$hasG6$Fdv-FR6$FaoFfpC$>Fdv-%(collectG6%-%%subsG6$Ff pFdvFew%,distributedG>Fdv-FR6$f*FUF:FVF:-FR6$%/jets/jsimplifyGFfnF:F:F:Fdv>Fdv- %$zipG6%f*6$F*%"bGF:FVF:@$0FfnFdx7$Ffn7#FAF:F:F:FdvFdp-%'RETURNG6#7$-Fhw6#F^v-F hw6#FdvF:F:F:F:, Q/jets/natinfG.mF: M7R0 I*jets/pzipf*6$%#L1G%#L2G6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All ~rights~reserved.GF'-%$zipG6%f*6$%"aG%"bGF'6$%)operatorG%&arrowGF'7$9$9%F'F'F'- %,jets/mklistG6#F5-F86#F6F'F'F'F', Q,jets/pzip.mF' M7R0 I.jets/repljetsf*6$%$numG%$varG6$%"iG%%nvarG6#%[oCopyright~(C)~2000-2002~by~Moh amed~Barakat.~All~rights~reserved.G6"C$>8%7#-%#opG6$"""-%(unapplyG6$%$_XXG-F26# 9%7#-%$seqG6$&F/6#8$/FB;,&9$F4F4F4-%%nopsGF:F,F,F,F,, Q0jets/repljets.mF, M7R0 I,jets/ricci2f*6$%#ggG%%dvarG6$%"mG%$rieG6#%[oCopyright~(C)~2000-2002~by~Mohame d~Barakat.~All~rights~reserved.G6"C%@%/9#""">8%9$>F3-%-jets/riemannG6$F49%>8$-& %'linalgG6#%'coldimG6#&F36$F1F1-%+jets/mkmatG6#-%$mapG6$f*6#%"iGF,6$%)operatorG %&arrowGF,-FH6$f*6#%"jGF,FMF,-%)simplifyG6#-%(convertG6$-FH6$f*6#%"sGF,FMF,&&T# 6$F4T&6$F4T(F,F,6(F)T%FLF`oFTF47#-%"$G6#;F1F\o%"+GF,F,6(F(F\oF)FboFLF4FcoF,F,6& F(F;F)F37#-Feo6#;F1F;F,F,F,F,, Q.jets/ricci2.mF, M7R0 I.jets/riemann2f*6$%#ggG%%dvarG6)%"mG%"aG%$rieG%#ZMG%%rie2G%"kG%"lG6#%[oCopyrig ht~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C)@%2""#9#>8&9%>F8- %-jets/riemannG6$9$F9>8$-%%nopsG6#-%,jets/mklistG6#F8>8%-&%'linalgG6#%'coldimG6 #&F86$"""FQ>8'-%'matrixG6%FHFH""!>8(7#-%$seqG6$7#-Ffn6$-%%copyG6#FS/8);FQF@/8*F `o?(F_oFQFQF@%%trueG?(FboFQFQ,&F_oFQ!""FQFdoC$>&FY6$F_oFbo-%)simplifyG6#-%&eval mG6#-%#&*G6$F>&F8F[p>&FY6$FboF_o-F`p6#,$FjoFgo-%+jets/mkmatG6#FYF1F1F1F1, Q0jets/riemann2.mF1 M7R0 I.jets/riemannTf*6$%#ggG%%dvarG6/%"mG%$ricG%%ric2G%"RG%#ddG%#ZMG%%rieTG%$facG%% fac2G%"aG%"bG%"cG%"dG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~right s~reserved.G6"C.>8$-&%'linalgG6#%'coldimG6#9$@$2F:""$-%'RETURNG6#-%$mapG6$f*6#F 1F76$%)operatorG%&arrowGF7-FI6$f*6#F2F7FMF7-%%copyG6#-%'matrixG6#7#-%"$G6$7#-Ff n6$""!T#F\oF7F76$F(F\o7#-Ffn6#;"""F\oF7F76$F(F:7#-Ffn6#;FboF:@%2""#9#>8&9%>F]p- %,jets/ricci2G6$FAF^p>8%-%+jets/ricciG6%FAF]pQ!F7>8'-%-jets/scalarcG6#Fdp>8(f*6 $%"xG%"yGF7F7F7@%/FAF^pFboF[oF7F7F7>8)-FX6%F:F:F[o>8*7#-%$seqG6$7#-F^r6$-FU6#Fg q/8-Fgo/8.Fgo>8+*$,&F:Fbo!"#Fbo!"">8,,$*&F:F^sF\sF^sFjo?(8/FboFboF:%%trueG?(80F boFboF:Fes?(FfrFboFboF:Fes?(FhrFboFbo,&FfrFboF^sFboFesC$>&&F[r6$FfrFhr6$FdsFgs- %)simplifyG6#,&*&FjrFbo,**&-F_q6$FdsFfrFbo&F]p6$FhrFgsFboFbo*&&FA6$FfrFgsFbo&Fd p6$FdsFhrFboF^s*&&FAF[uFbo&FdpFitFboFbo*&-F_qF`uFbo&F]pF^uFboF^sFboFbo*(F`sFboF jpFbo,&*&F]uFboFeuFboFbo*&FbuFboFhtFboF^sFboFbo>&&F[r6$FhrFfrF`t,$F]tF^s-%+jets /mkmatG6#F[rF7F7F7F7, Q0jets/riemannT.mF7 M7R0 I/jets/vec2xietaf*6$%$vecG%%ivarG6#%%dvarG6#%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.G6"C$@%2""#9#>8$-%,jets/mklistG6#&9"6#""$>F27"- %$mapG6$f*6#%"aGF+6$%)operatorG%&arrowGF+&9$6#"""F+F+F+-%-jets/sortconG6$FF7$-% #opG6#9%-FN6#F2F+F+F+F+, Q1jets/vec2xieta.mF+ M7R0 I*jets/weylf*6$%#ggG%%dvarG6,%"mG%$rieG%$ricG%"RG%%rieFG%%rieKG%#ZMG%%WeylG%"aG %"bG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C-> 8$-&%'linalgG6#%'coldimG6#9$@$32F7""%0&9"6#!""Q&checkF4-%'RETURNG6#-%$mapG6$f*6 #F0F46$%)operatorG%&arrowGF4-FM6$f*6#F1F4FQF4-%%copyG6#-%'matrixG6#7#-%"$G6$7#- Fjn6$""!T#F`oF4F46$F(F`o7#-Fjn6#;"""F`oF4F46$F(F77#-Fjn6#;FfoF7@%532""#9#FC2""$ Fap>8%9%>Fep-%-jets/riemannG6$F>Ffp>8&-%,jets/ricci2G6#Fep>8'-%-jets/scalarcG6% F>F\qQ!F4>8(-%.jets/riemannFGFdq>8)-%.jets/riemannKG6%F>FaqFeq>8*-Ffn6%F7F7F_o> 8+7#-%$seqG6$7#-Fgr6$-FY6#F`r/8,F[p/8-F[p?(F_sFfoFfoF7%%trueG?(FasFfoFfo,&F_sFf oFGFfoFcsC$>&Fdr6$F_sFas-%)simplifyG6#-%&evalmG6#,(&FepFisFfo&FgqFisFG&F[rFisFG >&Fdr6$FasF_s-F^t6#,$FhsFG-%+jets/mkmatG6#FdrF4F4F4F4, Q,jets/weyl.mF4 M7R0 I&jetsA=6"%&falseGE\[lacl%&ldsrcGf*F$F$6#%[oCopyright~(C)~2000-2002~by~Mohamed~ Barakat.~All~rights~reserved.GF$C$30%1jets/initializedG.%%trueG0-%*jets/initGF$ ""!-%+jets/ldsrcG6#9"F$F$F$%)riemann3Gf*F$F$F)F$C$F,-%.jets/riemann3GF7F$F$F$%) roporderGf*F$F$6#%inCopyright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserv ed.GF$C$F,-%.jets/roporderGF7F$F$F$%)gcollectGf*F$F$F@F$C$F,-%.jets/gcollectGF7 F$F$F$%(getcmpnGf*F$F$6#%WCopyright~(C)~2003~by~Mohamed~Barakat~&~Anna~Fabiansk aGF$C$F,-%-jets/getcmpnGF7F$F$F$%&hjetsGf*F$F$F)F$C$F,-%+jets/hjetsGF7F$F$F$%'c chfrmGf*F$F$F)F$C$F,-%,jets/cchfrmGF7F$F$F$%&weyl2Gf*F$F$F)F$C$F,-%+jets/weyl2G F7F$F$F$%)OrdEulerGf*F$F$F@F$C$F,-%.jets/OrdEulerGF7F$F$F$%'cchcurGf*F$F$F)F$C$ F,-%,jets/cchcurGF7F$F$F$%)liederivGf*F$F$F)F$C$F,-%.jets/liederivGF7F$F$F$%'od eredGf*F$F$F)F$C$F,-%,jets/oderedGF7F$F$F$%)vec2charGf*F$F$F)F$C$F,-%.jets/vec2 charGF7F$F$F$%'ichfrmGf*F$F$F)F$C$F,-%,jets/ichfrmGF7F$F$F$%(prolccvGf*F$F$6#%f nCopyright~(C)~2004~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%-jets/prol ccvGF7F$F$F$%(sortderGf*F$F$6%F*%'systemG%)rememberGF$C$F,-%-jets/sortderGF7F$F $F$%,prolvec.oldGf*F$F$F)F$C$F,-%1jets/prolvec.oldGF7F$F$F$%(currentGf*F$F$F@F$ C$F,-%-jets/currentGF7F$F$F$%'sepsumGf*F$F$6#%>Copyright~(c)~1997~by~Khai~VuGF$ C$F,-%,jets/sepsumGF7F$F$F$%)frechetoGf*F$F$F)F$C$F,-%.jets/frechetoGF7F$F$F$%' orderdGf*F$F$FaqF$C$F,-%,jets/orderdGF7F$F$F$%'hamvecGf*F$F$F)F$C$F,-%,jets/ham vecGF7F$F$F$%'mklistGf*F$F$F)F$C$F,-%,jets/mklistGF7F$F$F$%(coltermGf*F$F$FcrF$ C$F,-%-jets/coltermGF7F$F$F$%)sortivarGf*F$F$6#%XCopyright~(C)~2005~by~Arne~Lor enz.~All~rights~reserved.GF$C$F,-%.jets/sortivarGF7F$F$F$%6get_vars_to_eliminat eGf*F$F$6#%foCopyright~(C)~2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~ reserved.GF$C$F,-%;jets/get_vars_to_eliminateGF7F$F$F$%*interprodGf*F$F$F@F$C$F ,-%/jets/interprodGF7F$F$F$%'cmpdopGf*F$F$F)F$C$F,-%,jets/cmpdopGF7F$F$F$%'ichc onGf*F$F$F)F$C$F,-%,jets/ichconGF7F$F$F$%'ichdopGf*F$F$F)F$C$F,-%,jets/ichdopGF 7F$F$F$%%com3Gf*F$F$6#%[oCopyright~(C)~2000-2003~by~Mohamed~Barakat.~All~rights ~reserved.GF$C$F,-%*jets/com3GF7F$F$F$%(casimopGf*F$F$F)F$C$F,-%-jets/casimopGF 7F$F$F$%'cchsrcGf*F$F$F)F$C$F,-%,jets/cchsrcGF7F$F$F$%)symsplitGf*F$F$F@F$C$F,- %.jets/symsplitGF7F$F$F$%)frechetaGf*F$F$F)F$C$F,-%.jets/frechetaGF7F$F$F$%(map 2conGf*F$F$F)F$C$F,-%-jets/map2conGF7F$F$F$%&E1dimGf*F$F$FctF$C$F,-%+jets/E1dim GF7F$F$F$%(ind2mapGf*F$F$FaqF$C$F,-%-jets/ind2mapGF7F$F$F$%(affpartGf*F$F$F)F$C $F,-%-jets/affpartGF7F$F$F$%(fin2infGf*F$F$F)F$C$F,-%-jets/fin2infGF7F$F$F$%*in vtargetGf*F$F$6#%[oCopyright~(C)~2004-2005~by~Mohamed~Barakat.~All~rights~reser ved.GF$C$F,-%/jets/invtargetGF7F$F$F$%'subs01Gf*F$F$F)F$C$F,-%,jets/subs01GF7F$ F$F$%)lddop1_1Gf*F$F$F)F$C$F,-%.jets/lddop1_1GF7F$F$F$%(Der2mapGf*F$F$FcrF$C$F, -%-jets/Der2mapGF7F$F$F$%*find2multGf*F$F$F)F$C$F,-%/jets/find2multGF7F$F$F$%(m op2sclGf*F$F$F)F$C$F,-%-jets/mop2sclGF7F$F$F$%)bascoeffGf*F$F$6#%joCopyright~(C )~2000-2002~by~Gehrt~Hartjen,~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%.je ts/bascoeffGF7F$F$F$%'ricci0Gf*F$F$F)F$C$F,-%,jets/ricci0GF7F$F$F$%&opdotGf*F$F $F@F$C$F,-%+jets/opdotGF7F$F$F$%*classconsGf*F$F$F@F$C$F,-%/jets/classconsGF7F$ F$F$%'nsbraLGf*F$F$F)F$C$F,-%,jets/nsbraLGF7F$F$F$%&prolcGf*F$F$6#%[oCopyright~ (C)~2000-2005~by~Mohamed~Barakat.~All~rights~reserved.GF$C$F,-%+jets/prolcGF7F$ F$F$%*jsubs.oldGf*F$F$6#%inCopyright~(C)~2000-2005~by~Gehrt~Hartjen.~All~rights ~reserved.GF$C$F,-%/jets/jsubs.oldGF7F$F$F$%(eqn2prdGf*F$F$F)F$C$F,-%-jets/eqn2 prdGF7F$F$F$%(getcondGf*F$F$F)F$C$F,-%-jets/getcondGF7F$F$F$%)riemannSGf*F$F$F) F$C$F,-%.jets/riemannSGF7F$F$F$%'cchchrGf*F$F$F)F$C$F,-%,jets/cchchrGF7F$F$F$%' cchcnjGf*F$F$6#%fnCopyright~(C)~2005~by~Mohamed~Barakat.~All~rights~reserved.GF $C$F,-%,jets/cchcnjGF7F$F$F$%)colbylstGf*F$F$F)F$C$F,-%.jets/colbylstGF7F$F$F$% (diagmatGf*F$F$6#%fnCopyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserved. GF$C$F,-%-jets/diagmatGF7F$F$F$%(prolsysGf*F$F$6#%[pCopyright~(C)~2004-2005~by~ Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%-jets/prolsysGF7F $F$F$%)mult2indGf*F$F$FaqF$C$F,-%.jets/mult2indGF7F$F$F$%(scalarcGf*F$F$F)F$C$F ,-%-jets/scalarcGF7F$F$F$%'submatGf*F$F$F)F$C$F,-%,jets/submatGF7F$F$F$%'sumsep Gf*F$F$FcrF$C$F,-%,jets/sumsepGF7F$F$F$%(fmemberGf*F$F$FcrF$C$F,-%-jets/fmember GF7F$F$F$%'appmatGf*F$F$F)F$C$F,-%,jets/appmatGF7F$F$F$%'cchfncGf*F$F$F)F$C$F,- %,jets/cchfncGF7F$F$F$%(invcondGf*F$F$Fd]lF$C$F,-%-jets/invcondGF7F$F$F$%)oind2 eqnGf*F$F$F)F$C$F,-%.jets/oind2eqnGF7F$F$F$%*collectedGf*F$F$F)F$C$F,-%/jets/co llectedGF7F$F$F$%'lstvecGf*F$F$FiyF$C$F,-%,jets/lstvecGF7F$F$F$%(getindsGf*F$F$ F)F$C$F,-%-jets/getindsGF7F$F$F$%'iorderGf*F$F$F@F$C$F,-%,jets/iorderGF7F$F$F$% 'cchinvGf*F$F$F)F$C$F,-%,jets/cchinvGF7F$F$F$%(getindfGf*F$F$F)F$C$F,-%-jets/ge tindfGF7F$F$F$%'chkdopGf*F$F$F)F$C$F,-%,jets/chkdopGF7F$F$F$%(natfinGGf*F$F$Fiy F$C$F,-%-jets/natfinGGF7F$F$F$%(jetcoorGf*F$F$F)F$C$F,-%-jets/jetcoorGF7F$F$F$% &infinGf*F$F$FevF$C$F,-%+jets/infinGF7F$F$F$%(killingGf*F$F$F)F$C$F,-%-jets/kil lingGF7F$F$F$%(grp2algGf*F$F$FjpF$C$F,-%-jets/grp2algGF7F$F$F$%'TakensGf*F$F$F) F$C$F,-%,jets/TakensGF7F$F$F$%&dlfacGf*F$F$F@F$C$F,-%+jets/dlfacGF7F$F$F$%(Ldso lveGf*F$F$6#%[oCopyright~(C)~2000-2004~by~Mohamed~Barakat.~All~rights~reserved. GF$C$F,-%-jets/LdsolveGF7F$F$F$%&mksetGf*F$F$F)F$C$F,-%+jets/mksetGF7F$F$F$%&co nstGf*F$F$F@F$C$F,-%+jets/constGF7F$F$F$%'defvecGf*F$F$F)F$C$F,-%,jets/defvecGF 7F$F$F$%*riemannT2Gf*F$F$F)F$C$F,-%/jets/riemannT2GF7F$F$F$%%sadjGf*F$F$F)F$C$F ,-%*jets/sadjGF7F$F$F$%)ocliecomGf*F$F$F)F$C$F,-%.jets/ocliecomGF7F$F$F$%)oPois sonGf*F$F$F)F$C$F,-%.jets/oPoissonGF7F$F$F$%-kroneckermatGf*F$F$Fb`lF$C$F,-%2je ts/kroneckermatGF7F$F$F$%%com2Gf*F$F$F)F$C$F,-%*jets/com2GF7F$F$F$%)riemann2Gf* F$F$F)F$C$F,-%.jets/riemann2GF7F$F$F$%)jvreduceGf*F$F$F)F$C$F,-%.jets/jvreduceG F7F$F$F$%'liebraGf*F$F$F)F$C$F,-%,jets/liebraGF7F$F$F$%&adrepGf*F$F$F)F$C$F,-%+ jets/adrepGF7F$F$F$%)char2vecGf*F$F$F)F$C$F,-%.jets/char2vecGF7F$F$F$%'ichvecGf *F$F$F)F$C$F,-%,jets/ichvecGF7F$F$F$%(divmultGf*F$F$F)F$C$F,-%-jets/divmultGF7F $F$F$%'mulconGf*F$F$F)F$C$F,-%,jets/mulconGF7F$F$F$%,coeffmatrixGf*F$F$6#%\pCop yright~(C)~2000-2003~by~Gehrt~Hartjen~and~Daniel~Robertz.~All~rights~reserved.G F$C$F,-%1jets/coeffmatrixGF7F$F$F$%(con2mapGf*F$F$F)F$C$F,-%-jets/con2mapGF7F$F $F$%'eqnredGf*F$F$F)F$C$F,-%,jets/eqnredGF7F$F$F$%'ichlgrGf*F$F$F)F$C$F,-%,jets /ichlgrGF7F$F$F$%(nrsolveGf*F$F$Fd]lF$C$F,-%-jets/nrsolveGF7F$F$F$%+symtestgenG f*F$F$F@F$C$F,-%0jets/symtestgenGF7F$F$F$%(deptermGf*F$F$FcrF$C$F,-%-jets/depte rmGF7F$F$F$%'ichcurGf*F$F$F)F$C$F,-%,jets/ichcurGF7F$F$F$%(lddop02Gf*F$F$F)F$C$ F,-%-jets/lddop02GF7F$F$F$%'GEulerGf*F$F$F)F$C$F,-%,jets/GEulerGF7F$F$F$%'inpcc vGf*F$F$Ff_lF$C$F,-%,jets/inpccvGF7F$F$F$%'ind2jDGf*F$F$FctF$C$F,-%,jets/ind2jD GF7F$F$F$%)LieFormGGf*F$F$FjpF$C$F,-%.jets/LieFormGGF7F$F$F$%(eqn2smbGf*F$F$F)F $C$F,-%-jets/eqn2smbGF7F$F$F$%)rvforderGf*F$F$F@F$C$F,-%.jets/rvforderGF7F$F$F$ %'chkcntGf*F$F$Fb`lF$C$F,-%,jets/chkcntGF7F$F$F$%'oldsrcGf*F$F$F)F$C$F,-%,jets/ oldsrcGF7F$F$F$%(smb2indGf*F$F$F)F$C$F,-%-jets/smb2indGF7F$F$F$%*jacobidetGf*F$ F$F)F$C$F,-%/jets/jacobidetGF7F$F$F$%(ind2revGf*F$F$F)F$C$F,-%-jets/ind2revGF7F $F$F$%'jacobiGf*F$F$6#%\pCopyright~(C)~2000-2003~by~Mohamed~Barakat,~Pieter~Een debak.~All~rights~reserved.GF$C$F,-%,jets/jacobiGF7F$F$F$%*F1coorMatGf*F$F$Ff_l F$C$F,-%/jets/F1coorMatGF7F$F$F$%(vforderGf*F$F$F@F$C$F,-%-jets/vforderGF7F$F$F $%'addconGf*F$F$F)F$C$F,-%,jets/addconGF7F$F$F$%(chkcnt1Gf*F$F$F)F$C$F,-%-jets/ chkcnt1GF7F$F$F$%(map2indGf*F$F$FaqF$C$F,-%-jets/map2indGF7F$F$F$%&appadGf*F$F$ F)F$C$F,-%+jets/appadGF7F$F$F$%,natinfG.oldGf*F$F$Ff_lF$C$F,-%1jets/natinfG.old GF7F$F$F$%)riemannKGf*F$F$F)F$C$F,-%.jets/riemannKGF7F$F$F$%&F1dimGf*F$F$Ff_lF$ C$F,-%+jets/F1dimGF7F$F$F$%)nkillingGf*F$F$F)F$C$F,-%.jets/nkillingGF7F$F$F$%)n atfinG2Gf*F$F$FiyF$C$F,-%.jets/natfinG2GF7F$F$F$%*prolv.oldGf*F$F$F)F$C$F,-%/je ts/prolv.oldGF7F$F$F$%'ichsrcGf*F$F$F)F$C$F,-%,jets/ichsrcGF7F$F$F$%(LieFormGf* F$F$FjpF$C$F,-%-jets/LieFormGF7F$F$F$%+xieta2charGf*F$F$F)F$C$F,-%0jets/xieta2c harGF7F$F$F$%*riemannF2Gf*F$F$F)F$C$F,-%/jets/riemannF2GF7F$F$F$%&appmtGf*F$F$F )F$C$F,-%+jets/appmtGF7F$F$F$%(getmordGf*F$F$F)F$C$F,-%-jets/getmordGF7F$F$F$%, getSolveVarGf*F$F$6#%gnCopyright~(C)~2005-2007~by~Arne~Lorenz.~All~rights~reser ved.GF$C$F,-%1jets/getSolveVarGF7F$F$F$%,coefficientGf*F$F$FcrF$C$F,-%1jets/coe fficientGF7F$F$F$%&xietaGf*F$F$FaqF$C$F,-%+jets/xietaGF7F$F$F$%'comtabGf*F$F$Fe vF$C$F,-%,jets/comtabGF7F$F$F$%(ohamvecGf*F$F$F)F$C$F,-%-jets/ohamvecGF7F$F$F$% &rmfacGf*F$F$6#%WCopyright~(c)~1997-2002~by~Khai~Vu~and~Mohamed~BarakatGF$C$F,- %+jets/rmfacGF7F$F$F$%'jD2jetGf*F$F$6%FdtFbqFcqF$C$F,-%,jets/jD2jetGF7F$F$F$%%j linGf*F$F$F)F$C$F,-%*jets/jlinGF7F$F$F$%&asadjGf*F$F$F)F$C$F,-%+jets/asadjGF7F$ F$F$%(gen2symGf*F$F$F)F$C$F,-%-jets/gen2symGF7F$F$F$%'ibpcurGf*F$F$F)F$C$F,-%,j ets/ibpcurGF7F$F$F$%(prolvecGf*F$F$6#%[pCopyright~(C)~2000-2005~by~Mohamed~Bara kat~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%-jets/prolvecGF7F$F$F$%'cflis tGf*F$F$F)F$C$F,-%,jets/cflistGF7F$F$F$%'diffvfGf*F$F$F)F$C$F,-%,jets/diffvfGF7 F$F$F$%(prolcchGf*F$F$Fd]lF$C$F,-%-jets/prolcchGF7F$F$F$%(sortvarGf*F$F$FaqF$C$ F,-%-jets/sortvarGF7F$F$F$%'lieappGf*F$F$F)F$C$F,-%,jets/lieappGF7F$F$F$%'setNe wGf*F$F$FctF$C$F,-%,jets/setNewGF7F$F$F$%)ijacobifGf*F$F$F)F$C$F,-%.jets/ijacob ifGF7F$F$F$%(getiordGf*F$F$F)F$C$F,-%-jets/getiordGF7F$F$F$%(chklvarGf*F$F$F)F$ C$F,-%-jets/chklvarGF7F$F$F$%+GinterprodGf*F$F$F)F$C$F,-%0jets/GinterprodGF7F$F $F$%'hameqnGf*F$F$F)F$C$F,-%,jets/hameqnGF7F$F$F$%(sublistGf*F$F$F@F$C$F,-%-jet s/sublistGF7F$F$F$%'chksclGf*F$F$F)F$C$F,-%,jets/chksclGF7F$F$F$%(chkdvarGf*F$F $F)F$C$F,-%-jets/chkdvarGF7F$F$F$%)depcheckGf*F$F$F@F$C$F,-%.jets/depcheckGF7F$ F$F$%&tpderGf*F$F$F)F$C$F,-%+jets/tpderGF7F$F$F$%&sdfacGf*F$F$F)F$C$F,-%+jets/s dfacGF7F$F$F$%(divnormGf*F$F$F@F$C$F,-%-jets/divnormGF7F$F$F$%*linmatrixGf*F$F$ 6#%inCopyright~(C)~2000-2003~by~Gehrt~Hartjen.~All~rights~reserved.GF$C$F,-%/je ts/linmatrixGF7F$F$F$%'lorderGf*F$F$F@F$C$F,-%,jets/lorderGF7F$F$F$%%pzipGf*F$F $F)F$C$F,-%*jets/pzipGF7F$F$F$%'ricci2Gf*F$F$F)F$C$F,-%,jets/ricci2GF7F$F$F$%(s impconGf*F$F$F)F$C$F,-%-jets/simpconGF7F$F$F$%)spartderGf*F$F$F)F$C$F,-%.jets/s partderGF7F$F$F$%*killwhereGf*F$F$FjpF$C$F,-%/jets/killwhereGF7F$F$F$%'mulmatGf *F$F$F)F$C$F,-%,jets/mulmatGF7F$F$F$%+transform1Gf*F$F$FcrF$C$F,-%0jets/transfo rm1GF7F$F$F$%(upldsrcGf*F$F$F)F$C$F,-%-jets/upldsrcGF7F$F$F$%*frechetopGf*F$F$F )F$C$F,-%/jets/frechetopGF7F$F$F$%(getdrvsGf*F$F$F)F$C$F,-%-jets/getdrvsGF7F$F$ F$%(hamflowGf*F$F$F)F$C$F,-%-jets/hamflowGF7F$F$F$%)ind2multGf*F$F$F@F$C$F,-%.j ets/ind2multGF7F$F$F$%(jcoeffsGf*F$F$F)F$C$F,-%-jets/jcoeffsGF7F$F$F$%'nsbraFGf *F$F$F)F$C$F,-%,jets/nsbraFGF7F$F$F$%'jD2indGf*F$F$FctF$C$F,-%,jets/jD2indGF7F$ F$F$%(list2vfGf*F$F$F@F$C$F,-%-jets/list2vfGF7F$F$F$%)evol2vecGf*F$F$F)F$C$F,-% .jets/evol2vecGF7F$F$F$%(partderGf*F$F$F)F$C$F,-%-jets/partderGF7F$F$F$%&E1defG f*F$F$FctF$C$F,-%+jets/E1defGF7F$F$F$%&symchGf*F$F$FaqF$C$F,-%+jets/symchGF7F$F $F$%'diffopGf*F$F$F)F$C$F,-%,jets/diffopGF7F$F$F$%(prd2eqnGf*F$F$F)F$C$F,-%-jet s/prd2eqnGF7F$F$F$%'cchlgrGf*F$F$F)F$C$F,-%,jets/cchlgrGF7F$F$F$%&dlintGf*F$F$F @F$C$F,-%+jets/dlintGF7F$F$F$%(eulprolGf*F$F$F@F$C$F,-%-jets/eulprolGF7F$F$F$%- totalder.oldGf*F$F$F)F$C$F,-%2jets/totalder.oldGF7F$F$F$%'chkstrGf*F$F$F)F$C$F, -%,jets/chkstrGF7F$F$F$%'intgeoGf*F$F$F)F$C$F,-%,jets/intgeoGF7F$F$F$%(lddop20G f*F$F$F)F$C$F,-%-jets/lddop20GF7F$F$F$%(pol2eqnGf*F$F$F)F$C$F,-%-jets/pol2eqnGF 7F$F$F$%'cchdopGf*F$F$F)F$C$F,-%,jets/cchdopGF7F$F$F$%*conDif2opGf*F$F$FcrF$C$F ,-%/jets/conDif2opGF7F$F$F$%+natfin2infGf*F$F$FjpF$C$F,-%0jets/natfin2infGF7F$F $F$%'jorderGf*F$F$F)F$C$F,-%,jets/jorderGF7F$F$F$%$DivGf*F$F$F@F$C$F,-%)jets/Di vGF7F$F$F$%'remainGf*F$F$6%FAFbqFcqF$C$F,-%,jets/remainGF7F$F$F$%'cchjetGf*F$F$ F)F$C$F,-%,jets/cchjetGF7F$F$F$%(intnormGf*F$F$F)F$C$F,-%-jets/intnormGF7F$F$F$ %)geodesicGf*F$F$F)F$C$F,-%.jets/geodesicGF7F$F$F$%&dprodGf*F$F$F)F$C$F,-%+jets /dprodGF7F$F$F$%(extderdGf*F$F$Fb`lF$C$F,-%-jets/extderdGF7F$F$F$%)repljetsGf*F $F$F)F$C$F,-%.jets/repljetsGF7F$F$F$%'cchconGf*F$F$F)F$C$F,-%,jets/cchconGF7F$F $F$%)frechetcGf*F$F$F)F$C$F,-%.jets/frechetcGF7F$F$F$%&ldjetGf*F$F$F)F$C$F,-%+j ets/ldjetGF7F$F$F$%'cchvecGf*F$F$F)F$C$F,-%,jets/cchvecGF7F$F$F$%+projlinsysGf* F$F$FctF$C$F,-%0jets/projlinsysGF7F$F$F$%'srccomGf*F$F$F)F$C$F,-%,jets/srccomGF 7F$F$F$%(zerorowGf*F$F$F@F$C$F,-%-jets/zerorowGF7F$F$F$%*riemannS2Gf*F$F$F)F$C$ F,-%/jets/riemannS2GF7F$F$F$%(isderivGf*F$F$F)F$C$F,-%-jets/isderivGF7F$F$F$%'n atinfGf*F$F$6#%[pCopyright~(C)~2005-2007~by~Mohamed~Barakat~and~Arne~Lorenz.~Al l~rights~reserved.GF$C$F,-%,jets/natinfGF7F$F$F$%'prolcvGf*F$F$FiyF$C$F,-%,jets /prolcvGF7F$F$F$%%CurlGf*F$F$F@F$C$F,-%*jets/CurlGF7F$F$F$%'eqsortGf*F$F$FcrF$C $F,-%,jets/eqsortGF7F$F$F$%(zerocolGf*F$F$F@F$C$F,-%-jets/zerocolGF7F$F$F$%)jpd esolvGf*F$F$FevF$C$F,-%.jets/jpdesolvGF7F$F$F$%)sortjetsGf*F$F$6%Fc^nFbqFcqF$C$ F,-%.jets/sortjetsGF7F$F$F$%)lieapplyGf*F$F$F)F$C$F,-%.jets/lieapplyGF7F$F$F$%* vec2xietaGf*F$F$F)F$C$F,-%/jets/vec2xietaGF7F$F$F$%(cliecomGf*F$F$F)F$C$F,-%-je ts/cliecomGF7F$F$F$%*riemannK2Gf*F$F$F)F$C$F,-%/jets/riemannK2GF7F$F$F$%*linRed uceGf*F$F$FctF$C$F,-%/jets/linReduceGF7F$F$F$%(darbouxGf*F$F$F)F$C$F,-%-jets/da rbouxGF7F$F$F$%)jet2formGf*F$F$FctF$C$F,-%.jets/jet2formGF7F$F$F$%&prolfGf*F$F$ F)F$C$F,-%+jets/prolfGF7F$F$F$%)ichdop20Gf*F$F$Fb`lF$C$F,-%.jets/ichdop20GF7F$F $F$%'subconGf*F$F$F)F$C$F,-%,jets/subconGF7F$F$F$%&EulerGf*F$F$F@F$C$F,-%+jets/ EulerGF7F$F$F$%(prolcciGf*F$F$FiyF$C$F,-%-jets/prolcciGF7F$F$F$%'jsolveGf*F$F$F d]lF$C$F,-%,jets/jsolveGF7F$F$F$%'QcheckGf*F$F$F@F$C$F,-%,jets/QcheckGF7F$F$F$% (oporderGf*F$F$F@F$C$F,-%-jets/oporderGF7F$F$F$%%vzipGf*F$F$F)F$C$F,-%*jets/vzi pGF7F$F$F$%'getposGf*F$F$FaqF$C$F,-%,jets/getposGF7F$F$F$%'ichchrGf*F$F$F)F$C$F ,-%,jets/ichchrGF7F$F$F$%&lddopGf*F$F$F)F$C$F,-%+jets/lddopGF7F$F$F$%(LDsolveGf *F$F$FcrF$C$F,-%-jets/LDsolveGF7F$F$F$%(map2DerGf*F$F$FcrF$C$F,-%-jets/map2DerG F7F$F$F$%&nsbraGf*F$F$F)F$C$F,-%+jets/nsbraGF7F$F$F$%(jacobifGf*F$F$F)F$C$F,-%- jets/jacobifGF7F$F$F$%,sortcon.oldGf*F$F$F)F$C$F,-%1jets/sortcon.oldGF7F$F$F$%- dividebyunitGf*F$F$FjpF$C$F,-%2jets/dividebyunitGF7F$F$F$%'liecomGf*F$F$F)F$C$F ,-%,jets/liecomGF7F$F$F$%%weylGf*F$F$F)F$C$F,-%*jets/weylGF7F$F$F$%'facsepGf*F$ F$FcrF$C$F,-%,jets/facsepGF7F$F$F$%&apphhGf*F$F$F)F$C$F,-%+jets/apphhGF7F$F$F$% )SEPARATEGf*F$F$FcrF$C$F,-%.jets/SEPARATEGF7F$F$F$%(sortconGf*F$F$Fb^nF$C$F,-%- jets/sortconGF7F$F$F$%)AdjointFGf*F$F$F@F$C$F,-%.jets/AdjointFGF7F$F$F$%'lieder Gf*F$F$Fd]lF$C$F,-%,jets/liederGF7F$F$F$%)multinomGf*F$F$F@F$C$F,-%.jets/multin omGF7F$F$F$%&prolvGf*F$F$Fb^nF$C$F,-%+jets/prolvGF7F$F$F$%0codim_of_actionGf*F$ F$Ff_lF$C$F,-%5jets/codim_of_actionGF7F$F$F$%)comtableGf*F$F$F)F$C$F,-%.jets/co mtableGF7F$F$F$%'inf2MFGf*F$F$Ff_lF$C$F,-%,jets/inf2MFGF7F$F$F$%'mat2opGf*F$F$F @F$C$F,-%,jets/mat2opGF7F$F$F$%(unldsrcGf*F$F$F)F$C$F,-%-jets/unldsrcGF7F$F$F$% *jsimplifyGf*F$F$Ff_lF$C$F,-%/jets/jsimplifyGF7F$F$F$%&ldlgrGf*F$F$F)F$C$F,-%+j ets/ldlgrGF7F$F$F$%&QsubsGf*F$F$F@F$C$F,-%+jets/QsubsGF7F$F$F$%&ssubsGf*F$F$Ff_ lF$C$F,-%+jets/ssubsGF7F$F$F$%&isubsGf*F$F$6#%fnCopyright~(C)~2003~by~Pieter~Ee ndebak.~All~rights~reserved.GF$C$F,-%+jets/isubsGF7F$F$F$%'getbasGf*F$F$F@F$C$F ,-%,jets/getbasGF7F$F$F$%(jsymbolGf*F$F$F)F$C$F,-%-jets/jsymbolGF7F$F$F$%'comdo pGf*F$F$F)F$C$F,-%,jets/comdopGF7F$F$F$%*vhomotopyGf*F$F$F)F$C$F,-%/jets/vhomot opyGF7F$F$F$%)frechetvGf*F$F$Fb`lF$C$F,-%.jets/frechetvGF7F$F$F$%)frechetmGf*F$ F$F)F$C$F,-%.jets/frechetmGF7F$F$F$%%jfacGf*F$F$F)F$C$F,-%*jets/jfacGF7F$F$F$%& ricciGf*F$F$F)F$C$F,-%+jets/ricciGF7F$F$F$%+getallindsGf*F$F$Ff_lF$C$F,-%0jets/ getallindsGF7F$F$F$%'addmatGf*F$F$F)F$C$F,-%,jets/addmatGF7F$F$F$%(hamcharGf*F$ F$F)F$C$F,-%-jets/hamcharGF7F$F$F$%*xieta2vecGf*F$F$F)F$C$F,-%/jets/xieta2vecGF 7F$F$F$%+Helmholtz2Gf*F$F$F)F$C$F,-%0jets/Helmholtz2GF7F$F$F$%'aprolfGf*F$F$F)F $C$F,-%,jets/aprolfGF7F$F$F$%&ilintGf*F$F$F@F$C$F,-%+jets/ilintGF7F$F$F$%*projI soTrGf*F$F$FctF$C$F,-%/jets/projIsoTrGF7F$F$F$%)QinverseGf*F$F$F@F$C$F,-%.jets/ QinverseGF7F$F$F$%'apptrnGf*F$F$F)F$C$F,-%,jets/apptrnGF7F$F$F$%*frechetapGf*F$ F$F)F$C$F,-%/jets/frechetapGF7F$F$F$%(pol2indGf*F$F$F)F$C$F,-%-jets/pol2indGF7F $F$F$%-conservationGf*F$F$F@F$C$F,-%2jets/conservationGF7F$F$F$%+genvec.oldGf*F $F$FevF$C$F,-%0jets/genvec.oldGF7F$F$F$%*HelmholtzGf*F$F$F@F$C$F,-%/jets/Helmho ltzGF7F$F$F$%&ldfrmGf*F$F$F)F$C$F,-%+jets/ldfrmGF7F$F$F$%+natinf.oldGf*F$F$Ff_l F$C$F,-%0jets/natinf.oldGF7F$F$F$%%restGf*F$F$FaqF$C$F,-%*jets/restGF7F$F$F$%'j et2jDGf*F$F$Fh\nF$C$F,-%,jets/jet2jDGF7F$F$F$%&ldchrGf*F$F$F)F$C$F,-%+jets/ldch rGF7F$F$F$%'nsbra3Gf*F$F$F)F$C$F,-%,jets/nsbra3GF7F$F$F$%)einsteinGf*F$F$F)F$C$ F,-%.jets/einsteinGF7F$F$F$%(aprolifGf*F$F$F)F$C$F,-%-jets/aprolifGF7F$F$F$%&sh arpGf*F$F$FjpF$C$F,-%+jets/sharpGF7F$F$F$%*sepfactorGf*F$F$FcrF$C$F,-%/jets/sep factorGF7F$F$F$%(riemannGf*F$F$F)F$C$F,-%-jets/riemannGF7F$F$F$%,christoffelGf* F$F$F)F$C$F,-%1jets/christoffelGF7F$F$F$%*srtbysizeGf*F$F$F)F$C$F,-%/jets/srtby sizeGF7F$F$F$%(alljetsGf*F$F$F)F$C$F,-%-jets/alljetsGF7F$F$F$%(ind2eqnGf*F$F$F) F$C$F,-%-jets/ind2eqnGF7F$F$F$%/copyright_jetsGf*F$F$6#%jpCopyright~(C)~2000-20 10~by~Mohamed~Barakat,~Gehrt~Hartjen~and~Arne~Lorenz.~All~rights~reserved.GF$C$ F,-%4jets/copyright_jetsGF7F$F$F$%(ind2subGf*F$F$FchlF$C$F,-%-jets/ind2subGF7F$ F$F$%'genvecGf*F$F$Fb^nF$C$F,-%,jets/genvecGF7F$F$F$%'natfinGf*F$F$FiyF$C$F,-%, jets/natfinGF7F$F$F$%'sdlintGf*F$F$F@F$C$F,-%,jets/sdlintGF7F$F$F$%&grankGf*F$F $F@F$C$F,-%+jets/grankGF7F$F$F$%(intpartGf*F$F$F@F$C$F,-%-jets/intpartGF7F$F$F$ %'jcoeffGf*F$F$F)F$C$F,-%,jets/jcoeffGF7F$F$F$%'ichfncGf*F$F$F)F$C$F,-%,jets/ic hfncGF7F$F$F$%(ind2smbGf*F$F$F)F$C$F,-%-jets/ind2smbGF7F$F$F$%'inptrnGf*F$F$F)F $C$F,-%,jets/inptrnGF7F$F$F$%&esubsGf*F$F$F)F$C$F,-%+jets/esubsGF7F$F$F$%*store caseGf*F$F$FcrF$C$F,-%/jets/storecaseGF7F$F$F$%'trncmpGf*F$F$F)F$C$F,-%,jets/tr ncmpGF7F$F$F$%>F1coorByDegreeEliminationStepGf*F$F$6#%XCopyright~(C)~2007~by~Ar ne~Lorenz.~All~rights~reserved.GF$C$F,-%Cjets/F1coorByDegreeEliminationStepGF7F $F$F$%)funcnameGf*F$F$F)F$C$F,-%.jets/funcnameGF7F$F$F$%(jreduceGf*F$F$F)F$C$F, -%-jets/jreduceGF7F$F$F$%(natinfGGf*F$F$F_eoF$C$F,-%-jets/natinfGGF7F$F$F$%&jsi mpGf*F$F$Fb^nF$C$F,-%+jets/jsimpGF7F$F$F$%'appitrGf*F$F$F)F$C$F,-%,jets/appitrG F7F$F$F$%/F1coorByDegreeGf*F$F$6#%[pCopyright~(C)~2004-2007~by~Mohamed~Barakat~ and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%4jets/F1coorByDegreeGF7F$F$F$%'ex tderGf*F$F$F)F$C$F,-%,jets/extderGF7F$F$F$%'vertpbGf*F$F$FiyF$C$F,-%,jets/vertp bGF7F$F$F$%'gengenGf*F$F$FevF$C$F,-%,jets/gengenGF7F$F$F$%,symtestdiffGf*F$F$F@ F$C$F,-%1jets/symtestdiffGF7F$F$F$%%ezipGf*F$F$F)F$C$F,-%*jets/ezipGF7F$F$F$%(l ddop11Gf*F$F$F)F$C$F,-%-jets/lddop11GF7F$F$F$%*char2evolGf*F$F$F)F$C$F,-%/jets/ char2evolGF7F$F$F$%*GOrdEulerGf*F$F$F)F$C$F,-%/jets/GOrdEulerGF7F$F$F$%&mkmatGf *F$F$F)F$C$F,-%+jets/mkmatGF7F$F$F$%)chkVBinfGf*F$F$6#%XCopyright~(C)~2006~by~A rne~Lorenz.~All~rights~reserved.GF$C$F,-%.jets/chkVBinfGF7F$F$F$%)colterm2Gf*F$ F$FcrF$C$F,-%.jets/colterm2GF7F$F$F$%(gettypeGf*F$F$F)F$C$F,-%-jets/gettypeGF7F $F$F$%&chainGf*F$F$FevF$C$F,-%+jets/chainGF7F$F$F$%%pDivGf*F$F$F)F$C$F,-%*jets/ pDivGF7F$F$F$%-getIntFactorGf*F$F$FctF$C$F,-%2jets/getIntFactorGF7F$F$F$%'setOl dGf*F$F$FfjmF$C$F,-%,jets/setOldGF7F$F$F$%)srtbylstGf*F$F$F)F$C$F,-%.jets/srtby lstGF7F$F$F$%'inpcchGf*F$F$FevF$C$F,-%,jets/inpcchGF7F$F$F$%(prolfinGf*F$F$F)F$ C$F,-%-jets/prolfinGF7F$F$F$%)riemannFGf*F$F$F)F$C$F,-%.jets/riemannFGF7F$F$F$% (scl2mopGf*F$F$F)F$C$F,-%-jets/scl2mopGF7F$F$F$%)riemannTGf*F$F$F)F$C$F,-%.jets /riemannTGF7F$F$F$%)cchdop20Gf*F$F$Fb`lF$C$F,-%.jets/cchdop20GF7F$F$F$%%flatGf* F$F$FjpF$C$F,-%*jets/flatGF7F$F$F$%'gensymGf*F$F$F)F$C$F,-%,jets/gensymGF7F$F$F $%(PoissonGf*F$F$F)F$C$F,-%-jets/PoissonGF7F$F$F$%)homotopyGf*F$F$F@F$C$F,-%.je ts/homotopyGF7F$F$F$%'ichjetGf*F$F$F)F$C$F,-%,jets/ichjetGF7F$F$F$%$totGf*F$F$F )F$C$F,-%)jets/totGF7F$F$F$%'cchcmpGf*F$F$F)F$C$F,-%,jets/cchcmpGF7F$F$F$%+char 2xietaGf*F$F$F)F$C$F,-%0jets/char2xietaGF7F$F$F$%'trninvGf*F$F$F)F$C$F,-%,jets/ trninvGF7F$F$F$%(extderpGf*F$F$F)F$C$F,-%-jets/extderpGF7F$F$F$%+JacobiCondGf*F $F$Fb[rF$C$F,-%0jets/JacobiCondGF7F$F$F$%(eqn2indGf*F$F$F)F$C$F,-%-jets/eqn2ind GF7F$F$F$%)vec2evolGf*F$F$F)F$C$F,-%.jets/vec2evolGF7F$F$F$%'chkvecGf*F$F$F)F$C $F,-%,jets/chkvecGF7F$F$F$%&jsubsGf*F$F$6#%ioCopyright~(C)~2000-2007~by~Gehrt~H artjen~and~Arne~Lorenz.~All~rights~reserved.GF$C$F,-%+jets/jsubsGF7F$F$F$%&gend lGf*F$F$FaqF$C$F,-%+jets/gendlGF7F$F$F$%(list2opGf*F$F$F@F$C$F,-%-jets/list2opG F7F$F$F$%'isoalgGf*F$F$FjpF$C$F,-%,jets/isoalgGF7F$F$F$%&ldvecGf*F$F$F)F$C$F,-% +jets/ldvecGF7F$F$F$%(proljetGf*F$F$Fb^nF$C$F,-%-jets/proljetGF7F$F$F$%)totalde rGf*F$F$Fb^nF$C$F,-%.jets/totalderGF7F$F$F$%'comDerGf*F$F$FcrF$C$F,-%,jets/comD erGF7F$F$F$%&csubsGf*F$F$F)F$C$F,-%+jets/csubsGF7F$F$F$%(inf2finGf*F$F$F)F$C$F, -%-jets/inf2finGF7F$F$F$%'F1coorGf*F$F$FiyF$C$F,-%,jets/F1coorGF7F$F$F$%(ijacob iGf*F$F$F)F$C$F,-%-jets/ijacobiGF7F$F$F$%(charactGf*F$F$FaqF$C$F,-%-jets/charac tGF7F$F$F$%'inv2LFGf*F$F$FjpF$C$F,-%,jets/inv2LFGF7F$F$F$%(E1codimGf*F$F$FjtF$C $F,-%-jets/E1codimGF7F$F$F$%&ldfnlGf*F$F$F)F$C$F,-%+jets/ldfnlGF7F$F$F$%'chkjac Gf*F$F$F)F$C$F,-%,jets/chkjacGF7F$F$F$%,proljet.oldGf*F$F$F)F$C$F,-%1jets/prolj et.oldGF7F$F$F$F$, Q(jetsA.mF$ M7R0 I+jets/E1deff*6"6+%$vecG%$InvG%%ivarG%%dvarG%%vvarG%%DvarG%%mVecG%$varG%"nG6#%X Copyright~(C)~2005~by~Arne~Lorenz.~All~rights~reserved.GF$C.@%-%,jets/chkvecG6# &9"6#"""C/>8$F6>8%&F76#""#>8&-%,jets/mklistG6#&F76#""$>8'-FE6#&F76#""%>8(-FE6#& F76#""&>8)-FE6#&F76#""'>8+7$-%#opG6#FR-F]o6#FK>8,-%-jets/getiordG6$F>FK>8*-%-je ts/natinfGG6(F<F>FCFKFRFY@$/,&-Fdo6$FgoFYF9-Fdo6$F<FY!""FboC$>Fgo-%+jets/jsimpG 6$Fgo7$F_o-F]o6#FY@$F\pYQPThe~given~invariants~do~not~match~vector~fieldsF$>Fgo -%,jets/lstvecG6&-%-jets/sortconG6$FgoFjnFCFYQ!F$>Fjn-%.jets/srtbylstG6$&FgoF@F jn>Fgo&FgoF8C'>FgoF6>FjnF?>FCFL>FKFS>FRFZ>Fbo-%$mapG6$f*6#%"aGF$6$%)operatorG%& arrowGF$7#7$F97#9$F$F$F$FR>Fgo7$-F]o6#Fbo-F]o6#Fgo>Fbo-%%nopsGFds>Fgo-Fer6$f*Fh rF$FjrF$-Fer6$f*6#%"bGF$FjrF$&F`sF8F$F$F$-Fcq6$F`sT#F$F$6$F-FjnFgo>Fgo-&%'linal gG6#%*transposeG6#-%'matrixGFfs>Fgo-&F[u6#%*gaussjordGFfs>Fgo-&F[u6#%*submatrix G6%Fgo;F9Fbo;,&FboF9F9F9-&F[u6#%'coldimGFfs>Fgo-Fer6$F]o-%(convertG6$Fgo%)listl istG>Fgo-Fer6$f*FhrF$FjrF$@$0F`s""!F`sF$F$F$Fgo@$0Fgo7"@%32Fhn9#-%%typeG6$&F76# Fbp%'stringG>Fgo-%/jets/linReduceG6'FgoF9FcuFCFR>Fgo-F`x6'FgoF9&F[u6#%*gausseli mGFCFRFgoF$F$F$F$, Q-jets/E1def.mF$ M7R0 I,jets/aprolff*6&%&trnsfG%%exprG%%ivarG%%dvarG6#%%jvarG6#%[oCopyright~(C)~2000- 2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C%>8$7%-%#opG6#9&-F36#9'-F36#-% -jets/getindsG6$9%F8-%+jets/prolfG6&9$F0F5F8-%+jets/jsimpG6$-%%subsG6$%"%GF>F8F -F-F-F-, Q.jets/aprolf.mF- M7R0 I,jets/chksclf*6#%$sclG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~r ights~reserved.GF&@%-%%typeG6$9$<-%#..G%"<G%#<=G%&arrayG%*procedureG%&tableG%#: :G%%listG%$setG%'stringG%'unevalG%&falseG%%trueGF&F&F&F&, Q.jets/chkscl.mF& M7R0 I,jets/cmpdopf*6%%%dop1G%%dop2G%%ivarG6/%%dvarG%&ndvarG%$Z_ZG%#M1G%#M2G%#M3G%$r d1G%$cd1G%$rd2G%$cd2G%"iG%"jG%"kG6#%[oCopyright~(C)~2000-2002~by~Mohamed~Baraka t.~All~rights~reserved.G6"C%@%2""$9#>8$-%,jets/mklistG6#&9"6#""%>F?7">8%7$-%#op G6#F?8&@'-%,jets/chkdopG6$9$Q!F8@'-FR6$9%FU-%.jets/frechetcG6%--%,jets/diffopG6 %FT9&FJ6#--Fin6%FYF[oFJ6#FOF[o7#FO53-%%typeG6$FY<#%%listG-FR6$&FY6#"""FU3-Feo6$ FY<$%'matrixG%)listlistG-FR6$&FY6$F]pF]pFU-%$mapG6$f*6#%"bGF86$%)operatorG%&arr owGF8-F"6&T$FTT&T'F8F86(F%FTF'F[oF)F?FY-%&ERRORG6$/.%(diffop2GFY%4has~a~wrong~s yntax!G53-Feo6$FTFgo-FR6$&FTF\pFU3-Feo6$FTFap-FR6$&FTFgpFU@'FW-Fip6$f*6#%"aGF8F ^qF8-F"6&FTFcqFdqFeqF8F86(F&FYF'F[oF)F?FTF^pC,>8'-%+jets/mkmatG6#FT>8(-Fhs6#FY> 8*-&%'linalgG6#%'rowdimG6#Ffs>8+-&Fbt6#%'coldimGFet>8,-Fat6#F[t>8--FitF_u@$0Fgt F]u-Fhq6#%6Matrices~incompatibleG>8)-Fbp6%F_tFau""!?(8.F]pF]pF_t%%trueG?(8/F]pF ]pFauF_v?(80F]pF]pFgtF_v>&Fiu6$F^vFav-%,jets/addconG6%Fev-F"6&&Ffs6$F^vFcv&F[t6 $FcvFavF[oF?F[o-%%copyG6#FiuFgq-Fhq6$/.%(diffop1GFTF]rF8F8F8F8, Q.jets/cmpdop.mF8 M7R0 I*jets/com3f*6&%%vec1G%%vec2G%%vec3G%%ivarG6$%%dvarG%$outG6#%[oCopyright~(C)~20 00-2003~by~Mohamed~Barakat.~All~rights~reserved.G6"C%@%2""%9#>8$&9"6#""&>F5%%NU LLG>8%-%,jets/comtabG6%7%9$9%9&9'F5@'3/-%%nopsG6#F=""#/&&F=6#"""6$FQFL&%&gammaG FP-%#opG6$FL&F=6$FLFQFHFN&F=FRF.F.F.F., Q,jets/com3.mF. M7R0 I-jets/extderdf*6$%%exprG%&_ivarG6)%%ivarG%"kG%%dvarG%%jvarG%$resG%"iG%"jG6#%fn Copyright~(C)~2003~by~Mohamed~Barakat.~All~rights~reserved.G6"C'>8$-%,jets/mkli stG6#9%@%2""#9#>8&-F66#&9"6#""$>F>7">8'7$-%#opG6#F4-FK6#-%-jets/getindsG6%9$F>Q !F1-%-jets/extderpG6&FRFHF4F>-%+jets/dprodG6$%"%G-%$mapG6$f*6#%"aGF16$%)operato rG%&arrowGF1-%$catG6$%"dGFRF1F1F1FHF1F1F1F1, Q/jets/extderd.mF1 M7R0 I,jets/genvecf*6%%%_lfnG%%lparG'%&_lvarG%%listG6.%%lvarG%&ldvarG%&fxvecG%$lfnG% %nlfnG%$parG%&nlparG%(LievecsG%$tmpG%"iG%"jG%&lpposG6#%[pCopyright~(C)~2000-200 5~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"C/@%3/-%%nopsG6#9& ""$-%%typeG6$&FA6#FBF)C'@$5/&FA6#"""""!/FL7"-%'RETURNG6#FO>8%-%$mapG6$f*6#%"aGF 96$%)operatorG%&arrowGF9&9$6$""#FNF9F9F9FL>8'-%+jets/esubsG6$F[o-FX6$f*FenF9Fgn F9&F[oFMF9F9F9FL>8$&FA6#F]o>8&FFC&>FVFA>F_o-%,jets/mklistG6#F[o>FhoFA>F\pFQ>F_o -FX6$f*FenF9FgnF9@%-FD6$F[o%"=G-%$rhsGFbpF[oF9F9F9&F_o6#;FN-F?6#FV>F_o-FX6$f*Fe nF9FgnF9-%(collectG6%-%'expandGFbpT$%,distributedGF9F96$F&9%F_o>8(-F?6#F_o>8*-F ?6#F`r>F_o-FX6$f*FenF9FgnF97$7#-%'coeffsG6%F[oF]r.T%7#FcsF9F96&F&F`rF68/F_o>8+- %&arrayG6$;FN,&FfrFNFNFN7$-%"$G6$7#-F`t6$FOFbrFfrFbt?(8-FNFNFbr%%trueG?(8.FNFN- F?6#&F_o6$FftF]oFgtC$>8)&F_o6%FftF]oFit@%/-%'memberG6%F`uF`r.%$posGFgt@%-FD6$F` u%)functionG>&Fhs6#Fiu-%'subsopG6$/Fft*&&F_o6%FftFNFitFNF`uFNF_v>F_v-Fbv6$/FftF fvF_v>&Fhs6#F]t-Fbv6$/Fft,&*&&F]w6#FftFNF`uFNFNFfvFNF]w?(FftFNFNFfrFgt@%0&FhsFe wFbtC%@$4-FD6$&9"6#!""%'stringG@$-%(convertG6$-FX6$f*FenF9FgnF95-FD6$F[o%"*G-FD 6$F[o%)constantGF9F9F9Fiw%$andGC'>8,-FX6$f*FenF9FgnF9@&F\y-%'selectG6%FDF[oFay0 F[oFOF[oF9F9F9Fiw>Fey-FX6$f*FenF9FgnF9@%F\y<#-%#opGFbp<#F[oF9F9F9Fey>Fey-FX6$f* FenF9FgnF9-FX6$f*6#%"bGF9FgnF9@$3-FD6$F[o%(numericG2F[oFO6$Fbx-%$absGFbpF9F9F9F [oF9F9F9Fey>Fey-%*intersectG6#-Fez6#Fey@$0Fey<"C$>Fey-Ffx6$FeyF^y>Fiw-FX6$f*Fen F9FgnF9*&F[oFNT#FbxF9F96$F3FeyFiw>Fiw-%$zipG6%f*6$FfnF_[lF9FgnF9@$F]z7$F[o7#F`r F9F9F9-%+jets/jsimpG6$FiwFQFV@$3-%)assignedG6#&%*infolevelG6#%'genvecG2FOF^^lC$ -%&printG6$%*parameterG&F`rFew-Fe^l6#Fiw>FiwFO>F_oF]w>Fhs-FX6$f*6#F4F9FgnF9@$0& F[]lFbpFOFd_lF9F96$F2Fhs7#-F`t6#;FNFfr@$0F_oFbtC$-Fe^l6#-%%subsG6$F\pFhs-%&ERRO RG6$%8Cannot~handle~the~rest:GF_oF_`lF9F9F9F9, Q.jets/genvec.mF9 M7R0 I+jets/hjetsf*6%%$numG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mohamed~B arakat.~All~rights~reserved.GF(-%-jets/jetcoorG6%7#-%"$G6#;"""9$9%9&F(F(F(F(, Q-jets/hjets.mF( M7R0 I,jets/ichcurf*6"6*%#arG%%itrlG%%dtrlG%$curG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchcurG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichcur.mF$ M7R0 I,jets/ichfrmf*6"6*%#arG%%itrlG%%dtrlG%$frmG%%ivarG%%dvarG%&oivarG%&odvarG6#%[o Copyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.GF$C,>8$-%,jets /inpcchG6#9">8%&F26#""">8&&F26#""#>8'&F26#""$>8(&F26#""%>8)&F26#""&>8*-%$mapG6$ %$lhsGF8>8+-FS6$FUF=-%,jets/cchinvG6%7$-%#opG6#F8-Fin6#F=FGFL-%,jets/cchfrmG6&% "%GFBFQFWF$F$F$F$, Q.jets/ichfrm.mF$ M7R0 I/jets/jacobidetf*6$%$_trG%&_ivarG6$%%ivarG%%dvarG6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.G6"C&>8$-%,jets/mklistG6#9%@$/F/7"-%'RE TURNG6#"""@%2""#9#>8%-F16#&9"6#""$>F@F6-%+jets/jsimpG6%-%,jets/jacobiG6#FDF@f*6 #%"aGF,F,F,-%)simplifyG6#-&%'linalgG6#%$detG6#9$F,F,F,F,F,F,F,, Q1jets/jacobidet.mF, M7R0 I/jets/jsimplifyf*6#%%exprG6%%$cmdG%$indG%%_indG6#%fnCopyright~(C)~2005~by~Moha med~Barakat.~All~rights~reserved.G6"C&@%2"""9#>8$&9"6#""#>F3%)simplifyG>8%-%0je ts/getallindsG6#9$>8&-%$mapG6%%(convertGF;%'symbolG-%%subsG6$-%*jets/ezipG6$FAF ;-F36#-FH6$-FK6$F;FAF?F,F,F,F,, Q1jets/jsimplify.mF, M7R0 I.jets/jvreducef*6&%$redG%$vecG%%ivarG%%dvarG6&%%_vecG%&_indsG%%operG%$cmdG6#%[ oCopyright~(C)~2000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C'@'-%%type G6$&9"6#!""%'stringG>8&f*6#%"aGF06$%)operatorG%&arrowGF0-%+jets/jsimpG6%9$T$-%" @G6$%'expandG%&numerGF0F06$F(9'2""%9#C$>8'&F76#""&>F<f*F>F0F@F0-FD6%FFFGT%F0F06 &F(FNF-FT>F<f*F>F0F@F0-FD6%FFFGFKF0F0FM>8$9%>8%-%-jets/getindsG6%-%$mapG6$f*F>F 0F@F0&FF6#"""F0F0F0F]oFNQ!F0?(F0FjoFjoF00-%+jets/jsubsG6&FFF`o9&FNF`oC$>F]o-Feo 6$f*F>F0F@F07$-F_p6&FGFhoT&T(&FF6#""#F0F06(F%FFF'FapF(FNF]o>F`o-Fbo6%-Feo6$f*F> F0F@F0FhoF0F0F0F]oFNF[p-%.jets/gcollectG6%-F<6#F]oFapFNF0F0F0F0, Q0jets/jvreduce.mF0 M7R0 I-jets/killingf*6#%%lmatG6&%#iiG%#jjG%$numG%"KG6#%[oCopyright~(C)~2000-2002~by~ Mohamed~Barakat.~All~rights~reserved.G6"C&>8&-%%nopsG6#9$>8'-%'matrixG6$F0F0?(8 $"""F<F0%%trueG?(8%F;F<F0F=C$>&F66$F;F?-&%'linalgG6#%&traceG6#-%&evalmG6#-%#&*G 6$&F46#F;&F46#F?>&F66$F?F;FB-%%copyG6#F6F-F-F-F-, Q/jets/killing.mF- M7R0 I+jets/ldchrf*6&%$vecG%$chrG%%ivarG%%dvarG6#%$evlG6#%[oCopyright~(C)~2000-2002~ by~Mohamed~Barakat.~All~rights~reserved.G6"C%@%-%,jets/chkvecG6#9%>8$F3>F5-%/je ts/char2evolG6$F39'-%,jets/liecomG6&9$F59&F:@%F0-%.jets/vec2evolG6%%"%GF?F:-%.j ets/vec2charGFCF-F-F-F-, Q-jets/ldchr.mF- M7R0 I,jets/orderdf*6#%%funcG6$%(ord_derG%$derG6%%[oCopyright~(C)~2000-2002~by~Moham ed~Barakat.~All~rights~reserved.G%'systemG%)rememberG6"@'-%$hasG6$9$%%diffGC&>8 $""!>8%F2?(F-"""F;F--F06$F9F3C$>F6,&F6F;F;F;>F9-%#opG6$F;F9F6-F06$-FC6$F7F2%"DG @'-%%typeG6$-FC6$7$F7F7F2%(indexedG-%%nopsG6#FN-FL6$FN%)functionG-FC6$7%F7F7""# F2F;F7F-F-F-F-, Q.jets/orderd.mF- M7R0 I,jets/ricci0f*6$%#ggG%%dvarG6%%"aG%%ric2G%"RG6#%[oCopyright~(C)~2000-2002~by~M ohamed~Barakat.~All~rights~reserved.G6"C&>8$-&%'linalgG6#%'coldimG6#9$@%2""#9#> 8%9%>F=-%,jets/ricci2G6$F7F>>8&-%-jets/scalarcG6%F7F=Q!F--%)simplifyG6#-%&evalm G6#,&F="""*(FDFPF0!""F7FPFRF-F-F-F-, Q.jets/ricci0.mF- M7R0 I+jets/sdfacf*6&%$vecG%#SSG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Moha med~Barakat.~All~rights~reserved.GF)-%'expandG6#,&-%$mapG6$f*6#%"aGF)6$%)operat orG%&arrowGF)-%+jets/dprodG6$T$-F16$f*6#%"bGF)F6F)-F:6$-%-jets/jetcoorG6%"""F<7 #9$-F16$f*6#%"cGF)F6F)-%-jets/partderG6&FIF<T&T(F)F)6(F5FSF'F<F(T*-%,jets/cflis tG6$FRF<F)F)6*F'FSF%FUF5FIF(FRFRF)F)6*F&9%F(9'F'9&F%FIFfnFG*&-%(convertG6$-F16$ f*F@F)F6F)-F:6$FD-F16$f*FMF)F6F)FOF)F)6(FAFIF'F<F(FSFVF)F)6(F'FgnF%FIF(FfnFfn%" +GFGFenFG!""F)F)F)F), Q-jets/sdfac.mF) M7R0 I,jets/sdlintf*6'%%exprG%%ivarG%%dvarG%"QG%"lG6&%&_exprG%#_QG%#QQG%#llG6#%inCop yright~(C)~2000-2002~by~Gehrt~Hartjen.~All~rights~reserved.G6"C(>8%-%,jets/mkli stG6#9'@$0-%%nopsG6#F4-F<6#9&-%&ERRORG6#%GQ~must~have~as~many~components~as~dva rG-%'assumeG6#1""!8'>8&-%%subsG6$/9(FJF4>8$-FN6$FP9$-%+jets/jsimpG6$-%$intG6$-F X6%-%+jets/QsubsG6&FLFS9%F@F@-%"@G6$%'expandG%)simplifyG/FJ;FI"""F@F1F1F1F1, Q.jets/sdlint.mF1 M7R0 I1jets/sortcon.oldf*6$%%vconG%%lvarG6&%#iiG%#jjG%$vecG%#vvG6#%[oCopyright~(C)~2 000-2002~by~Mohamed~Barakat.~All~rights~reserved.G6"C&@$5/9$""!/F37"-%'RETURNG6 #-%$mapG6$f*6#%"aGF.6$%)operatorG%&arrowGF.7$F47#F3F.F.F.9%>8&%%NULLG?&8$FE%%tr ueGC%>8'F4?&8%F3FK@$/7#FJ&FP6#""#>FN,&FN"""&FP6#FYFY>FG6$FG7$FNFS7#FGF.F.F.F., Q3jets/sortcon.old.mF. M7R0 I-jets/sortconf*6$%%vconG%%lvarG6&%&nlvarG%$vecG%"iG%$posG6#%[pCopyright~(C)~20 00-2005~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6"C'@$5/9$""!/ F37"-%'RETURNG6#-%$mapG6$f*6#%"aGF.6$%)operatorG%&arrowGF.7$F47#F3F.F.F.9%>8$-% %nopsG6#FE>8%-%&arrayG6$;"""FG7#-%"$G6$F4FG?(8&FQFQ-FI6#F3%%trueG@$-%'memberG6% -%#opG6#&F36$FW""#FE.8'>&FL6#F`o,&FboFQ&F36$FWFQFQ-F;6$f*6#F*[email protected]$&T#FY7#&T& FYF.F.6&F)FLF&FE7#-FT6#FPF.F.F.F., Q/jets/sortcon.mF. M7R0 I-jets/upldsrcf*6&%$vecG%#SSG%%ivarG%%dvarG6"6#%[oCopyright~(C)~2000-2002~by~Mo hamed~Barakat.~All~rights~reserved.GF)-%'expandG6#,(-%$mapG6$f*6#%"aGF)6$%)oper atorG%&arrowGF)-%,jets/liederG6&T$9$T&T(F)F)6(F%F=F'9&F(9'9%"""*&-%*jets/pDivG6 %-%,jets/cflistG6$F=FAFAFBFDFCFDFD-F16$f*F4F)F6F)-%+jets/dprodG6$F<-F16$f*6#%"b GF)F6F)-%-jets/partderG6&F=F<F>F?F)F)6(F5F=F'T*F(F?-FJ6$F>F?F)F)6*F&FCF%F=F(FBF 'FAFBFDF)F)F)F), Q/jets/upldsrc.mF) M7R0 I4jets/F1coorByDegreef*6'%#_RG%$degG%&_ivarG%&_DvarG%&_uvarG6G%"RG%)get_varsG%$ posG%%ivarG%%DvarG%%wvarG%%uvarG%$invG%%SUBSG%%dvarG%"nG%"qG%%jvarG%#RpG%&ujvar G%"iG%"jG%"kG%%lstIG%'tFoundG%$InvG%'lstOldG%%lOldG%"aG%"bG%"cG%"vG%"wG%&cfvarG %$kerG%'cndkerG%%cnd2G%'cfvar2G%'bFoundG%)lstFoundG%(lstSubsG%'lstDenG6#%[pCopy right~(C)~2004-2007~by~Mohamed~Barakat~and~Arne~Lorenz.~All~rights~reserved.G6" CO>8'-%,jets/mklistG6#9&>8(-FW6#9'@%-%,jets/chkvecG6#9$C%>8*-FW6#9(>8$-%-jets/e qn2indG6%F]oFUFen>Feo-%$mapG6$f*6#FBFR6$%)operatorG%&arrowGFR,$F]o!""FRFRFR-%.j ets/vec2charG6%FeoFUF`oC'>8)-FW6#&9"6#""&@%29#F_q@%/-%%nopsG6#Fip""">F`o7#%"uG> F`o-F[p6$f*F^pFRF_pFR-%$catG6$F[rF]oFRFRFR7#-%"$G6#;FhqFeq>F`o-FW6#&F]q6#""'>Fe o-F[p6$f*F^pFRF_pFR@%-%%typeG6$F]o%"=G,&-%$lhsGF\oFhq-%$rhsGF\oFcpF]oFRFRFR-FWF \o>Feo-Fgo6%FeoFUFip>Feo-%%subsG6$-%*jets/ezipG6$FipF`oFeo@$55/Feo7"/Feo7#""!/F eo7#-Fer6$F^u-Ffq6#Feo-%'RETURNG6#F[u>8/-%-jets/getiordG6$FeoFen>81&-%-jets/pro lsysG6(FeoFhqFUFenF`oQ!FR6#;Fhq,&-Ffq6#F`oFcpFcpFhq>80-%-jets/jetcoorG6%7#,&Fiu FhqFhqFhqFUFen>Fjv-F[p6$f*F^pFRF_pFR&T#6#FbpFRFR6$F7Fjv7#-Fer6#;Fhq-Ffq6#Fjv>82 &-Fav6'F`oFhqFUF`oFcvFdv>88-F[p6'%-jets/extderpGF^vFjvFUFen>Fdx-%(convertG6$-&% 'linalgG6#%*transposeG6#Fdx%)listlistG-%)userinfoG6%""#<$F"%/F1coorByDegreeG%0c alculated~Inv.G>8H-F[p6$f*F^pFRF_pFR-F[p6$%&denomGF]oFRFRFRFdx-Fdy6%FhqFgy%6rem oving~denominatorsG>F[z-F[p6$f*F^pFRF_pFR-%$lcmG6#-%#opGF\oFRFRFRF[z@$/-Fjx6$-F [p6$f*F^pFRF_pFR-Fds6$F]o%(numericGFRFRFRF[z%$andG%&falseGC%-Fdy6%FhqFgy%>found ~nontrivial~denominatorsG>Fdx-F[p6$f*6#F:FRF_pFR-F[p6$f*F^pFRF_pFR-%'factorG6#* &&Few6#T&FhqF]oFhqFRFR6&FOT%F:F]o&FewF\oFRFR6&F?FdxFOF[z7#-Fer6#;Fhq-FfqFay>Fdx -%(collectG6%FdxF`o%,distributedG@$-Fds6$&F]q6#Fcp%'stringGC)>89&F]q6#!"#>Fc^l- F[p6&Fh]lFc^lF_xFj]l>Fc^l-F[p6$f*F^pFRF_pFR-F[p6$f*6#FCFRF_pFR-%&coeffG6$T$F]oF RFR6$FBF]oFewFRFR6$F9F_xFc^l>Fc^l7#-%-selectremoveG6$f*F^pFRF_pFR@%/-%'degreeG6 $F]oFewF^u%%trueGFi[lFRFR6$F1F`oFc^l-Fdy6'FhqFgy%*excludingG-Ffq6#&Fc^l6#Fhq%>o ld~solutions~of~degree~zero.G>Fdx7$-F][lFay-F][lFi`l>Fc^l&Fc^l6#Ffy-Fdy6&FhqFgy %.#~of~columns:G-Ffq6#&FdxF[al>Fdx7#-F[`l6$f*F^pFRF_pFR@%/-%'indetsGF\o<"Fc`lFi [lFRFRFRFdx-Fdy6'FhqFgy%)removingGFgal%2redundant~columnsG>8.-Ffq6#&FdxFcal>Fdx 7%7%Fhq-Fer6$F^uFibl-F][l6#F_x-F][l6#-F[p6$f*Fb\lFRF_pFR7$-F][l6#-%'subsopG6$/, &F]oFhqFhqFhqFhq7#-Fer6$F^u,&FewFhqFhqFhq-F][l6#&F^]l6$FfyF]oFRFR6&F5FiblF?Fdx7 #-Fer6#;FhqFibl-F][l6#-F[p6$f*F^pFRF_pFR7$FbdlF\[lFRFR6$F5FiblFial>Fdx-Fjx6$-&F ^y6#%*gaussjordGFayFby@$F\^l>Fc^l-F[p6$f*F^pFRF_pFR-Fbt6$-%%ezipG6$FewF]o&&F^]l F[al6#;,&T'FhqFfyFhqFcpFRFR6(F9F_xF?FdxF5FiblFc^l>F_x&Fial6#;,&FiblFhqFfyFhqFcp >Fdx-F[p6$f*F^pFRF_pFR&F]o6#;,&FewFhqFfyFhqFcpFRFRFdel&Fdx6#;Ffy,&FiblFhqFhqFhq @$F\^l>Fc^l-F[p6$f*F^pFRF_pFR-F[p6$f*Fb\lFRF_pFR@$0F_]lF^u&F\]lF\oFRFR6&F9FewFB F]o7#-Fer6#;Fhq-Ffq6#FewFRFRFg_lFc^l>Fdx-F[p6$f*F^pFRF_pFR-F[p6$f*Fb\lFRF_pFR@$ FghlFhhlFRFRFihlFjhlFRFRFg_lFdx>F_x-F[p6$f*F^pFRF_pFR@$0F]oF^uF]oFRFRFRF_xFdal> 8EFc`l?(FRFhqFhqFRF_jlC'>83Fhq>FiblFe]l>F_jlFi[l?(FRFhqFhqFR31FcjlFibl/F_jlFi[l C$>8F-F[p6$f*6#F;FRF_pFR@$30&&Few6#F^]lF\oF^u-Fds6$Fd[mFg[lF]oFRFR6&F?FdxF:Fcjl 7#-Fer6#;Fhq-Ffq6#&Fdx6#Fcjl@%0F\[mF[uC$>F_jlFc`l>84&F\[mF[al>Fcjl,&FcjlFhqFhqF hq@$F_jlC(>F\[m-F[p6$f*F^pFRF_pFR*&F]oFhq&Few6$F^]lF[glFcpFRFR6(F?FdxF:FcjlF;Fg \mF`\m>Fdx-F]dl6$/Fcjl%%NULLGFdx>Fdx-F[p6$f*F^pFRF_pFR-F[p6$f*6#F<FRF_pFR@$0F]o Few,&FhhlFhq*&&F\]lF_ilFhq&F[glF\oFhqFcpFRFR6(F;F^]lFBF]oFMFewFjhlFRFR6&FMF\[mF ;Fg\mFdx>F_x-F[p6$f*Fa^mFRF_pFR,&F_]lFhq*&Fe[mFhqFg^mFhqFcpFRFR6(F9F_xF;Fg\mFMF \[m7#-Fer6#;Fhq-FfqFccl@$F\^lC$>Fc^l-F[p6$f*F^pFRF_pFR-F[p6$f*Fa^mFRF_pFR,&&Fe_ lF\oFhq*&&Fe_lFf[mFhqFg^mFhqFcpFRFR6(FBF]oF;F^]lFMF[glFjhlFRFRF`_mFc^l>Fc^l-F[p 6$f*F^pFRF_pFR-F[p6$f*Fb\lFRF_pFR@$FghlFhhlFRFRFihlFjhlFRFRFg_lFc^l>F_x-F[p6$f* F^pFRF_pFR@$F]jlF]oFRFRFRF_xFdal>8@-F[p6$f*Fb\lFRF_pFR-%(jetcoorG6%7#-Fer6#;F^u ,&Fe_lFhq-Fa`l6$&F^]lF\oF[glFcpF[gl7#-Far6$%#_cGF]oFRFR6(F&9%F9F_xF1F`oFa_m>8A- F[p6$f*F^pFRF_pFR-Fjx6$-F[p6$f*Fa_lFRF_pFR@%-Fds6$F]o%(indexedG*&-%(ind2subGF\o Fhq-Fjx6$7#F\[l%"*GFhqFfcmFRFRFRF]o%"+GFRFRFRFbam>Fbam-F[p6$Fgcm-F[p6$F][lFbam- Fdy6'FhqFgy%.starting~withG-Ffq6#Fbam%+variables.G@$F\^l-Fdy6'FhqFgyFg`l-Ffq6#F c^l%@old~solutions~of~degree~>~zero.G>8BF[u@$3F\^l0Fc^lF[uC%>Fc^l-Fh]l6%Fc^lF`o Fj]l?&8:Fc^lFc`lC&>Fhem-F[p6$f*F^pFRF_pFR@%-Fds6$F]oF\dm-Fjx6$F]o%%listG7#F]oFR FRFRFhem>F\[m-F[p6$f*Fb\lFRF_pFR@$0F_]lF]u-F[p6$f*F^pFRF_pFR*&-%'selectG6%%'div ideGFj\lF]oFhqF]oFcpFRFR6&FHF^]lF:F]oF_]lFRFR6&FAFhemFHFhbm7#-Fer6#;Fhq-Ffq6#Fh bm>F\[m-Fjx6$-F[p6$F][lF\[mF\dm>F_em7$-F][l6#F_em-%'coeffsG6$-Fh]l6%F\[mF`oFj]l F`o-Fdy6&FhqFgy%:#~of~equations~from~this:G-FfqFchm?&8+FdxFc`lC$>F_em7$F_em-Fjx 6$-%$zipG6%f*6$FCFDFRF_pFR*&F]oFhqFfbmFhqFRFRFRFhbmF^imF\dm@%/&F_emFcalF^u>F_em &F_emF[alC,>F\[m7#-Fehm6$-Fh]l6%F\jmF`oFj]lF`o-Fdy6'FfyFgy%0#~of~equations:G-Ff q6#F\[m%&(new)G>87-%&tableGFR@)3/F^jmF[u/F\[mF[u>F_emF[uFb[n>F_em7#-%$seqG6$-%# ifG6%5-%)assignedG6#&F][n6#&F\[mFa\m-F_\n6#&F][n6#,$Fc\nFcpFi]m-F][l6#7$-%'assi gnG6$Fa\nFc`lFc\n/Fcjl;FhqFijmFc[n>F_em7#-Fh[n6$-F[\n6%5-F_\n6#&F][n6#&F_em6$Fh qFcjl-F_\n6#&F][n6#,$F\^nFcpFi]m-F][l6#7$-F]]n6$Fj]nFc`lF\^n/Fcjl;Fhq-Ffq6#F^jm >F_em7$Fg[nFc]n-Fdy6&FhqFgyFhjmF\im@$0F_emF[uC&-Fdy6%FhqFgy%2looking~for~zerosG >F_jlFc`l?(FRFhqFhqFRF_jlC$>F\[m-F[p6$f*F^pFRF_pFR@&/-FfqF\oFhqF]o-Fds6$F]oF[dm *&F]oFhq-FehmF\oFcpFRFRFRF_em@%Fc[n>F_jlFi[lC)>F\[m-F[p6$f*F^pFRF_pFR@$-%'membe rGFb`lF]oFRFR6$FMF\[mFbam-Fdy6&FfyFgy%'found:GFijm>Fbam-F[p6$f*F^pFRF_pFR@$/F\a nFi[lF]oFRFRF^anFbam>F\[m-F[p6$f*F^pFRF_pFR/F]oF^uFRFRFRF\[m>Fhbm-Fbt6$F\[mFhbm >F_em-F[p6$f*F^pFRF_pFR@$F]jlF]oFRFRFR-Fbt6$F\[mF_em-Fdy6&FhqFgy%/#~of~equation sGF\im-Fdy6'FhqFgy%6eliminated~all~zeros,GFedm%0variables~left.G@$/FedmF^uC$>Fh bm-Fjx6$FhbmF\dm@%/FhbmF^uOF[uOFhbm@$Fa_nC%>F_jlFc`l-Fdy6%FhqFgy%Slooking~for~e quations~concerning~2~variables~only.G?(FRFhqFhqFRF_jlC%>F\[m-F[p6$f*F^pFRF_pFR @$1F_`nFfyF]oFRFRFRF_emF_an@%Fc[n>F_jlFi[lC,>8D-FbblFjjm>Fjdn-F[p6$f*F^pFRF_pFR @$F\anF]oFRFR6$FKFjdnFbam>8GF[u?(FRFhqFhqFR3Fc\m0FjdnF[uC%>8>&FjdnF[al>Fjdn-F]d l6$/FhqFi]mFjdn@$-%$hasG6$F\[mFienC&>6$8CF\[m-F[`l6%FafnF\[mFien>Fffn-F[p6$f*F^ pFRF_pFR-%&solveGFb`lFRFR6$FEFienFffn@'-F]an6$F^uFffn>8?F^u/-Ffq6#FffnFhq>Fdgn& FffnF[alC)>Fdgn-F[p6$f*F^pFRF_pFRFb`nFRFRFRFffn>Fdgn-F[p6$f*F^pFRF_pFR@$F\anF]o FRFR6$FFFdgnFjdn>6$FdgnFffn-F[`l6%FafnFffn&FdgnF[al@%/-Ffq6#FdgnFhq>FdgnFihnC$> Fffn7$-F][l6#&Fdgn6#;FfyFcp-F][lFggn>FdgnFihn>Fffn-F[p6$f*F^pFRF_pFR,&FewFhqF]o FcpFRFRFdhnFffn>Fffn-F[p6$f*F^pFRF_pFR@$F]jlF]oFRFRFRFffn>F\[m7$-F][lFjjmFgin>F cen7$-F][l6#-Fbt6$/FienFdgnFcenF\[o>F_em-F[p6$f*F^pFRF_pFR@$F]jlF]oFRFRFR-Fbt6$ FcenF_em>Fhbm-Fbt6$FcenFhbm>Fcen-F[p6$FisFcen>Fbam-F[p6$f*F^pFRF_pFR@$FganF]oFR FR6$FNFcenFbam-Fdy6&FfyFgyFhjmF\im-Fdy6&FfyFgy%0#~of~variables:GFedm-Fdy6'FhqFg y%Reliminated~all~equations~with~two~variables~only,GFedmF]cn@$F_cnC$>FhbmFbcn@ %FecnOF[uOFhbm@%Fa_nC'-Fdy6%FhqFgy%=starting~kernel~computation:G>F_em-F^gn6$<# Fbhm<#-F][lFfdm>Fhbm-Fbt6$F_emFhbm>Fbam7#-F][l6#-F[p6$f*F^pFRF_pFR@$/FjsFhsFhsF RFRFRF_em>Fhbm-F[p6$f*Fb\lFRF_pFR-Fbt6$-Fet6$Few-F]dl6$/F]oFhq7#-Fer6$F^uF^ilF^ ]lFRFR6&FGFbamFHFhbm7#-Fer6#;FhqFedm>Fhbm-F[p6$f*Fb\lFRF_pFRFi^oFRFRFc_oFd_o>Fh bm-F[p6$f*F^pFRF_pFR-Fjx6$-Feim6%f*FhimFRF_pFRFiimFRFRFRF]oFewF\dmFRFRFg_lFhbm@ $3F\^l/F^^lQ*eliminateFRC2>F_xF`x>Fc^lFd^l>Fc^lFh^l>Fc^l-F[p6$f*F^pFRF_pFR-F[p6 $f*Fa_lFRF_pFRFb_lFRFRFf_lFewFRFRFg_lFc^l-Fdy6&FhqFgy%H#~of~solutions~before~la st~elimination:GFigm>FiblFigm>F\[m-F[p6&Fh]lFhbmF_xFj]l>F\[m-F[p6$f*F^pFRF_pFR- F[p6$f*Fa_lFRF_pFRFb_lFRFRFf_lFewFRFRFg_lF\[m>F\[m-F[p6$f*Fb\lFRF_pFR7$-F][l6#- F]dl6$F__o7#-Fer6$F^uFew-F][l6#F`bmFRFR6&F5FiblFMF\[m7#-Fer6#F`]n>F\[m7$Fejn-F] [l6#-F[p6$f*F^pFRF_pFR7$F\coF\[lFRFRFdelFc^l>F\[m&-Fjx6$-FielFjjmFbyF\el>Fhbm-F [p6$f*Fb\lFRF_pFR@$0&F_]l6#;,&F^]lFhqFhqFhqFcp7#-Fer6$F^u,&-Ffq6#F_]lFhqF^]lFcp Fg^mFRFR6(FMF\[mF5FiblFHFhbmFaco>F\[m-F[p6$f*F^pFRF_pFR@$0&F]o6#;FddlFcp7#-Fer6 $F^u,&F_`nFhqFewFcpFheoFRFRFdelF\[m>86F[u?(FcjlFhqFhqFijmFc`l@$/-&F^y6#%%rankG6 #7$-F][l6#-F[p6$f*F`[mFRF_pFRF_]lFRFRF^anF`foFc\n,&-Ffq6#F`foFhqFhqFhq>F`fo7$-F ][lFagoFcjl>Fhbm-F[p6$f*Fb\lFRF_pFRF_]lFRFR6$FHFhbmF`foOFhbmFRFRFRFR, Q6jets/F1coorByDegree.mFR