reserve x for object;
reserve D for set;
reserve p for PartialPredicate of D;
reserve D for non empty set;
reserve p,q,r for PartialPredicate of D;

theorem Th34:
  x in dom q & q.x = TRUE implies PP_imp(p,q).x = TRUE by Def4;
