M7R0
I2_physicsdiff_termf*6&%%exprG%)functionG%%termG%'dparamG6'%(counterG%)counter2
G%$tmpG%(rettermG%6_physicsdiff_innervarG6"F/C$>8'""!@%-%#isG6#/-%#opG6$F39'%%l
istGC$?(8$"""FA-%%nopsG6#F<%%trueG?(8%FAFA%>MAXIMUM_NUMBER_OF_DERIVATIVESGFEC$>
8&-%%subsG6$/-%%diffG6$9%-%"$G6$&F<6#F@FG-8(6#FW9&>F2,&F2FA*&)!""FGFA-FQ6$-FM6$
/FYFP-_%(PhysicsGFQ6$FKFYFTFAFA-%'RETURNG6#F2C$?(FGFAFAFHFEC$>FK-FM6$/-FQ6$FS-F
U6$F<FG-FZFDFfn>F2,&F2FA*&FjnFA-FQ6$-FM6$/FcpF_p-Fbo6$FKFcpFapFAFAFeoF/F/F/F/,
I,physicsdifff*6%F%F&F(6(%&expr2G%(newexprG%+exprlengthGF'F,F*F/F/C)@$4-F66#/-F
:6$F3*&-%"fG6#%"rGFA-%"gGF`rFA%"*GC$-%&printG6#Q`vError:~Conflicting~package~de
tected!~The~`*`~declaration~has~been~redefined~and~results~are~therefore~unreli
able.~Make~sure~you~have~loaded~physicsdiff~before~running~with(Physics).F/-Ffo
6#9$@$-%)assignedG6#%&makegGC$-Fgr6#Q_vError:~Conflicting~package~detected!~GRT
ensor~overwrites~a~number~of~variables~that~can~cause~physicsdiff~to~perform~in
~unstable~ways.~Please~use~physicsdiff~before~running~grtw().F/Fjr>F@-%'expandG
F[s>FK-FCFX>FGF3@%-F66#/-F:6$F3F@%"+G?(8)FAFAFKFEC$>F2-F:6$FdtF@>FG,&FGFA-F"6&F
GFSF2FfnFAC$>F2F@>FGFjt-Ffo6#,&FGFA-Fbo6$F@FSFA6#Qj]lThis~Maple~procedure~will~
perform~a~physicists'~functional~differentiation,~neglecting~boundary~terms~and
~integrating~by~parts~to~functionally~vary~an~expression~with~respect~to~a~func
tion,~even~if~it~contains~powers~of~first~derivatives~of~that~function.~Written
~by~W.~Brenna,~Sept~3~2012.~Version~0.3.F/F/F/F/
