theorem Th26:
  p is FinTree-yielding & q is FinTree-yielding iff p^q is FinTree-yielding
proof
A1: rng (p^q) = rng p \/ rng q by FINSEQ_1:31;
  thus p is FinTree-yielding & q is FinTree-yielding implies
  p^q is FinTree-yielding
  by A1,Th6;
  assume
A2: rng (p^q) is constituted-FinTrees;
  hence rng p is constituted-FinTrees by A1,Th6;
  thus rng q is constituted-FinTrees by A1,A2,Th6;
end;
