theorem
  UAp (A _/\_ B) = UAp A /\ UAp B;
