Theorem zorn2lem6 9323

Description: Lemma for zorn2 9328. (Contributed by NM, 4-Apr-1997.) (Revised by Mario Carneiro, 9-May-2015.)

Hypotheses

Ref	Expression
zorn2lem.3	⊢ 𝐹 = recs((𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣)))
zorn2lem.4	⊢ 𝐶 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ ran 𝑓 𝑔𝑅𝑧}
zorn2lem.5	⊢ 𝐷 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑥)𝑔𝑅𝑧}
zorn2lem.7	⊢ 𝐻 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧}

Assertion

Ref	Expression
zorn2lem6	⊢ (𝑅 Po 𝐴 → (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → 𝑅 Or (𝐹 “ 𝑥)))

Distinct variable groups:   𝑓,𝑔,𝑢,𝑣,𝑤,𝑥,𝑦,𝑧,𝐴   𝐷,𝑓,𝑢,𝑣,𝑦   𝑓,𝐹,𝑔,𝑢,𝑣,𝑥,𝑦,𝑧   𝑅,𝑓,𝑔,𝑢,𝑣,𝑤,𝑥,𝑦,𝑧   𝑣,𝐶   𝑥,𝐻,𝑢,𝑣,𝑓

Allowed substitution hints:   𝐶(𝑥,𝑦,𝑧,𝑤,𝑢,𝑓,𝑔)   𝐷(𝑥,𝑧,𝑤,𝑔)   𝐹(𝑤)   𝐻(𝑦,𝑧,𝑤,𝑔)

Proof of Theorem zorn2lem6

Dummy variables 𝑎 𝑏 𝑟 𝑠 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		poss 5037	. . . 4 ⊢ ((𝐹 “ 𝑥) ⊆ 𝐴 → (𝑅 Po 𝐴 → 𝑅 Po (𝐹 “ 𝑥)))
2		zorn2lem.3	. . . . 5 ⊢ 𝐹 = recs((𝑓 ∈ V ↦ (℩𝑣 ∈ 𝐶 ∀𝑢 ∈ 𝐶 ¬ 𝑢𝑤𝑣)))
3		zorn2lem.4	. . . . 5 ⊢ 𝐶 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ ran 𝑓 𝑔𝑅𝑧}
4		zorn2lem.5	. . . . 5 ⊢ 𝐷 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑥)𝑔𝑅𝑧}
5		zorn2lem.7	. . . . 5 ⊢ 𝐻 = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧}
6	2, 3, 4, 5	zorn2lem5 9322	. . . 4 ⊢ (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → (𝐹 “ 𝑥) ⊆ 𝐴)
7	1, 6	syl11 33	. . 3 ⊢ (𝑅 Po 𝐴 → (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → 𝑅 Po (𝐹 “ 𝑥)))
8	2	tfr1 7493	. . . . . . . 8 ⊢ 𝐹 Fn On
9		fnfun 5988	. . . . . . . 8 ⊢ (𝐹 Fn On → Fun 𝐹)
10		fvelima 6248	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝑠 ∈ (𝐹 “ 𝑥)) → ∃𝑏 ∈ 𝑥 (𝐹‘𝑏) = 𝑠)
11		df-rex 2918	. . . . . . . . . . 11 ⊢ (∃𝑏 ∈ 𝑥 (𝐹‘𝑏) = 𝑠 ↔ ∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠))
12	10, 11	sylib 208	. . . . . . . . . 10 ⊢ ((Fun 𝐹 ∧ 𝑠 ∈ (𝐹 “ 𝑥)) → ∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠))
13	12	ex 450	. . . . . . . . 9 ⊢ (Fun 𝐹 → (𝑠 ∈ (𝐹 “ 𝑥) → ∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠)))
14		fvelima 6248	. . . . . . . . . . 11 ⊢ ((Fun 𝐹 ∧ 𝑟 ∈ (𝐹 “ 𝑥)) → ∃𝑎 ∈ 𝑥 (𝐹‘𝑎) = 𝑟)
15		df-rex 2918	. . . . . . . . . . 11 ⊢ (∃𝑎 ∈ 𝑥 (𝐹‘𝑎) = 𝑟 ↔ ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟))
16	14, 15	sylib 208	. . . . . . . . . 10 ⊢ ((Fun 𝐹 ∧ 𝑟 ∈ (𝐹 “ 𝑥)) → ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟))
17	16	ex 450	. . . . . . . . 9 ⊢ (Fun 𝐹 → (𝑟 ∈ (𝐹 “ 𝑥) → ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)))
18	13, 17	anim12d 586	. . . . . . . 8 ⊢ (Fun 𝐹 → ((𝑠 ∈ (𝐹 “ 𝑥) ∧ 𝑟 ∈ (𝐹 “ 𝑥)) → (∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟))))
19	8, 9, 18	mp2b 10	. . . . . . 7 ⊢ ((𝑠 ∈ (𝐹 “ 𝑥) ∧ 𝑟 ∈ (𝐹 “ 𝑥)) → (∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)))
20		an4 865	. . . . . . . . 9 ⊢ (((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) ↔ ((𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ (𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)))
21	20	2exbii 1775	. . . . . . . 8 ⊢ (∃𝑏∃𝑎((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) ↔ ∃𝑏∃𝑎((𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ (𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)))
22		eeanv 2182	. . . . . . . 8 ⊢ (∃𝑏∃𝑎((𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ (𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)) ↔ (∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)))
23	21, 22	bitri 264	. . . . . . 7 ⊢ (∃𝑏∃𝑎((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) ↔ (∃𝑏(𝑏 ∈ 𝑥 ∧ (𝐹‘𝑏) = 𝑠) ∧ ∃𝑎(𝑎 ∈ 𝑥 ∧ (𝐹‘𝑎) = 𝑟)))
24	19, 23	sylibr 224	. . . . . 6 ⊢ ((𝑠 ∈ (𝐹 “ 𝑥) ∧ 𝑟 ∈ (𝐹 “ 𝑥)) → ∃𝑏∃𝑎((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)))
25	5	neeq1i 2858	. . . . . . . . . . 11 ⊢ (𝐻 ≠ ∅ ↔ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅)
26	25	ralbii 2980	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑥 𝐻 ≠ ∅ ↔ ∀𝑦 ∈ 𝑥 {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅)
27		imaeq2 5462	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 𝑏 → (𝐹 “ 𝑦) = (𝐹 “ 𝑏))
28	27	raleqdv 3144	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝑏 → (∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧 ↔ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧))
29	28	rabbidv 3189	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑏 → {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧})
30	29	neeq1d 2853	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑏 → ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅ ↔ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅))
31	30	rspccv 3306	. . . . . . . . . . 11 ⊢ (∀𝑦 ∈ 𝑥 {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅ → (𝑏 ∈ 𝑥 → {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅))
32		imaeq2 5462	. . . . . . . . . . . . . . 15 ⊢ (𝑦 = 𝑎 → (𝐹 “ 𝑦) = (𝐹 “ 𝑎))
33	32	raleqdv 3144	. . . . . . . . . . . . . 14 ⊢ (𝑦 = 𝑎 → (∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧 ↔ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧))
34	33	rabbidv 3189	. . . . . . . . . . . . 13 ⊢ (𝑦 = 𝑎 → {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧})
35	34	neeq1d 2853	. . . . . . . . . . . 12 ⊢ (𝑦 = 𝑎 → ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅ ↔ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))
36	35	rspccv 3306	. . . . . . . . . . 11 ⊢ (∀𝑦 ∈ 𝑥 {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅ → (𝑎 ∈ 𝑥 → {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))
37	31, 36	anim12d 586	. . . . . . . . . 10 ⊢ (∀𝑦 ∈ 𝑥 {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑦)𝑔𝑅𝑧} ≠ ∅ → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)))
38	26, 37	sylbi 207	. . . . . . . . 9 ⊢ (∀𝑦 ∈ 𝑥 𝐻 ≠ ∅ → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)))
39		onelon 5748	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ 𝑏 ∈ 𝑥) → 𝑏 ∈ On)
40		onelon 5748	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ On ∧ 𝑎 ∈ 𝑥) → 𝑎 ∈ On)
41	39, 40	anim12dan 882	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 ∈ On ∧ (𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥)) → (𝑏 ∈ On ∧ 𝑎 ∈ On))
42	41	ex 450	. . . . . . . . . . . . . 14 ⊢ (𝑥 ∈ On → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → (𝑏 ∈ On ∧ 𝑎 ∈ On)))
43		eloni 5733	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑏 ∈ On → Ord 𝑏)
44		eloni 5733	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑎 ∈ On → Ord 𝑎)
45		ordtri3or 5755	. . . . . . . . . . . . . . . . . 18 ⊢ ((Ord 𝑏 ∧ Ord 𝑎) → (𝑏 ∈ 𝑎 ∨ 𝑏 = 𝑎 ∨ 𝑎 ∈ 𝑏))
46	43, 44, 45	syl2an 494	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑏 ∈ On ∧ 𝑎 ∈ On) → (𝑏 ∈ 𝑎 ∨ 𝑏 = 𝑎 ∨ 𝑎 ∈ 𝑏))
47		eqid 2622	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧}
48	2, 3, 47	zorn2lem2 9319	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑎 ∈ On ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (𝑏 ∈ 𝑎 → (𝐹‘𝑏)𝑅(𝐹‘𝑎)))
49	48	adantll 750	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (𝑏 ∈ 𝑎 → (𝐹‘𝑏)𝑅(𝐹‘𝑎)))
50		breq12 4658	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → ((𝐹‘𝑏)𝑅(𝐹‘𝑎) ↔ 𝑠𝑅𝑟))
51	50	biimpcd 239	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐹‘𝑏)𝑅(𝐹‘𝑎) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → 𝑠𝑅𝑟))
52	49, 51	syl6 35	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (𝑏 ∈ 𝑎 → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → 𝑠𝑅𝑟)))
53	52	com23 86	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑏 ∈ 𝑎 → 𝑠𝑅𝑟)))
54	53	adantrrl 760	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑏 ∈ 𝑎 → 𝑠𝑅𝑟)))
55	54	imp 445	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → (𝑏 ∈ 𝑎 → 𝑠𝑅𝑟))
56		fveq2 6191	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑏 = 𝑎 → (𝐹‘𝑏) = (𝐹‘𝑎))
57		eqeq12 2635	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → ((𝐹‘𝑏) = (𝐹‘𝑎) ↔ 𝑠 = 𝑟))
58	56, 57	syl5ib 234	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑏 = 𝑎 → 𝑠 = 𝑟))
59	58	adantl 482	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → (𝑏 = 𝑎 → 𝑠 = 𝑟))
60		eqid 2622	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} = {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧}
61	2, 3, 60	zorn2lem2 9319	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑏 ∈ On ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅)) → (𝑎 ∈ 𝑏 → (𝐹‘𝑎)𝑅(𝐹‘𝑏)))
62	61	adantlr 751	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅)) → (𝑎 ∈ 𝑏 → (𝐹‘𝑎)𝑅(𝐹‘𝑏)))
63		breq12 4658	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (((𝐹‘𝑎) = 𝑟 ∧ (𝐹‘𝑏) = 𝑠) → ((𝐹‘𝑎)𝑅(𝐹‘𝑏) ↔ 𝑟𝑅𝑠))
64	63	ancoms 469	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → ((𝐹‘𝑎)𝑅(𝐹‘𝑏) ↔ 𝑟𝑅𝑠))
65	64	biimpcd 239	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝐹‘𝑎)𝑅(𝐹‘𝑏) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → 𝑟𝑅𝑠))
66	62, 65	syl6 35	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅)) → (𝑎 ∈ 𝑏 → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → 𝑟𝑅𝑠)))
67	66	com23 86	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅)) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑎 ∈ 𝑏 → 𝑟𝑅𝑠)))
68	67	adantrrr 761	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑎 ∈ 𝑏 → 𝑟𝑅𝑠)))
69	68	imp 445	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → (𝑎 ∈ 𝑏 → 𝑟𝑅𝑠))
70	55, 59, 69	3orim123d 1407	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → ((𝑏 ∈ 𝑎 ∨ 𝑏 = 𝑎 ∨ 𝑎 ∈ 𝑏) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
71	46, 70	syl5 34	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑏 ∈ On ∧ 𝑎 ∈ On) ∧ (𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅))) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → ((𝑏 ∈ On ∧ 𝑎 ∈ On) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
72	71	exp31 630	. . . . . . . . . . . . . . 15 ⊢ ((𝑏 ∈ On ∧ 𝑎 ∈ On) → ((𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → ((𝑏 ∈ On ∧ 𝑎 ∈ On) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))))
73	72	com4r 94	. . . . . . . . . . . . . 14 ⊢ ((𝑏 ∈ On ∧ 𝑎 ∈ On) → ((𝑏 ∈ On ∧ 𝑎 ∈ On) → ((𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))))
74	42, 42, 73	syl6c 70	. . . . . . . . . . . . 13 ⊢ (𝑥 ∈ On → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → ((𝑤 We 𝐴 ∧ ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))))
75	74	exp4a 633	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ On → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → (𝑤 We 𝐴 → (({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠))))))
76	75	com3r 87	. . . . . . . . . . 11 ⊢ (𝑤 We 𝐴 → (𝑥 ∈ On → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → (({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠))))))
77	76	imp 445	. . . . . . . . . 10 ⊢ ((𝑤 We 𝐴 ∧ 𝑥 ∈ On) → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → (({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))))
78	77	a2d 29	. . . . . . . . 9 ⊢ ((𝑤 We 𝐴 ∧ 𝑥 ∈ On) → (((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → ({𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑏)𝑔𝑅𝑧} ≠ ∅ ∧ {𝑧 ∈ 𝐴 ∣ ∀𝑔 ∈ (𝐹 “ 𝑎)𝑔𝑅𝑧} ≠ ∅)) → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))))
79	38, 78	syl5 34	. . . . . . . 8 ⊢ ((𝑤 We 𝐴 ∧ 𝑥 ∈ On) → (∀𝑦 ∈ 𝑥 𝐻 ≠ ∅ → ((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) → (((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))))
80	79	imp4b 613	. . . . . . 7 ⊢ (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → (((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
81	80	exlimdvv 1862	. . . . . 6 ⊢ (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → (∃𝑏∃𝑎((𝑏 ∈ 𝑥 ∧ 𝑎 ∈ 𝑥) ∧ ((𝐹‘𝑏) = 𝑠 ∧ (𝐹‘𝑎) = 𝑟)) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
82	24, 81	syl5 34	. . . . 5 ⊢ (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → ((𝑠 ∈ (𝐹 “ 𝑥) ∧ 𝑟 ∈ (𝐹 “ 𝑥)) → (𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
83	82	ralrimivv 2970	. . . 4 ⊢ (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → ∀𝑠 ∈ (𝐹 “ 𝑥)∀𝑟 ∈ (𝐹 “ 𝑥)(𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠))
84	83	a1i 11	. . 3 ⊢ (𝑅 Po 𝐴 → (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → ∀𝑠 ∈ (𝐹 “ 𝑥)∀𝑟 ∈ (𝐹 “ 𝑥)(𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
85	7, 84	jcad 555	. 2 ⊢ (𝑅 Po 𝐴 → (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → (𝑅 Po (𝐹 “ 𝑥) ∧ ∀𝑠 ∈ (𝐹 “ 𝑥)∀𝑟 ∈ (𝐹 “ 𝑥)(𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠))))
86		df-so 5036	. 2 ⊢ (𝑅 Or (𝐹 “ 𝑥) ↔ (𝑅 Po (𝐹 “ 𝑥) ∧ ∀𝑠 ∈ (𝐹 “ 𝑥)∀𝑟 ∈ (𝐹 “ 𝑥)(𝑠𝑅𝑟 ∨ 𝑠 = 𝑟 ∨ 𝑟𝑅𝑠)))
87	85, 86	syl6ibr 242	1 ⊢ (𝑅 Po 𝐴 → (((𝑤 We 𝐴 ∧ 𝑥 ∈ On) ∧ ∀𝑦 ∈ 𝑥 𝐻 ≠ ∅) → 𝑅 Or (𝐹 “ 𝑥)))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 196   ∧ wa 384   ∨ w3o 1036   = wceq 1483  ∃wex 1704   ∈ wcel 1990   ≠ wne 2794  ∀wral 2912  ∃wrex 2913  {crab 2916  Vcvv 3200   ⊆ wss 3574  ∅c0 3915   class class class wbr 4653   ↦ cmpt 4729   Po wpo 5033   Or wor 5034   We wwe 5072  ran crn 5115   “ cima 5117  Ord word 5722  Oncon0 5723  Fun wfun 5882   Fn wfn 5883  ‘cfv 5888  ℩crio 6610  recscrecs 7467

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-riota 6611  df-wrecs 7407  df-recs 7468

This theorem is referenced by:  zorn2lem7  9324