reserve Y for non empty set;
reserve B for Subset of Y;
reserve x,y,z for boolean object;

theorem
  ('not' x)=TRUE implies (x => y)=TRUE;
