• Next message: marco.niggetiedt@t-online.de: "Unitary Lorentz Model"
• Previous message: Alan Hernández: "Levi civita"
• Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
• Mail actions: [ respond to this message ] [ mail a new topic ]

Hola,
this can be done using "Uncontract" and the option Unique->False.
Adding FCE for abbreviation this
FCE[Uncontract[LC[u, v][p1,
      p2], p1, p2, Unique ->
      False] /. {$AL[1] :> s,
     $AL[2] :> a}] /.
  LC[a, s, u, v] :>
   LC[u, v, a, s]

evaluates to
FV[p1, a] FV[p2, s] LC[u, v, a, s]

• Next message: marco.niggetiedt@t-online.de: "Unitary Lorentz Model"
• Previous message: Alan Hernández: "Levi civita"
• Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
• Mail actions: [ respond to this message ] [ mail a new topic ]

This archive was generated by hypermail 2b29 : 09/04/20-12:55:05 AM Z CEST