dom (p - q) = (dom p) /\ (dom q) by VALUED_1:12;
hence p - q is finite by FINSET_1:10; :: thesis: verum