theorem leeq2d (_G: wff) (a _b1 _b2: nat): $ _G -> _b1 = _b2 $ > $ _G -> (a <= _b1 <-> a <= _b2) $;
_G -> a = a
_G -> _b1 = _b2
_G -> (a <= _b1 <-> a <= _b2)