theorem sneqd (_G: wff) (_a1 _a2: nat): $ _G -> _a1 = _a2 $ > $ _G -> sn _a1 = sn _a2 $;
_G -> _a1 = _a2
_G -> 2 ^ _a1 = 2 ^ _a2
_G -> sn _a1 = sn _a2