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 : 03/24/17-02:40:02 PM Z CET