theorem uneq1d (_G: wff) (_A1 _A2 B: set): $ _G -> _A1 == _A2 $ > $ _G -> _A1 u. B == _A2 u. B $;
_G -> _A1 == _A2
_G -> B == B
_G -> _A1 u. B == _A2 u. B