(*                            Ren-Cang Li, June 1, 1996
                              na.rcli@na-net.ornl.gov   *)

(* O(t) *)

(* O(t^2) *)
a2Cmt=Cmt[X,Y];

(* O(t^3) *)
a3Cmt=Cmt[X,Cmt[X,Y]];
b3Cmt=Cmt[Y,Cmt[X,Y]];

(* O(t^4) *)
a4Cmt=Cmt[X,Cmt[X,Cmt[X,Y]]];
b4Cmt=Cmt[X,Cmt[Y,Cmt[X,Y]]];
c4Cmt=Cmt[Y,Cmt[Y,Cmt[X,Y]]];

(* O(t^5) *)
a5Cmt=Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]];
b5Cmt=Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]];
c5Cmt=Cmt[X,Cmt[X,Cmt[Y,Cmt[X,Y]]]];
d5Cmt=Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]];
e5Cmt=Cmt[Y,Cmt[X,Cmt[Y,Cmt[X,Y]]]];
f5Cmt=Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]];

(* O(t^6) *)
a6Cmt=Cmt[X,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]]];
b6Cmt=Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]]];
c6Cmt=Cmt[X,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]]];
d6Cmt=Cmt[X,Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]];
e6Cmt=Cmt[X,Cmt[Y,Cmt[X,Cmt[Y,Cmt[X,Y]]]]];
f6Cmt=Cmt[Y,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]]];
g6Cmt=Cmt[X,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]];
h6Cmt=Cmt[Y,Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]];
i6Cmt=Cmt[Y,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]];

(* O(t^7) *)
a7Cmt=Cmt[X,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
b7Cmt=Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
c7Cmt=Cmt[X,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
d7Cmt=Cmt[X,Cmt[X,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
e7Cmt=Cmt[Y,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
f7Cmt=Cmt[Y,Cmt[X,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
g7Cmt=Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
h7Cmt=Cmt[X,Cmt[X,Cmt[Y,Cmt[X,Cmt[Y,Cmt[X,Y]]]]]];
i7Cmt=Cmt[X,Cmt[X,Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
j7Cmt=Cmt[X,Cmt[X,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
k7Cmt=Cmt[X,Cmt[Y,Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
l7Cmt=Cmt[Y,Cmt[X,Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
m7Cmt=Cmt[Y,Cmt[X,Cmt[Y,Cmt[X,Cmt[Y,Cmt[X,Y]]]]]];
n7Cmt=Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Cmt[X,Cmt[X,Y]]]]]];
o7Cmt=Cmt[X,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
p7Cmt=Cmt[Y,Cmt[X,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
q7Cmt=Cmt[Y,Cmt[Y,Cmt[X,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
r7Cmt=Cmt[Y,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[Y,Cmt[X,Y]]]]]];
