theorem
  k <= l implies A* ^^ (A |^ (k, l)) = A |^.. k
proof
  assume k <= l;
  then (A |^.. 0) ^^ (A |^ (k, l)) = A |^.. (0 + k) by Th33;
  hence thesis by Th11;
end;
