Source [N]

Jbyz->Sqrt[Jby Jby+Jbz Jbz],
Jbxyz->Sqrt[Jbx Jbx+Jby Jby+Jbz Jbz],
Jbs->Sqrt[Jtx(Jby(Jby Jtx-Jbx Jty)+Jbz(Jbz Jtx-Jbx Jtz))+Jty(Jbx(Jbx Jty-Jby Jtx)+Jbz(Jbz Jty-Jby Jtz))+Jtz(Jbx(Jbx Jtz-Jbz Jtx)+Jby(Jby Jtz-Jbz Jty))],
Nblx->(Jblx(Jby Jtz-Jbz Jty)+Jbly(Jbz Jtx-Jbx Jtz)+Jblz(Jbx Jty-Jby Jtx))/Jbs,
Nbly->(Jblx(Jby(Jby Jtx-Jbx Jty)+Jbz(Jbz Jtx-Jbx Jtz))+Jbly(Jbx(Jbx Jty-Jby Jtx)+Jbz(Jbz Jty-Jby Jtz))+Jblz(Jbx(Jbx Jtz-Jbz Jtx)+Jby(Jby Jtz-Jbz Jty)))/(Jbs Jbxyz),
Nblz->(Jblx Jbx+Jbly Jby+Jblz Jbz)/Jbxyz,
Nbx->0,
Nby->0,
Nbz->Jbxyz,
Nbrx->(Jbrx(Jby Jtz-Jbz Jty)+Jbry(Jbz Jtx-Jbx Jtz)+Jbrz(Jbx Jty-Jby Jtx))/Jbs,
Nbry->(Jbrx(Jby(Jby Jtx-Jbx Jty)+Jbz(Jbz Jtx-Jbx Jtz))+Jbry(Jbx(Jbx Jty-Jby Jtx)+Jbz(Jbz Jty-Jby Jtz))+Jbrz(Jbx(Jbx Jtz-Jbz Jtx)+Jby(Jby Jtz-Jbz Jty)))/(Jbs Jbxyz),
Nbrz->(Jbrx Jbx+Jbry Jby+Jbrz Jbz)/Jbxyz,
Ntlx->(Jtlx(Jby Jtz-Jbz Jty)+Jtly(Jbz Jtx-Jbx Jtz)+Jtlz(Jbx Jty-Jby Jtx))/Jbs,
Ntly->(Jtlx(Jby(Jby Jtx-Jbx Jty)+Jbz(Jbz Jtx-Jbx Jtz))+Jtly(Jbx(Jbx Jty-Jby Jtx)+Jbz(Jbz Jty-Jby Jtz))+Jtlz(Jbx(Jbx Jtz-Jbz Jtx)+Jby(Jby Jtz-Jbz Jty)))/(Jbs Jbxyz),
Ntlz->(Jtlx Jbx+Jtly Jby+Jtlz Jbz)/Jbxyz,
Ntx->0,
Nty->Jbs/Jbxyz,
Ntz->(Jtx Jbx+Jty Jby+Jtz Jbz)/Jbxyz,
Ntrx->(Jtrx(Jby Jtz-Jbz Jty)+Jtry(Jbz Jtx-Jbx Jtz)+Jtrz(Jbx Jty-Jby Jtx))/Jbs,
Ntry->(Jtrx(Jby(Jby Jtx-Jbx Jty)+Jbz(Jbz Jtx-Jbx Jtz))+Jtry(Jbx(Jbx Jty-Jby Jtx)+Jbz(Jbz Jty-Jby Jtz))+Jtrz(Jbx(Jbx Jtz-Jbz Jtx)+Jby(Jby Jtz-Jbz Jty)))/(Jbs Jbxyz),
Ntrz->(Jtrx Jbx+Jtry Jby+Jtrz Jbz)/Jbxyz,