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 : 11/23/17-07:20:01 PM Z CET