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

Theorem ressval3dOLD 17034
Description: Obsolete version of ressval3d 17033 as of 17-Oct-2024. Value of structure restriction, deduction version. (Contributed by AV, 14-Mar-2020.) (Revised by AV, 3-Jul-2022.) (New usage is discouraged.) (Proof modification is discouraged.)
Hypotheses
Ref Expression
ressval3d.r 𝑅 = (𝑆s 𝐴)
ressval3d.b 𝐵 = (Base‘𝑆)
ressval3d.e 𝐸 = (Base‘ndx)
ressval3d.s (𝜑𝑆𝑉)
ressval3d.f (𝜑 → Fun 𝑆)
ressval3d.d (𝜑𝐸 ∈ dom 𝑆)
ressval3d.u (𝜑𝐴𝐵)
Assertion
Ref Expression
ressval3dOLD (𝜑𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩))

Proof of Theorem ressval3dOLD
StepHypRef Expression
1 ressval3d.u . 2 (𝜑𝐴𝐵)
2 sspss 4045 . . . 4 (𝐴𝐵 ↔ (𝐴𝐵𝐴 = 𝐵))
3 dfpss3 4032 . . . . 5 (𝐴𝐵 ↔ (𝐴𝐵 ∧ ¬ 𝐵𝐴))
43orbi1i 911 . . . 4 ((𝐴𝐵𝐴 = 𝐵) ↔ ((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∨ 𝐴 = 𝐵))
52, 4bitri 274 . . 3 (𝐴𝐵 ↔ ((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∨ 𝐴 = 𝐵))
6 simplr 766 . . . . . . 7 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → ¬ 𝐵𝐴)
7 ressval3d.s . . . . . . . 8 (𝜑𝑆𝑉)
87adantl 482 . . . . . . 7 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → 𝑆𝑉)
9 simpl 483 . . . . . . . 8 ((𝐴𝐵 ∧ ¬ 𝐵𝐴) → 𝐴𝐵)
10 ressval3d.b . . . . . . . . . 10 𝐵 = (Base‘𝑆)
1110fvexi 6826 . . . . . . . . 9 𝐵 ∈ V
1211a1i 11 . . . . . . . 8 (𝜑𝐵 ∈ V)
13 ssexg 5262 . . . . . . . 8 ((𝐴𝐵𝐵 ∈ V) → 𝐴 ∈ V)
149, 12, 13syl2an 596 . . . . . . 7 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → 𝐴 ∈ V)
15 ressval3d.r . . . . . . . 8 𝑅 = (𝑆s 𝐴)
1615, 10ressval2 17023 . . . . . . 7 ((¬ 𝐵𝐴𝑆𝑉𝐴 ∈ V) → 𝑅 = (𝑆 sSet ⟨(Base‘ndx), (𝐴𝐵)⟩))
176, 8, 14, 16syl3anc 1370 . . . . . 6 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → 𝑅 = (𝑆 sSet ⟨(Base‘ndx), (𝐴𝐵)⟩))
18 ressval3d.e . . . . . . . . . 10 𝐸 = (Base‘ndx)
1918a1i 11 . . . . . . . . 9 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → 𝐸 = (Base‘ndx))
20 df-ss 3914 . . . . . . . . . . . . 13 (𝐴𝐵 ↔ (𝐴𝐵) = 𝐴)
2120biimpi 215 . . . . . . . . . . . 12 (𝐴𝐵 → (𝐴𝐵) = 𝐴)
2221eqcomd 2743 . . . . . . . . . . 11 (𝐴𝐵𝐴 = (𝐴𝐵))
2322adantr 481 . . . . . . . . . 10 ((𝐴𝐵 ∧ ¬ 𝐵𝐴) → 𝐴 = (𝐴𝐵))
2423adantr 481 . . . . . . . . 9 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → 𝐴 = (𝐴𝐵))
2519, 24opeq12d 4823 . . . . . . . 8 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → ⟨𝐸, 𝐴⟩ = ⟨(Base‘ndx), (𝐴𝐵)⟩)
2625eqcomd 2743 . . . . . . 7 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → ⟨(Base‘ndx), (𝐴𝐵)⟩ = ⟨𝐸, 𝐴⟩)
2726oveq2d 7333 . . . . . 6 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → (𝑆 sSet ⟨(Base‘ndx), (𝐴𝐵)⟩) = (𝑆 sSet ⟨𝐸, 𝐴⟩))
2817, 27eqtrd 2777 . . . . 5 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∧ 𝜑) → 𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩))
2928ex 413 . . . 4 ((𝐴𝐵 ∧ ¬ 𝐵𝐴) → (𝜑𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩)))
3015a1i 11 . . . . . . 7 ((𝐴 = 𝐵𝜑) → 𝑅 = (𝑆s 𝐴))
31 oveq2 7325 . . . . . . . 8 (𝐴 = 𝐵 → (𝑆s 𝐴) = (𝑆s 𝐵))
3231adantr 481 . . . . . . 7 ((𝐴 = 𝐵𝜑) → (𝑆s 𝐴) = (𝑆s 𝐵))
337adantl 482 . . . . . . . 8 ((𝐴 = 𝐵𝜑) → 𝑆𝑉)
3410ressid 17031 . . . . . . . 8 (𝑆𝑉 → (𝑆s 𝐵) = 𝑆)
3533, 34syl 17 . . . . . . 7 ((𝐴 = 𝐵𝜑) → (𝑆s 𝐵) = 𝑆)
3630, 32, 353eqtrd 2781 . . . . . 6 ((𝐴 = 𝐵𝜑) → 𝑅 = 𝑆)
37 df-base 16990 . . . . . . . 8 Base = Slot 1
38 1nn 12064 . . . . . . . 8 1 ∈ ℕ
39 ressval3d.f . . . . . . . 8 (𝜑 → Fun 𝑆)
40 ressval3d.d . . . . . . . . 9 (𝜑𝐸 ∈ dom 𝑆)
4118, 40eqeltrrid 2843 . . . . . . . 8 (𝜑 → (Base‘ndx) ∈ dom 𝑆)
4237, 38, 7, 39, 41setsidvaldOLD 16978 . . . . . . 7 (𝜑𝑆 = (𝑆 sSet ⟨(Base‘ndx), (Base‘𝑆)⟩))
4342adantl 482 . . . . . 6 ((𝐴 = 𝐵𝜑) → 𝑆 = (𝑆 sSet ⟨(Base‘ndx), (Base‘𝑆)⟩))
4418a1i 11 . . . . . . . . 9 ((𝐴 = 𝐵𝜑) → 𝐸 = (Base‘ndx))
45 simpl 483 . . . . . . . . . 10 ((𝐴 = 𝐵𝜑) → 𝐴 = 𝐵)
4645, 10eqtrdi 2793 . . . . . . . . 9 ((𝐴 = 𝐵𝜑) → 𝐴 = (Base‘𝑆))
4744, 46opeq12d 4823 . . . . . . . 8 ((𝐴 = 𝐵𝜑) → ⟨𝐸, 𝐴⟩ = ⟨(Base‘ndx), (Base‘𝑆)⟩)
4847eqcomd 2743 . . . . . . 7 ((𝐴 = 𝐵𝜑) → ⟨(Base‘ndx), (Base‘𝑆)⟩ = ⟨𝐸, 𝐴⟩)
4948oveq2d 7333 . . . . . 6 ((𝐴 = 𝐵𝜑) → (𝑆 sSet ⟨(Base‘ndx), (Base‘𝑆)⟩) = (𝑆 sSet ⟨𝐸, 𝐴⟩))
5036, 43, 493eqtrd 2781 . . . . 5 ((𝐴 = 𝐵𝜑) → 𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩))
5150ex 413 . . . 4 (𝐴 = 𝐵 → (𝜑𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩)))
5229, 51jaoi 854 . . 3 (((𝐴𝐵 ∧ ¬ 𝐵𝐴) ∨ 𝐴 = 𝐵) → (𝜑𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩)))
535, 52sylbi 216 . 2 (𝐴𝐵 → (𝜑𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩)))
541, 53mpcom 38 1 (𝜑𝑅 = (𝑆 sSet ⟨𝐸, 𝐴⟩))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 396  wo 844   = wceq 1540  wcel 2105  Vcvv 3441  cin 3896  wss 3897  wpss 3898  cop 4577  dom cdm 5608  Fun wfun 6460  cfv 6466  (class class class)co 7317  1c1 10952   sSet csts 16941  ndxcnx 16971  Basecbs 16989  s cress 17018
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1912  ax-6 1970  ax-7 2010  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2153  ax-12 2170  ax-ext 2708  ax-sep 5238  ax-nul 5245  ax-pow 5303  ax-pr 5367  ax-un 7630  ax-cnex 11007  ax-1cn 11009  ax-addcl 11011
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1781  df-nf 1785  df-sb 2067  df-mo 2539  df-eu 2568  df-clab 2715  df-cleq 2729  df-clel 2815  df-nfc 2887  df-ne 2942  df-ral 3063  df-rex 3072  df-reu 3351  df-rab 3405  df-v 3443  df-sbc 3727  df-csb 3843  df-dif 3900  df-un 3902  df-in 3904  df-ss 3914  df-pss 3916  df-nul 4268  df-if 4472  df-pw 4547  df-sn 4572  df-pr 4574  df-op 4578  df-uni 4851  df-iun 4939  df-br 5088  df-opab 5150  df-mpt 5171  df-tr 5205  df-id 5507  df-eprel 5513  df-po 5521  df-so 5522  df-fr 5563  df-we 5565  df-xp 5614  df-rel 5615  df-cnv 5616  df-co 5617  df-dm 5618  df-rn 5619  df-res 5620  df-ima 5621  df-pred 6225  df-ord 6292  df-on 6293  df-lim 6294  df-suc 6295  df-iota 6418  df-fun 6468  df-fn 6469  df-f 6470  df-f1 6471  df-fo 6472  df-f1o 6473  df-fv 6474  df-ov 7320  df-oprab 7321  df-mpo 7322  df-om 7760  df-2nd 7879  df-frecs 8146  df-wrecs 8177  df-recs 8251  df-rdg 8290  df-nn 12054  df-sets 16942  df-slot 16960  df-ndx 16972  df-base 16990  df-ress 17019
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator