 
Summary: > restart:with(Clifford):with(linalg):
> eval(makealiases(9,'ordered')):
> eval(makealiases(9,'ordered')):
> ##read "Walshpackage.m";
##useproduct(cmulWalsh);
_default_Clifford_product;
:Clifford cmulRS
This worksheet accompanies the following threepart paper:
"On the Transposition AntiInvolution in Real Clifford Algebras I: The Transposition Map" by R. Ablamowicz and B. Fauser, 2010 (to
appear in Linear and Multilinear Algebra)
"On the Transposition AntiInvolution in Real Clifford Algebras II: Stabilizer Groups of Primitive Idempotents" by R. Ablamowicz and
B. Fauser, 2010 (to appear in Linear and Multilinear Algebra)
"On the Transposition AntiInvolution in Real Clifford Algebras III: The Automorphism Group of the Transposition Scalar Product on
Spinor Spaces" by R. Ablamowicz and B. Fauser, 2011 (submitted to Linear and Multilinear Algebra)
Rafal Ablamowicz
rablamowicz@tntech.edu
Cookeville, June 17, 2011
1. Procedure "by_dimension" defines a Booleanvalued function which allows to sort a list L with signatures [p,q] according to a total
dimension p+q.
> by_dimension:=proc(L1,L2) local p:
