HomeHome Metamath Proof Explorer < Previous   Next >
Related theorems
GIF version

Theorem tfrlem1 2949
Description: A technical lemma for transfinite recursion. Compare Lemma 1 of [TakeutiZaring] p. 47.
Assertion
Ref Expression
tfrlem1 (A ∈ On → ((F Fn AG Fn A) → (∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xA (Fx) = (Gx))))
Distinct variable group(s):   x,A   x,B   x,F   x,G

Proof of Theorem tfrlem1
StepHypRef Expression
1 ssid 1519 . 2 AA
2 sseq1 1521 . . . . 5 (y = A → (yAAA))
3 raleq 1324 . . . . . 6 (y = A → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) ↔ ∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))))
4 raleq 1324 . . . . . 6 (y = A → (∀xy (Fx) = (Gx) ↔ ∀xA (Fx) = (Gx)))
53, 4imbi12d 474 . . . . 5 (y = A → ((∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx)) ↔ (∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xA (Fx) = (Gx))))
62, 5imbi12d 474 . . . 4 (y = A → ((yA → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx))) ↔ (AA → (∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xA (Fx) = (Gx)))))
76imbi2d 464 . . 3 (y = A → (((F Fn AG Fn A) → (yA → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx)))) ↔ ((F Fn AG Fn A) → (AA → (∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xA (Fx) = (Gx))))))
8 sseq1 1521 . . . . . . . 8 (y = z → (yAzA))
98anbi2d 468 . . . . . . 7 (y = z → (((F Fn AG Fn A) ∧ yA) ↔ ((F Fn AG Fn A) ∧ zA)))
10 raleq 1324 . . . . . . 7 (y = z → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) ↔ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))))
119, 10anbi12d 476 . . . . . 6 (y = z → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) ↔ (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))))))
12 raleq 1324 . . . . . 6 (y = z → (∀xy (Fx) = (Gx) ↔ ∀xz (Fx) = (Gx)))
1311, 12imbi12d 474 . . . . 5 (y = z → (((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx)) ↔ ((((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xz (Fx) = (Gx))))
14 onelsst 2255 . . . . . . . . . . 11 (y ∈ On → (zyzy))
15 sstr2 1510 . . . . . . . . . . . . 13 (zy → (yAzA))
1615anim2d 433 . . . . . . . . . . . 12 (zy → (((F Fn AG Fn A) ∧ yA) → ((F Fn AG Fn A) ∧ zA)))
17 ax-17 925 . . . . . . . . . . . . 13 (zy → ∀x zy)
18 hbra1 1237 . . . . . . . . . . . . 13 (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xxy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))))
19 ssel 1502 . . . . . . . . . . . . . 14 (zy → (xzxy))
20 ra4 1243 . . . . . . . . . . . . . 14 (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (xy → ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))))
2119, 20syl9 55 . . . . . . . . . . . . 13 (zy → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (xz → ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))))))
2217, 18, 21r19.21ad 1261 . . . . . . . . . . . 12 (zy → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))))
2316, 22anim12d 431 . . . . . . . . . . 11 (zy → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))))))
2414, 23syl6 23 . . . . . . . . . 10 (y ∈ On → (zy → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))))))
2524com23 32 . . . . . . . . 9 (y ∈ On → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → (zy → (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))))))
2625r19.21adv 1262 . . . . . . . 8 (y ∈ On → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀zy (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))))))
27 onelsst 2255 . . . . . . . . . . . . . . . . . 18 (y ∈ On → (xyxy))
28 sstr2 1510 . . . . . . . . . . . . . . . . . . 19 (xy → (yAxA))
29 cleq12 1113 . . . . . . . . . . . . . . . . . . . . . 22 (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ((Fx) = (Gx) ↔ (B ‘(Fx)) = (B ‘(Gx))))
30 fvreseq 2882 . . . . . . . . . . . . . . . . . . . . . . . 24 (((F Fn AG Fn A) ∧ xA) → ((Fx) = (Gx) ↔ ∀wx (Fw) = (Gw)))
3130biimpar 325 . . . . . . . . . . . . . . . . . . . . . . 23 ((((F Fn AG Fn A) ∧ xA) ∧ ∀wx (Fw) = (Gw)) → (Fx) = (Gx))
3231fveq2d 2836 . . . . . . . . . . . . . . . . . . . . . 22 ((((F Fn AG Fn A) ∧ xA) ∧ ∀wx (Fw) = (Gw)) → (B ‘(Fx)) = (B ‘(Gx)))
3329, 32syl5bir 184 . . . . . . . . . . . . . . . . . . . . 21 (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ((((F Fn AG Fn A) ∧ xA) ∧ ∀wx (Fw) = (Gw)) → (Fx) = (Gx)))
3433exp4c 297 . . . . . . . . . . . . . . . . . . . 20 (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ((F Fn AG Fn A) → (xA → (∀wx (Fw) = (Gw) → (Fx) = (Gx)))))
3534com4l 39 . . . . . . . . . . . . . . . . . . 19 ((F Fn AG Fn A) → (xA → (∀wx (Fw) = (Gw) → (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx)))))
3628, 35syl9 55 . . . . . . . . . . . . . . . . . 18 (xy → ((F Fn AG Fn A) → (yA → (∀wx (Fw) = (Gw) → (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx))))))
3727, 36syl6 23 . . . . . . . . . . . . . . . . 17 (y ∈ On → (xy → ((F Fn AG Fn A) → (yA → (∀wx (Fw) = (Gw) → (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx)))))))
3837imp4a 282 . . . . . . . . . . . . . . . 16 (y ∈ On → (xy → (((F Fn AG Fn A) ∧ yA) → (∀wx (Fw) = (Gw) → (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx))))))
3938com23 32 . . . . . . . . . . . . . . 15 (y ∈ On → (((F Fn AG Fn A) ∧ yA) → (xy → (∀wx (Fw) = (Gw) → (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx))))))
4039imp31 280 . . . . . . . . . . . . . 14 (((y ∈ On ∧ ((F Fn AG Fn A) ∧ yA)) ∧ xy) → (∀wx (Fw) = (Gw) → (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx))))
4140r19.20dva 1256 . . . . . . . . . . . . 13 ((y ∈ On ∧ ((F Fn AG Fn A) ∧ yA)) → (∀xywx (Fw) = (Gw) → ∀xy (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx))))
42 r19.20 1251 . . . . . . . . . . . . 13 (∀xy (((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → (Fx) = (Gx)) → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx)))
4341, 42syl6 23 . . . . . . . . . . . 12 ((y ∈ On ∧ ((F Fn AG Fn A) ∧ yA)) → (∀xywx (Fw) = (Gw) → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx))))
44 hbra1 1237 . . . . . . . . . . . . 13 (∀xz (Fx) = (Gx) → ∀xxz (Fx) = (Gx))
45 ax-17 925 . . . . . . . . . . . . 13 (∀wx (Fw) = (Gw) → ∀zwx (Fw) = (Gw))
46 raleq 1324 . . . . . . . . . . . . . 14 (z = x → (∀wz (Fw) = (Gw) ↔ ∀wx (Fw) = (Gw)))
47 fveq2 2832 . . . . . . . . . . . . . . . 16 (x = w → (Fx) = (Fw))
48 fveq2 2832 . . . . . . . . . . . . . . . 16 (x = w → (Gx) = (Gw))
4947, 48cleq12d 1115 . . . . . . . . . . . . . . 15 (x = w → ((Fx) = (Gx) ↔ (Fw) = (Gw)))
5049cbvralv 1333 . . . . . . . . . . . . . 14 (∀xz (Fx) = (Gx) ↔ ∀wz (Fw) = (Gw))
5146, 50syl5bb 410 . . . . . . . . . . . . 13 (z = x → (∀xz (Fx) = (Gx) ↔ ∀wx (Fw) = (Gw)))
5244, 45, 51cbvral 1331 . . . . . . . . . . . 12 (∀zyxz (Fx) = (Gx) ↔ ∀xywx (Fw) = (Gw))
5343, 52syl5ib 181 . . . . . . . . . . 11 ((y ∈ On ∧ ((F Fn AG Fn A) ∧ yA)) → (∀zyxz (Fx) = (Gx) → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx))))
5453exp 291 . . . . . . . . . 10 (y ∈ On → (((F Fn AG Fn A) ∧ yA) → (∀zyxz (Fx) = (Gx) → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx)))))
5554com23 32 . . . . . . . . 9 (y ∈ On → (∀zyxz (Fx) = (Gx) → (((F Fn AG Fn A) ∧ yA) → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx)))))
5655imp4a 282 . . . . . . . 8 (y ∈ On → (∀zyxz (Fx) = (Gx) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx))))
5726, 56syl34d 29 . . . . . . 7 (y ∈ On → ((∀zy (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀zyxz (Fx) = (Gx)) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx)))))
58 pm2.43 57 . . . . . . 7 (((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx))) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx)))
5957, 58syl6 23 . . . . . 6 (y ∈ On → ((∀zy (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀zyxz (Fx) = (Gx)) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx))))
60 r19.20 1251 . . . . . 6 (∀zy ((((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xz (Fx) = (Gx)) → (∀zy (((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀zyxz (Fx) = (Gx)))
6159, 60syl5 22 . . . . 5 (y ∈ On → (∀zy ((((F Fn AG Fn A) ∧ zA) ∧ ∀xz ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xz (Fx) = (Gx)) → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx))))
6213, 61tfis2 2247 . . . 4 (y ∈ On → ((((F Fn AG Fn A) ∧ yA) ∧ ∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx)))) → ∀xy (Fx) = (Gx)))
6362exp4c 297 . . 3 (y ∈ On → ((F Fn AG Fn A) → (yA → (∀xy ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xy (Fx) = (Gx)))))
647, 63vtoclga 1387 . 2 (A ∈ On → ((F Fn AG Fn A) → (AA → (∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xA (Fx) = (Gx)))))
651, 64mpii 45 1 (A ∈ On → ((F Fn AG Fn A) → (∀xA ((Fx) = (B ‘(Fx)) ∧ (Gx) = (B ‘(Gx))) → ∀xA (Fx) = (Gx))))
Colors of variables: wff set class
Syntax hints:   → wi 2   ∧ wa 196   = weq 797   ∈ wel 803   = wceq 1091   ∈ wcel 1092  ∀wral 1201   ⊆ wss 1487  Oncon0 2199   ↾ cres 2412   Fn wfn 2417   ‘cfv 2422
This theorem is referenced by:  tfrlem2 2950
This theorem was proved from axioms:  ax-1 3  ax-2 4  ax-3 5  ax-mp 6  ax-4 673  ax-5 674  ax-6 675  ax-7 676  ax-gen 677  ax-8 798  ax-9 799  ax-10 800  ax-11 801  ax-12 802  ax-13 804  ax-14 805  ax-16 922  ax-17 925  ax-ext 1074  ax-rep 1075  ax-un 1076  ax-pow 1077
This theorem depends on definitions:  df-bi 128  df-or 197  df-an 198  df-3or 582  df-3an 583  df-ex 679  df-sb 853  df-eu 1009  df-mo 1010  df-clab 1093  df-cleq 1097  df-clel 1099  df-ral 1205  df-rex 1206  df-rab 1208  df-v 1349  df-sbc 1441  df-dif 1489  df-un 1490  df-in 1491  df-ss 1492  df-nul 1708  df-pw 1799  df-sn 1811  df-pr 1812  df-tp 1814  df-op 1815  df-uni 1920  df-tr 2042  df-br 2063  df-opab 2098  df-eprel 2122  df-id 2125  df-po 2128  df-so 2138  df-fr 2169  df-we 2186  df-ord 2202  df-on 2203  df-xp 2424  df-rel 2425  df-cnv 2426  df-co 2427  df-dm 2428  df-rn 2429  df-res 2430  df-ima 2431  df-fun 2432  df-fn 2433  df-fv 2438
metamath.org