Name: Rolf Mertig (email_not_shown)
Date: 03/15/10-10:18:23 PM Z


Try this:

TensorFunction[R_, i__] :=
  Signature[{i}]*TensorFunction[R, Sequence @@ Sort[{i}]] /;
    !OrderedQ[{i}]

Rolf



This archive was generated by hypermail 2b29 : 04/23/17-03:40:02 PM Z CEST