theorem eqmeq1d (_G: wff) (_n1 _n2 a b: nat): $ _G -> _n1 = _n2 $ > $ _G -> (mod(_n1): a = b <-> mod(_n2): a = b) $;
| Step | Hyp | Ref | Expression | 
|---|---|---|---|
| 1 | hyp _h | _G -> _n1 = _n2  | 
        |
| 2 | eqidd | _G -> a = a  | 
        |
| 3 | eqidd | _G -> b = b  | 
        |
| 4 | 1, 2, 3 | eqmeqd | _G -> (mod(_n1): a = b <-> mod(_n2): a = b)  |