theorem Th36:
  All(x,p) |-| p
proof
  {All(x,p)} |- All(x,p) => p by CQC_THE1:56;
  then {All(x,p)} |- p by CQC_THE1:55,CQC_THE2:87;
  hence All(x,p) |- p;
  {p} |- p by CQC_THE2:87;
  then {p} |- All(x,p) by Th35;
  hence thesis;
end;
