theorem Th26:
  for p holds r in p~ iff r ## p
proof
  let p;
  thus r in p~ implies r ## p
  proof
    assume r in p~;
    then ex q st r = q & q ## p;
    hence thesis;
  end;
  thus thesis;
end;
