Metamath Proof Explorer


Theorem r1omhfbregs

Description: The class of all hereditarily finite sets is the only class with the property that all sets are members of it iff they are finite and all of their elements are members of it. (Contributed by BTernaryTau, 21-Jan-2026)

Ref Expression
Assertion r1omhfbregs H = R1 ω x x H x Fin y x y H

Proof

Step Hyp Ref Expression
1 r1omhf x R1 ω x Fin y x y R1 ω
2 eleq2w2 H = R1 ω x H x R1 ω
3 eleq2w2 H = R1 ω y H y R1 ω
4 3 ralbidv H = R1 ω y x y H y x y R1 ω
5 4 anbi2d H = R1 ω x Fin y x y H x Fin y x y R1 ω
6 2 5 bibi12d H = R1 ω x H x Fin y x y H x R1 ω x Fin y x y R1 ω
7 1 6 mpbiri H = R1 ω x H x Fin y x y H
8 7 alrimiv H = R1 ω x x H x Fin y x y H
9 biimp x H x Fin y x y H x H x Fin y x y H
10 9 alimi x x H x Fin y x y H x x H x Fin y x y H
11 simpr x Fin y x y H y x y H
12 11 imim2i x H x Fin y x y H x H y x y H
13 12 alimi x x H x Fin y x y H x x H y x y H
14 df-ral x H y x y H x x H y x y H
15 13 14 sylibr x x H x Fin y x y H x H y x y H
16 dftr5 Tr H x H y x y H
17 15 16 sylibr x x H x Fin y x y H Tr H
18 simpl x Fin y x y H x Fin
19 18 imim2i x H x Fin y x y H x H x Fin
20 19 alimi x x H x Fin y x y H x x H x Fin
21 df-ss H Fin x x H x Fin
22 20 21 sylibr x x H x Fin y x y H H Fin
23 trssfir1omregs Tr H H Fin H R1 ω
24 17 22 23 syl2anc x x H x Fin y x y H H R1 ω
25 10 24 syl x x H x Fin y x y H H R1 ω
26 biimpr x H x Fin y x y H x Fin y x y H x H
27 26 alimi x x H x Fin y x y H x x Fin y x y H x H
28 eleq1w z = w z R1 ω w R1 ω
29 eleq1w z = w z H w H
30 28 29 imbi12d z = w z R1 ω z H w R1 ω w H
31 30 imbi2d z = w x x Fin y x y H x H z R1 ω z H x x Fin y x y H x H w R1 ω w H
32 ra4v w z x x Fin y x y H x H w R1 ω w H x x Fin y x y H x H w z w R1 ω w H
33 r1omhf z R1 ω z Fin w z w R1 ω
34 ralim w z w R1 ω w H w z w R1 ω w z w H
35 34 anim2d w z w R1 ω w H z Fin w z w R1 ω z Fin w z w H
36 33 35 biimtrid w z w R1 ω w H z R1 ω z Fin w z w H
37 eleq1w x = z x Fin z Fin
38 eleq1w y = w y H w H
39 38 adantl x = z y = w y H w H
40 simpl x = z y = w x = z
41 39 40 cbvraldva2 x = z y x y H w z w H
42 37 41 anbi12d x = z x Fin y x y H z Fin w z w H
43 eleq1w x = z x H z H
44 42 43 imbi12d x = z x Fin y x y H x H z Fin w z w H z H
45 44 spvv x x Fin y x y H x H z Fin w z w H z H
46 36 45 syl9r x x Fin y x y H x H w z w R1 ω w H z R1 ω z H
47 32 46 sylcom w z x x Fin y x y H x H w R1 ω w H x x Fin y x y H x H z R1 ω z H
48 31 47 setinds2regs x x Fin y x y H x H z R1 ω z H
49 48 ssrdv x x Fin y x y H x H R1 ω H
50 27 49 syl x x H x Fin y x y H R1 ω H
51 25 50 eqssd x x H x Fin y x y H H = R1 ω
52 8 51 impbii H = R1 ω x x H x Fin y x y H