Users' Mathboxes Mathbox for Mario Carneiro < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  msrval Structured version   Visualization version   GIF version

Theorem msrval 35751
Description: Value of the reduct of a pre-statement. (Contributed by Mario Carneiro, 18-Jul-2016.)
Hypotheses
Ref Expression
msrfval.v 𝑉 = (mVars‘𝑇)
msrfval.p 𝑃 = (mPreSt‘𝑇)
msrfval.r 𝑅 = (mStRed‘𝑇)
msrval.z 𝑍 = (𝑉 “ (𝐻 ∪ {𝐴}))
Assertion
Ref Expression
msrval (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝑅‘⟨𝐷, 𝐻, 𝐴⟩) = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)

Proof of Theorem msrval
Dummy variables 𝑎 𝑠 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 msrfval.v . . . 4 𝑉 = (mVars‘𝑇)
2 msrfval.p . . . 4 𝑃 = (mPreSt‘𝑇)
3 msrfval.r . . . 4 𝑅 = (mStRed‘𝑇)
41, 2, 3msrfval 35750 . . 3 𝑅 = (𝑠𝑃(2nd ‘(1st𝑠)) / (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩)
54a1i 11 . 2 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑅 = (𝑠𝑃(2nd ‘(1st𝑠)) / (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩))
6 fvexd 6857 . . 3 ((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) → (2nd ‘(1st𝑠)) ∈ V)
7 fvexd 6857 . . . 4 (((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) → (2nd𝑠) ∈ V)
8 simpllr 776 . . . . . . . . 9 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝑠 = ⟨𝐷, 𝐻, 𝐴⟩)
98fveq2d 6846 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st𝑠) = (1st ‘⟨𝐷, 𝐻, 𝐴⟩))
109fveq2d 6846 . . . . . . 7 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st ‘(1st𝑠)) = (1st ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)))
11 eqid 2737 . . . . . . . . . . . . 13 (mDV‘𝑇) = (mDV‘𝑇)
12 eqid 2737 . . . . . . . . . . . . 13 (mEx‘𝑇) = (mEx‘𝑇)
1311, 12, 2elmpst 35749 . . . . . . . . . . . 12 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 ↔ ((𝐷 ⊆ (mDV‘𝑇) ∧ 𝐷 = 𝐷) ∧ (𝐻 ⊆ (mEx‘𝑇) ∧ 𝐻 ∈ Fin) ∧ 𝐴 ∈ (mEx‘𝑇)))
1413simp1bi 1146 . . . . . . . . . . 11 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝐷 ⊆ (mDV‘𝑇) ∧ 𝐷 = 𝐷))
1514simpld 494 . . . . . . . . . 10 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝐷 ⊆ (mDV‘𝑇))
1615ad3antrrr 731 . . . . . . . . 9 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐷 ⊆ (mDV‘𝑇))
17 fvex 6855 . . . . . . . . . 10 (mDV‘𝑇) ∈ V
1817ssex 5268 . . . . . . . . 9 (𝐷 ⊆ (mDV‘𝑇) → 𝐷 ∈ V)
1916, 18syl 17 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐷 ∈ V)
2013simp2bi 1147 . . . . . . . . . 10 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝐻 ⊆ (mEx‘𝑇) ∧ 𝐻 ∈ Fin))
2120simprd 495 . . . . . . . . 9 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝐻 ∈ Fin)
2221ad3antrrr 731 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐻 ∈ Fin)
2313simp3bi 1148 . . . . . . . . 9 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝐴 ∈ (mEx‘𝑇))
2423ad3antrrr 731 . . . . . . . 8 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝐴 ∈ (mEx‘𝑇))
25 ot1stg 7957 . . . . . . . 8 ((𝐷 ∈ V ∧ 𝐻 ∈ Fin ∧ 𝐴 ∈ (mEx‘𝑇)) → (1st ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐷)
2619, 22, 24, 25syl3anc 1374 . . . . . . 7 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐷)
2710, 26eqtrd 2772 . . . . . 6 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (1st ‘(1st𝑠)) = 𝐷)
281fvexi 6856 . . . . . . . . . 10 𝑉 ∈ V
29 imaexg 7865 . . . . . . . . . 10 (𝑉 ∈ V → (𝑉 “ ( ∪ {𝑎})) ∈ V)
3028, 29ax-mp 5 . . . . . . . . 9 (𝑉 “ ( ∪ {𝑎})) ∈ V
3130uniex 7696 . . . . . . . 8 (𝑉 “ ( ∪ {𝑎})) ∈ V
3231a1i 11 . . . . . . 7 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) ∈ V)
33 id 22 . . . . . . . . 9 (𝑧 = (𝑉 “ ( ∪ {𝑎})) → 𝑧 = (𝑉 “ ( ∪ {𝑎})))
34 simplr 769 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → = (2nd ‘(1st𝑠)))
359fveq2d 6846 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd ‘(1st𝑠)) = (2nd ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)))
36 ot2ndg 7958 . . . . . . . . . . . . . . 15 ((𝐷 ∈ V ∧ 𝐻 ∈ Fin ∧ 𝐴 ∈ (mEx‘𝑇)) → (2nd ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐻)
3719, 22, 24, 36syl3anc 1374 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd ‘(1st ‘⟨𝐷, 𝐻, 𝐴⟩)) = 𝐻)
3834, 35, 373eqtrd 2776 . . . . . . . . . . . . 13 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → = 𝐻)
39 simpr 484 . . . . . . . . . . . . . . 15 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝑎 = (2nd𝑠))
408fveq2d 6846 . . . . . . . . . . . . . . 15 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd𝑠) = (2nd ‘⟨𝐷, 𝐻, 𝐴⟩))
41 ot3rdg 7959 . . . . . . . . . . . . . . . 16 (𝐴 ∈ (mEx‘𝑇) → (2nd ‘⟨𝐷, 𝐻, 𝐴⟩) = 𝐴)
4224, 41syl 17 . . . . . . . . . . . . . . 15 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (2nd ‘⟨𝐷, 𝐻, 𝐴⟩) = 𝐴)
4339, 40, 423eqtrd 2776 . . . . . . . . . . . . . 14 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → 𝑎 = 𝐴)
4443sneqd 4594 . . . . . . . . . . . . 13 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → {𝑎} = {𝐴})
4538, 44uneq12d 4123 . . . . . . . . . . . 12 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → ( ∪ {𝑎}) = (𝐻 ∪ {𝐴}))
4645imaeq2d 6027 . . . . . . . . . . 11 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) = (𝑉 “ (𝐻 ∪ {𝐴})))
4746unieqd 4878 . . . . . . . . . 10 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) = (𝑉 “ (𝐻 ∪ {𝐴})))
48 msrval.z . . . . . . . . . 10 𝑍 = (𝑉 “ (𝐻 ∪ {𝐴}))
4947, 48eqtr4di 2790 . . . . . . . . 9 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) = 𝑍)
5033, 49sylan9eqr 2794 . . . . . . . 8 (((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) ∧ 𝑧 = (𝑉 “ ( ∪ {𝑎}))) → 𝑧 = 𝑍)
5150sqxpeqd 5664 . . . . . . 7 (((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) ∧ 𝑧 = (𝑉 “ ( ∪ {𝑎}))) → (𝑧 × 𝑧) = (𝑍 × 𝑍))
5232, 51csbied 3887 . . . . . 6 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧) = (𝑍 × 𝑍))
5327, 52ineq12d 4175 . . . . 5 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → ((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)) = (𝐷 ∩ (𝑍 × 𝑍)))
5453, 38, 43oteq123d 4846 . . . 4 ((((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) ∧ 𝑎 = (2nd𝑠)) → ⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩ = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
557, 54csbied 3887 . . 3 (((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) ∧ = (2nd ‘(1st𝑠))) → (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩ = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
566, 55csbied 3887 . 2 ((⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃𝑠 = ⟨𝐷, 𝐻, 𝐴⟩) → (2nd ‘(1st𝑠)) / (2nd𝑠) / 𝑎⟨((1st ‘(1st𝑠)) ∩ (𝑉 “ ( ∪ {𝑎})) / 𝑧(𝑧 × 𝑧)), , 𝑎⟩ = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
57 id 22 . 2 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → ⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃)
58 otex 5421 . . 3 ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩ ∈ V
5958a1i 11 . 2 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩ ∈ V)
605, 56, 57, 59fvmptd 6957 1 (⟨𝐷, 𝐻, 𝐴⟩ ∈ 𝑃 → (𝑅‘⟨𝐷, 𝐻, 𝐴⟩) = ⟨(𝐷 ∩ (𝑍 × 𝑍)), 𝐻, 𝐴⟩)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1542  wcel 2114  Vcvv 3442  csb 3851  cun 3901  cin 3902  wss 3903  {csn 4582  cotp 4590   cuni 4865  cmpt 5181   × cxp 5630  ccnv 5631  cima 5635  cfv 6500  1st c1st 7941  2nd c2nd 7942  Fincfn 8895  mExcmex 35680  mDVcmdv 35681  mVarscmvrs 35682  mPreStcmpst 35686  mStRedcmsr 35687
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2185  ax-ext 2709  ax-rep 5226  ax-sep 5243  ax-nul 5253  ax-pow 5312  ax-pr 5379  ax-un 7690
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-reu 3353  df-rab 3402  df-v 3444  df-sbc 3743  df-csb 3852  df-dif 3906  df-un 3908  df-in 3910  df-ss 3920  df-nul 4288  df-if 4482  df-pw 4558  df-sn 4583  df-pr 4585  df-op 4589  df-ot 4591  df-uni 4866  df-iun 4950  df-br 5101  df-opab 5163  df-mpt 5182  df-id 5527  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-iota 6456  df-fun 6502  df-fn 6503  df-f 6504  df-f1 6505  df-fo 6506  df-f1o 6507  df-fv 6508  df-1st 7943  df-2nd 7944  df-mpst 35706  df-msr 35707
This theorem is referenced by:  msrf  35755  msrid  35758  elmsta  35761  mthmpps  35795
  Copyright terms: Public domain W3C validator