MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  predeq123 Structured version   Visualization version   GIF version

Theorem predeq123 5901
Description: Equality theorem for the predecessor class. (Contributed by Scott Fenton, 13-Jun-2018.)
Assertion
Ref Expression
predeq123 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → Pred(𝑅, 𝐴, 𝑋) = Pred(𝑆, 𝐵, 𝑌))

Proof of Theorem predeq123
StepHypRef Expression
1 simp2 1160 . . 3 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → 𝐴 = 𝐵)
2 cnveq 5504 . . . . 5 (𝑅 = 𝑆𝑅 = 𝑆)
323ad2ant1 1156 . . . 4 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → 𝑅 = 𝑆)
4 sneq 4387 . . . . 5 (𝑋 = 𝑌 → {𝑋} = {𝑌})
543ad2ant3 1158 . . . 4 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → {𝑋} = {𝑌})
63, 5imaeq12d 5684 . . 3 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → (𝑅 “ {𝑋}) = (𝑆 “ {𝑌}))
71, 6ineq12d 4021 . 2 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → (𝐴 ∩ (𝑅 “ {𝑋})) = (𝐵 ∩ (𝑆 “ {𝑌})))
8 df-pred 5900 . 2 Pred(𝑅, 𝐴, 𝑋) = (𝐴 ∩ (𝑅 “ {𝑋}))
9 df-pred 5900 . 2 Pred(𝑆, 𝐵, 𝑌) = (𝐵 ∩ (𝑆 “ {𝑌}))
107, 8, 93eqtr4g 2872 1 ((𝑅 = 𝑆𝐴 = 𝐵𝑋 = 𝑌) → Pred(𝑅, 𝐴, 𝑋) = Pred(𝑆, 𝐵, 𝑌))
Colors of variables: wff setvar class
Syntax hints:  wi 4  w3a 1100   = wceq 1637  cin 3775  {csn 4377  ccnv 5317  cima 5321  Predcpred 5899
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2069  ax-7 2105  ax-9 2166  ax-10 2186  ax-11 2202  ax-12 2215  ax-13 2422  ax-ext 2791
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1864  df-sb 2062  df-clab 2800  df-cleq 2806  df-clel 2809  df-nfc 2944  df-rab 3112  df-v 3400  df-dif 3779  df-un 3781  df-in 3783  df-ss 3790  df-nul 4124  df-if 4287  df-sn 4378  df-pr 4380  df-op 4384  df-br 4852  df-opab 4914  df-xp 5324  df-cnv 5326  df-dm 5328  df-rn 5329  df-res 5330  df-ima 5331  df-pred 5900
This theorem is referenced by:  predeq1  5902  predeq2  5903  predeq3  5904  wsuceq123  32085  wlimeq12  32090  frecseq123  32103
  Copyright terms: Public domain W3C validator