theorem ljoineqd (_G: wff) (_L1 _L2: nat): $ _G -> _L1 = _L2 $ > $ _G -> ljoin _L1 = ljoin _L2 $;
| Step | Hyp | Ref | Expression |
|---|---|---|---|
| 1 | hyp _Lh | _G -> _L1 = _L2 |
|
| 2 | 1 | lreceq3d | _G -> lrec 0 (\\ a, \\ z, \ ih, a ++ ih) _L1 = lrec 0 (\\ a, \\ z, \ ih, a ++ ih) _L2 |
| 3 | 2 | conv ljoin | _G -> ljoin _L1 = ljoin _L2 |