theorem
  x in dom p & PP_and(p,q).x = TRUE implies p.x = TRUE by Th3,Th19;
