[anon_tor_12345]

you can get pretty close with mathematica using the notation package e.g. these three defines compute euler-lagrange equations given a lagrangian.

https://imgur.com/aMfdYQy