Maple 18 Questions and Posts

These are Posts and Questions associated with the product, Maple 18

Let x:=2*[x_1,x_2,...,x_n];   y:=3*[x_1,x_2,...,x_n]; If I input x+y, it will turn out  5*[2x_1,2x_2,...,2x_n]; But I want to get  5*[x_1,x_2,...,x_n]. What should I do? Thanks!!

Good morning.

 

I request your kind suggestion to my query posted.

 

 

With thanks & Regards

 

M.Anand

Assistant Professor in Mathematics

SR International Institute of Technology,

Hyderabad, Andhra Pradesh, INDIA.

Hi,

I wonder if there is a way to achieve this, say I have 4 Maple worksheets,

sheet1.mw

sheet2.mw

sheet3.mw

sheet4.mw

all of them can run seperately. Each of them runs on lots of data, and takes a big chuck of time. I hope to run them one by one. After each file is completed, save (Export) as PDF file, and move on to the next one.

On my own PC, I use Maple X64 windows version. I have never used the command line, but I suppose that will be done in this version, instead of the GUI version?

On the school server, it's Maple X64 linux version. So it's also has the maple command line version as well as the xmaple version.

 

Thanks,

casper

restart:
seq1:=seq(i,i=1..5);
seq2:=seq(i,i=2..6);
dseq:=seq2-seq1;
seq1:=seq(i,i=1..5);
seq2:=seq(i,i=1..5);
dseq:=seq2-seq1;
seq1:=[seq(i,i=1..5)];
seq2:=[seq(i,i=1..5)];
dseq:=seq2-seq1;

Is that possible to get the differences between two sequences directly? (instead of using a list)

I don't quit understand why the second method would collapse the 0s into just a single value. It's not a set.

 

Thanks,

casper

It says at

http://www.maplesoft.com/products/maple/new_features/maple18/Language_Programming.aspx#random

"When generating matrices and vectors of floats and integers, these flavors are very fast. "

But when I compare the new

time[real](Generate(('Matrix')(float, 300, 300)))

and

time[real](RandomMatrix(300, 300))

I find RandomMatrix over 300 times faster. Am I doing something wrong, or is RandomMatrix still the fastest way to generate random numbers?

 

 

Everytime I re-run a workfile, I get several extra editing lines inbetween my own command lines. Have I missed something in my settings?

Best regards
Emilijan Vuletici

Now that I got my units converted I have a new problem:

 

I have g/mol and g/cm^3, and the result is supposed to be per cm^3 too. So I would like to keep my grams as well as my  cm^3. However, Maple converts it all to kg and m^3!

 

That means I have to divide the final result by 10e6. No big deal, only that it looks strange on my worksheet (when I divide the units stay the same, so if I show that to someone they'll be amazed at the gigantic m^3 result number I got instead of just a few cm^3).

 

By the way, turing off the automatic unit cancellation (see link, my question a few days ago) does not change anything, the g->kg and cm^3->m^3 conversion take place as soon as I enter the values:

 

results in

 

and

gives

Hi guys,

im trying to solve the linear equation system:

mysol := solve({J*a = m*l*(-c*ct^2*sf-c*sf*st^2+cf*d*st^2+d*sf*st^2)+m*g*l*st, cx*ux = cMx*xd+M*c+m*l*(-cp*pd^2*st-cp*st*td^2-2*ct*pd*sp*td+a*cp*ct-b*sp*st), cy*uy = cMy*yd+M*d+m*l*(2*cp*ct*pd*td-pd^2*sp*st-sp*st*td^2+a*ct*sp+b*cp*st), (-l^2*m*st^2+J)*b = -ml(c*cf*ct+ct*d*sf)}, {a, b, c, d}) :

Then, assigning the solutions:

assign(mysol):

Then, eliminating the RootOf's for variable a:

a_explicit := allvalues(a):

Unfortunately, a_explicit still contains RootOf's. How can I avoid this?

Thanks,

Martin

 

Hi guys,

I'm trying to find the solutions to a nonlinear equation system:

mysol := solve({J*a = m*g*l*st-m*l*(c*cp*st+d*sp*st), cx*ux = cMx*xd+(Mx+m)*c+m*l*(-cp*pd^2*st-cp*st*td^2-2*ct*pd*sp*td+a*cp*ct-b*sp*st), cy*uy = cMy*yd+(My+m)*d+m*l*(2*cp*ct*pd*td-pd^2*sp*st-sp*st*td^2+a*ct*sp+b*cp*st), (-M*l^2*st^2+J)*b = m*l*sqrt(d^2-2*d*ct+ct^2+c^2*ct^2+(c^2*sp^2-2*c*cp*d*sp+cp^2*d^2)*st^2)}, {a, b, c, d})

The solution contains various implicit solutions with RootOf's. When trying to evaluate them by typing

allvalues(mysol);,

the returned set of solutions is about 800.000 characters long, but unfortunately contains various "+ [...15295 terms...] +" elements, and thus not displaying the full solution. The limits on the precision tab in the maple options are all disabled.
Does anybody know how to display the full expression, although it gets very long?

Thank you in advance,

Martin

Hi everyone,

I'm running Maple 18 and MapleSim 6.4 on my macbook pro 13 " with retina display and the GUI is blurred like there is no smoothing or the antialiasing is not working properly. I tried to find something helpfull in the setting but with no luck.

Is there something I can do to fix this?

Thanks

Carlo

Here in this work and used as the main topic a short description of electrostatics and electrodynamics using the Explore to model the fundamental laws command.

 Corriente_Eléctrica.mw   (in spanish)

 

Atte.

L. Araujo C.

 

 

I am having trouble with the SubstitutionTensor command.  It kicks out an error message for operand with different free indices, but the operands seems to be fine.  I checked all of the terms and they all seem fine. Thank you for your help.

 

 

restart

with(Physics):

Setup(mathematicalnotation = true, coordinatesystems = X, usephysicsevaluator = false)

[coordinatesystems = {X}, mathematicalnotation = true, usephysicsevaluator = false]

(1)

Define(l[mu]);

{Physics:-Dgamma[mu], Physics:-Psigma[mu], Physics:-d_[mu], eta[mu, nu], Physics:-g_[mu, nu], l[mu], Physics:-KroneckerDelta[mu, nu], Physics:-LeviCivita[alpha, beta, mu, nu], Physics:-SpaceTimeVector[mu](X)}

(2)

Define(G[mu, nu] = eta[mu, nu]+Physics:-`*`(l[mu](X), l[nu](X)))

{Physics:-Dgamma[mu], G[mu, nu], Physics:-Psigma[mu], Physics:-d_[mu], eta[mu, nu], Physics:-g_[mu, nu], l[mu], Physics:-KroneckerDelta[mu, nu], Physics:-LeviCivita[alpha, beta, mu, nu], Physics:-SpaceTimeVector[mu](X)}

(3)

declare(l(X))

l(x1, x2, x3, x4)*`will now be displayed as`*l

(4)

``

``

``

``

Setup(metric = rhs(G[]))

[metric = {(1, 1) = 1+l[1](X)^2, (1, 2) = l[1](X)*l[2](X), (1, 3) = l[1](X)*l[3](X), (1, 4) = l[1](X)*l[4](X), (2, 2) = 1+l[2](X)^2, (2, 3) = l[2](X)*l[3](X), (2, 4) = l[2](X)*l[4](X), (3, 3) = 1+l[3](X)^2, (3, 4) = l[3](X)*l[4](X), (4, 4) = -1+l[4](X)^2}]

(5)

g_[];

g[mu, nu] = (Matrix(4, 4, {(1, 1) = 1+l[1](X)^2, (1, 2) = l[1](X)*l[2](X), (1, 3) = l[1](X)*l[3](X), (1, 4) = l[1](X)*l[4](X), (2, 1) = l[1](X)*l[2](X), (2, 2) = 1+l[2](X)^2, (2, 3) = l[2](X)*l[3](X), (2, 4) = l[2](X)*l[4](X), (3, 1) = l[1](X)*l[3](X), (3, 2) = l[2](X)*l[3](X), (3, 3) = 1+l[3](X)^2, (3, 4) = l[3](X)*l[4](X), (4, 1) = l[1](X)*l[4](X), (4, 2) = l[2](X)*l[4](X), (4, 3) = l[3](X)*l[4](X), (4, 4) = -1+l[4](X)^2}))

(6)

``

Christoffel[`~alpha`, mu, nu] = convert(Christoffel[`~alpha`, mu, nu], g_)

Physics:-Christoffel[`~alpha`, mu, nu] = (1/2)*Physics:-g_[`~alpha`, `~beta`]*(Physics:-d_[nu](Physics:-g_[beta, mu], [X])+Physics:-d_[mu](Physics:-g_[beta, nu], [X])-Physics:-d_[beta](Physics:-g_[mu, nu], [X]))

(7)

Christoffel[beta, mu, nu] = convert(Christoffel[beta, mu, nu], g_)

Physics:-Christoffel[beta, mu, nu] = (1/2)*Physics:-d_[nu](Physics:-g_[beta, mu], [X])+(1/2)*Physics:-d_[mu](Physics:-g_[beta, nu], [X])-(1/2)*Physics:-d_[beta](Physics:-g_[mu, nu], [X])

(8)

``

SubstituteTensor(g_[mu, nu] = eta[mu, nu]+Physics:-`*`(l[mu](X), l[nu](X)), Physics:-Christoffel[beta, mu, nu] = (1/2)*Physics:-d_[nu](Physics:-g_[beta, mu], [X])+(1/2)*Physics:-d_[mu](Physics:-g_[beta, nu], [X])-(1/2)*Physics:-d_[beta](Physics:-g_[mu, nu], [X]), evaluateexpression)

Physics:-Christoffel[beta, mu, nu] = (1/2)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)+(1/2)*l[beta](X)*Physics:-d_[nu](l[mu](X), [X])+(1/2)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)+(1/2)*l[beta](X)*Physics:-d_[mu](l[nu](X), [X])-(1/2)*Physics:-d_[beta](l[mu](X), [X])*l[nu](X)-(1/2)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])

(9)

``

``

Christoffel[`~alpha`, mu, nu] = Simplify(Physics:-`*`(eta[`~alpha`, `~beta`]-Physics:-`*`(l[`~alpha`](X), l[`~beta`](X)), rhs(Physics:-Christoffel[beta, mu, nu] = (1/2)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)+(1/2)*l[beta](X)*Physics:-d_[nu](l[mu](X), [X])+(1/2)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)+(1/2)*l[beta](X)*Physics:-d_[mu](l[nu](X), [X])-(1/2)*Physics:-d_[beta](l[mu](X), [X])*l[nu](X)-(1/2)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X]))))

Physics:-Christoffel[`~alpha`, mu, nu] = -(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)*eta[`~alpha`, `~beta`]-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[beta](X)*Physics:-d_[nu](l[mu](X), [X])+(1/2)*l[beta](X)*Physics:-d_[nu](l[mu](X), [X])*eta[`~alpha`, `~beta`]-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)*eta[`~alpha`, `~beta`]-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[beta](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[beta](X)*Physics:-d_[mu](l[nu](X), [X])*eta[`~alpha`, `~beta`]+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])*eta[`~alpha`, `~beta`]+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])*eta[`~alpha`, `~beta`]

(10)

SubstituteTensor({Physics:-`*`(eta[`~mu`, `~nu`], d_[gamma](l[nu](X))) = d_[gamma](l[`~mu`](X)), Physics:-`*`(l[nu](X), eta[`~mu`, `~nu`]) = l[`~mu`](X), Physics:-`*`(l[`~mu`](X), l[mu](X)) = 0}, Physics:-Christoffel[`~alpha`, mu, nu] = -(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)*eta[`~alpha`, `~beta`]-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[beta](X)*Physics:-d_[nu](l[mu](X), [X])+(1/2)*l[beta](X)*Physics:-d_[nu](l[mu](X), [X])*eta[`~alpha`, `~beta`]-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)*eta[`~alpha`, `~beta`]-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[beta](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[beta](X)*Physics:-d_[mu](l[nu](X), [X])*eta[`~alpha`, `~beta`]+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])*eta[`~alpha`, `~beta`]+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])*eta[`~alpha`, `~beta`])

Physics:-Christoffel[`~alpha`, mu, nu] = -(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*l[nu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])*eta[`~alpha`, `~beta`]+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])*eta[`~alpha`, `~beta`]

(11)

Ricci[mu, nu] = convert(Ricci[mu, nu], Christoffel)

Physics:-Ricci[mu, nu] = Physics:-d_[alpha](Physics:-Christoffel[`~alpha`, mu, nu], [X])-Physics:-d_[nu](Physics:-Christoffel[`~alpha`, alpha, mu], [X])+Physics:-Christoffel[`~beta`, mu, nu]*Physics:-Christoffel[`~alpha`, alpha, beta]-Physics:-Christoffel[`~beta`, alpha, mu]*Physics:-Christoffel[`~alpha`, beta, nu]

(12)

SubstituteTensor(Physics:-Christoffel[`~alpha`, mu, nu] = -(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[nu](l[beta](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~beta`](X)*Physics:-d_[mu](l[beta](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*l[nu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[beta](l[mu](X), [X])*eta[`~alpha`, `~beta`]+(1/2)*l[`~alpha`](X)*l[`~beta`](X)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[beta](l[nu](X), [X])*eta[`~alpha`, `~beta`], Physics:-Ricci[mu, nu] = Physics:-d_[alpha](Physics:-Christoffel[`~alpha`, mu, nu], [X])-Physics:-d_[nu](Physics:-Christoffel[`~alpha`, alpha, mu], [X])+Physics:-Christoffel[`~beta`, mu, nu]*Physics:-Christoffel[`~alpha`, alpha, beta]-Physics:-Christoffel[`~beta`, alpha, mu]*Physics:-Christoffel[`~alpha`, beta, nu], evaluateexpression)

Physics:-Ricci[mu, nu] = (1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X]))+(-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`])*(-(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[beta](l[lambda](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/2)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])*eta[`~alpha`, `~lambda`]+(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])-(1/2)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`])-(-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)+(1/2)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])-(1/2)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])-(1/2)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`])*(-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/2)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/2)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`])+(1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X]))-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X]))-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X]))+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[mu](l[tau](X), [X]), [X])*l[alpha](X)

(13)

SubstituteTensor({Physics:-`*`(eta[`~mu`, `~nu`], d_[gamma](l[nu](X))) = d_[gamma](l[`~mu`](X)), Physics:-`*`(l[nu](X), eta[`~mu`, `~nu`]) = l[`~mu`](X), Physics:-`*`(l[`~mu`](X), l[mu](X)) = 0}, Physics:-Ricci[mu, nu] = (1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X]))+(-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`])*(-(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[beta](l[lambda](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/2)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])*eta[`~alpha`, `~lambda`]+(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])-(1/2)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`])-(-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)+(1/2)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])-(1/2)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])-(1/2)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`])*(-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/2)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/2)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`])+(1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X]))-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X]))-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X]))+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[mu](l[tau](X), [X]), [X])*l[alpha](X))

Physics:-Ricci[mu, nu] = (1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`])*((1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/2)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/2)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`])+(1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X]))-(-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)+(1/2)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])-(1/2)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])-(1/2)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`])*(-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/2)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/2)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`])+(1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X]))-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X]))-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X]))+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)

(14)

expand(Physics:-`*`(Physics:-`*`(Physics:-Ricci[mu, nu] = (1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)+(1/2)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])-(1/2)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])-(1/2)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]+(1/2)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])-(1/2)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`])*((1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/2)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/2)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/2)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`])+(1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X]))-(-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)+(1/2)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)+(1/2)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)+(1/2)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)+(1/2)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])-(1/2)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]+(1/2)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])-(1/2)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`])*(-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/2)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/2)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/2)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/2)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/2)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`])+(1/2)*eta[`~alpha`, `~tau`]*(Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X]))-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X]))-(1/2)*eta[`~alpha`, `~kappa`]*(Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X]))+(1/2)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X), l[`~mu`](X)), l[`~nu`](X)))

Physics:-Ricci[mu, nu]*l[`~mu`](X)*l[`~nu`](X) = (1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]

(15)

"SubstituteTensor({l[~mu](X)*l[mu](X)=0,l[nu](X)*eta[~mu,~nu]=l[~mu](X),eta[~mu,~nu]*d_[gamma](l[nu](X))=d_[gamma](l[~mu](X))},rhs(Physics:-Ricci[mu,nu]*l[~mu](X)*l[~nu](X) = -1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X),[X]),[X])-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](Physics:-d_[alpha](l[~alpha](X),[X]),[X])*l[mu](X)-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~alpha](X),[X])*Physics:-d_[mu](l[alpha](X),[X])-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X),[X]),[X])-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](Physics:-d_[mu](l[~alpha](X),[X]),[X])*l[alpha](X)-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~alpha](X),[X])*Physics:-d_[nu](l[alpha](X),[X])+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*Physics:-d_[mu](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X),[X]),[X])+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](Physics:-d_[mu](l[~alpha](X),[X]),[X])*l[nu](X)+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~alpha](X),[X])*Physics:-d_[alpha](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X),[X]),[X])+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](Physics:-d_[nu](l[~alpha](X),[X]),[X])*l[mu](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~tau]*Physics:-d_[nu](l[alpha](X),[X])*Physics:-d_[tau](l[mu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~tau]*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X),[X]),[X])+1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~tau]*Physics:-d_[nu](l[mu](X),[X])*Physics:-d_[tau](l[alpha](X),[X])+1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~tau]*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X),[X]),[X])-1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~kappa]*Physics:-d_[alpha](l[mu](X),[X])*Physics:-d_[kappa](l[nu](X),[X])-1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~kappa]*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X),[X]),[X])-1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~kappa]*Physics:-d_[alpha](l[nu](X),[X])*Physics:-d_[kappa](l[mu](X),[X])-1/2*l[~mu](X)*l[~nu](X)*eta[~alpha,~kappa]*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X),[X]),[X])+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]-1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)-1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]+1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[nu](l[iota](X),[X])*l[mu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*eta[~beta,~omega]*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])*eta[~alpha,~chi]-1/4*l[~mu](X)*l[~nu](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X),[X])*eta[~beta,~omega]*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])*eta[~alpha,~chi]+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[alpha](l[omega](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[nu](X)*Physics:-d_[iota](l[mu](X),[X])*eta[~beta,~iota]*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[mu](X)*Physics:-d_[iota](l[nu](X),[X])*eta[~beta,~iota]*l[alpha](X)*Physics:-d_[lambda](l[beta](X),[X])*eta[~alpha,~lambda]+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*l[~alpha](X)*l[~lambda](X)*Physics:-d_[alpha](l[lambda](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*l[~alpha](X)*l[~lambda](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~iota](X)*Physics:-d_[mu](l[iota](X),[X])*l[nu](X)*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[nu](l[chi](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*Physics:-d_[beta](l[chi](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*l[nu](X)*Physics:-d_[chi](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[~alpha](X)*l[~chi](X)*l[beta](X)*Physics:-d_[chi](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*l[~omega](X)*Physics:-d_[mu](l[omega](X),[X])*l[alpha](X)*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~tau](X)*Physics:-d_[alpha](l[tau](X),[X])*Physics:-d_[nu](l[mu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[~tau](X)*Physics:-d_[alpha](l[tau](X),[X])*l[mu](X)+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[nu](l[~tau](X),[X])*Physics:-d_[alpha](l[tau](X),[X])*l[mu](X)+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~tau](X)*Physics:-d_[mu](l[tau](X),[X])*Physics:-d_[nu](l[alpha](X),[X])+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[~tau](X)*Physics:-d_[mu](l[tau](X),[X])*l[alpha](X)+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[~kappa](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[alpha](l[~kappa](X),[X])*l[mu](X)*Physics:-d_[kappa](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*Physics:-d_[alpha](l[mu](X),[X])*Physics:-d_[kappa](l[nu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X),[X]),[X])+1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[~kappa](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[alpha](l[~kappa](X),[X])*l[nu](X)*Physics:-d_[kappa](l[mu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*Physics:-d_[alpha](l[nu](X),[X])*Physics:-d_[kappa](l[mu](X),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X),[X]),[X])-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[~kappa](X)*Physics:-d_[mu](l[kappa](X),[X])*l[nu](X)-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[alpha](l[~kappa](X),[X])*Physics:-d_[mu](l[kappa](X),[X])*l[nu](X)-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X),[X]),[X])*l[nu](X)-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*Physics:-d_[mu](l[kappa](X),[X])*Physics:-d_[alpha](l[nu](X),[X])+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~beta](X),[X])*l[mu](X)*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[nu](l[mu](X),[X])*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[nu](X)*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[alpha](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[alpha](X),[X])+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*Physics:-d_[alpha](l[~alpha](X),[X])*l[beta](X)+1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*l[~alpha](X)*Physics:-d_[alpha](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[nu](X),[X])*Physics:-d_[lambda](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[mu](l[~beta](X),[X])*l[alpha](X)*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[mu](l[alpha](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~beta](X),[X])*l[mu](X)*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*Physics:-d_[nu](l[~alpha](X),[X])*l[beta](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[nu](l[beta](X),[X])-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[~tau](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X),[X])-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~tau](X)*Physics:-d_[nu](l[alpha](X),[X])*Physics:-d_[tau](l[mu](X),[X])-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[nu](l[~alpha](X),[X])*l[~tau](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X),[X])-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[nu](l[~tau](X),[X])*l[mu](X)*Physics:-d_[tau](l[alpha](X),[X])-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~tau](X)*Physics:-d_[nu](l[mu](X),[X])*Physics:-d_[tau](l[alpha](X),[X])-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~tau](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X),[X]),[X])+1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~tau](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X),[X]),[X])*l[mu](X)-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*Physics:-d_[nu](l[kappa](X),[X])*Physics:-d_[alpha](l[mu](X),[X])-1/2*l[~mu](X)*l[~nu](X)*Physics:-d_[alpha](l[~alpha](X),[X])*l[~kappa](X)*Physics:-d_[nu](l[kappa](X),[X])*l[mu](X)-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*Physics:-d_[alpha](l[~kappa](X),[X])*Physics:-d_[nu](l[kappa](X),[X])*l[mu](X)-1/2*l[~mu](X)*l[~nu](X)*l[~alpha](X)*l[~kappa](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X),[X]),[X])*l[mu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*Physics:-d_[beta](l[~alpha](X),[X])*l[nu](X)-1/4*l[~mu](X)*l[~nu](X)*l[~beta](X)*Physics:-d_[alpha](l[mu](X),[X])*l[~alpha](X)*Physics:-d_[beta](l[nu](X),[X])))"

op(32, rhs(Physics:-Ricci[mu, nu]*l[`~mu`](X)*l[`~nu`](X) = -(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)))

(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]

(16)

op(17, rhs(Physics:-Ricci[mu, nu]*l[`~mu`](X)*l[`~nu`](X) = (1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]))

(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])

(17)

op(77, rhs(Physics:-Ricci[mu, nu]*l[`~mu`](X)*l[`~nu`](X) = (1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[`~alpha`](X), [X]), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*Physics:-d_[mu](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](Physics:-d_[mu](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[alpha](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*Physics:-d_[mu](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[`~alpha`](X), [X]), [X])*l[nu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~alpha`](X), [X])*Physics:-d_[alpha](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[`~alpha`](X), [X]), [X])*l[mu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[alpha](X)*Physics:-d_[nu](Physics:-d_[tau](l[mu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~tau`]*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*eta[`~alpha`, `~kappa`]*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*Physics:-d_[alpha](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[alpha](X)*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[alpha](X), [X])*Physics:-d_[tau](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*l[mu](X)*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[tau](l[alpha](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*l[mu](X)*Physics:-d_[nu](Physics:-d_[tau](l[alpha](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[nu](Physics:-d_[alpha](l[tau](X), [X]), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*Physics:-d_[nu](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[nu](l[`~tau`](X), [X])*Physics:-d_[alpha](l[tau](X), [X])*l[mu](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*Physics:-d_[nu](l[alpha](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~alpha`](X), [X])*l[`~tau`](X)*Physics:-d_[mu](l[tau](X), [X])*l[alpha](X)+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[mu](X)*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[kappa](l[nu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[mu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[nu](X), [X]), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*l[nu](X)*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](l[nu](X), [X])*Physics:-d_[kappa](l[mu](X), [X])+(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*l[nu](X)*Physics:-d_[alpha](Physics:-d_[kappa](l[mu](X), [X]), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[mu](l[kappa](X), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[mu](l[kappa](X), [X]), [X])*l[nu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*Physics:-d_[alpha](l[mu](X), [X])-(1/2)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[`~kappa`](X)*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[`~kappa`](X), [X])*Physics:-d_[nu](l[kappa](X), [X])*l[mu](X)-(1/2)*l[`~mu`](X)*l[`~nu`](X)*l[`~alpha`](X)*l[`~kappa`](X)*Physics:-d_[alpha](Physics:-d_[nu](l[kappa](X), [X]), [X])*l[mu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[nu](l[`~beta`](X), [X])*l[mu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[nu](l[mu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[nu](X)*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[beta](l[`~alpha`](X), [X])*l[alpha](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[nu](X), [X])*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[mu](l[omega](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*Physics:-d_[alpha](l[omega](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~omega`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[beta](l[chi](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[nu](l[iota](X), [X])*l[mu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*Physics:-d_[mu](l[iota](X), [X])*l[nu](X)*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*Physics:-d_[alpha](l[lambda](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[nu](X)*Physics:-d_[iota](l[mu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*l[`~lambda`](X)*l[beta](X)*Physics:-d_[lambda](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*l[`~iota`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*l[alpha](X)*Physics:-d_[lambda](l[beta](X), [X])*eta[`~alpha`, `~lambda`]-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[beta](l[alpha](X), [X])-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[alpha](l[`~alpha`](X), [X])*l[beta](X)-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*l[`~alpha`](X)*Physics:-d_[alpha](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[iota](l[nu](X), [X])*eta[`~beta`, `~iota`]*Physics:-d_[lambda](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[mu](l[`~beta`](X), [X])*l[alpha](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[mu](l[alpha](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*Physics:-d_[alpha](l[`~beta`](X), [X])*l[mu](X)*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[nu](X)*Physics:-d_[chi](l[beta](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[`~beta`](X)*Physics:-d_[alpha](l[mu](X), [X])*l[beta](X)*Physics:-d_[chi](l[nu](X), [X])*eta[`~alpha`, `~chi`]+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[beta](l[`~alpha`](X), [X])*l[nu](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[mu](X)*Physics:-d_[omega](l[alpha](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[beta](l[nu](X), [X])+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*Physics:-d_[nu](l[`~alpha`](X), [X])*l[beta](X)+(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*Physics:-d_[nu](l[beta](X), [X])))

-(1/4)*l[`~mu`](X)*l[`~nu`](X)*l[alpha](X)*Physics:-d_[omega](l[mu](X), [X])*eta[`~beta`, `~omega`]*l[`~alpha`](X)*l[`~chi`](X)*Physics:-d_[nu](l[chi](X), [X])*l[beta](X)

(18)

``


Download Maple_Question_7.3.14.mw

hi

DirectSearch answer has confused me. How to reduce the residual.
See the program.Direct.mw

I'm interested in doing some experimental mathematics using the PSLQ integer relation algorithm.  The only third-party program for doing PSLQ problems I've been able to find is a GNU C++ program with a less-than-user-friendly command-line interface.  I've heard that Maple implements PSLQ and I like the symbolic input and presentation it offers as a CAS, but I can't find any information on which alternative types of Maple 18 make the PSLQ algorithm available.

First 78 79 80 81 82 83 84 Page 80 of 85