dfmgc2 - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > dfmgc2		Structured version Visualization version GIF version

Theorem dfmgc2 33384

Description: Alternate definition of the monotone Galois connection. (Contributed by Thierry Arnoux, 26-Apr-2024.)

**Hypotheses**
Ref	Expression
mgcoval.1	⊢ 𝐴 = (Base‘𝑉)
mgcoval.2	⊢ 𝐵 = (Base‘𝑊)
mgcoval.3	⊢ ≤ = (le‘𝑉)
mgcoval.4	⊢ ≲ = (le‘𝑊)
mgcval.1	⊢ 𝐻 = (𝑉MGalConn𝑊)
mgcval.2	⊢ (𝜑 → 𝑉 ∈ Proset )
mgcval.3	⊢ (𝜑 → 𝑊 ∈ Proset )

**Assertion**
Ref	Expression
dfmgc2	⊢ (𝜑 → (𝐹𝐻𝐺 ↔ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))))

Distinct variable groups: 𝑣, ≤ 𝑣, ≲ 𝑣,𝐴,𝑥,𝑦 𝑣,𝐵,𝑥,𝑦 𝑣,𝑉,𝑥,𝑦 𝑣,𝑊,𝑥,𝑦 𝑥,𝐹,𝑦 𝑥,𝐺,𝑦 𝑢, ≤ 𝜑,𝑥,𝑦 𝑥,𝐻,𝑦 𝜑,𝑢,𝑣 𝑢,𝐻,𝑣 𝑢,𝐺,𝑣 𝑢,𝐹,𝑣 𝑢,𝐵 𝑢, ≲ 𝑥, ≤ ,𝑦 𝑥, ≲ ,𝑦 Allowed substitution hints: 𝐴(𝑢) 𝑉(𝑢) 𝑊(𝑢)

Proof of Theorem dfmgc2 Dummy variables 𝑖 𝑗 𝑚 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		mgcoval.1	. . . . 5 ⊢ 𝐴 = (Base‘𝑉)
2		mgcoval.2	. . . . 5 ⊢ 𝐵 = (Base‘𝑊)
3		mgcoval.3	. . . . 5 ⊢ ≤ = (le‘𝑉)
4		mgcoval.4	. . . . 5 ⊢ ≲ = (le‘𝑊)
5		mgcval.1	. . . . 5 ⊢ 𝐻 = (𝑉MGalConn𝑊)
6		mgcval.2	. . . . 5 ⊢ (𝜑 → 𝑉 ∈ Proset )
7		mgcval.3	. . . . 5 ⊢ (𝜑 → 𝑊 ∈ Proset )
8	1, 2, 3, 4, 5, 6, 7	mgcval 33375	. . . 4 ⊢ (𝜑 → (𝐹𝐻𝐺 ↔ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐵 ((𝐹‘𝑥) ≲ 𝑦 ↔ 𝑥 ≤ (𝐺‘𝑦)))))
9	8	simprbda 504	. . 3 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴))
10	6	ad4antr 745	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑉 ∈ Proset )
11	7	ad4antr 745	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑊 ∈ Proset )
12		simp-4r 796	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝐹𝐻𝐺)
13		simpllr 788	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑥 ∈ 𝐴)
14		simplr 781	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑦 ∈ 𝐴)
15		simpr 490	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑥 ≤ 𝑦)
16	1, 2, 3, 4, 5, 10, 11, 12, 13, 14, 15	mgcmnt1 33380	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → (𝐹‘𝑥) ≲ (𝐹‘𝑦))
17	16	ex 418	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) → (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
18	17	anasss 472	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
19	18	ralrimivva 3210	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
20	6	ad4antr 745	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑉 ∈ Proset )
21	7	ad4antr 745	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑊 ∈ Proset )
22		simp-4r 796	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝐹𝐻𝐺)
23		simpllr 788	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑢 ∈ 𝐵)
24		simplr 781	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑣 ∈ 𝐵)
25		simpr 490	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑢 ≲ 𝑣)
26	1, 2, 3, 4, 5, 20, 21, 22, 23, 24, 25	mgcmnt2 33381	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → (𝐺‘𝑢) ≤ (𝐺‘𝑣))
27	26	ex 418	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) → (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
28	27	anasss 472	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ (𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵)) → (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
29	28	ralrimivva 3210	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
30	19, 29	jca 521	. . . 4 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))))
31	6	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝑉 ∈ Proset )
32	7	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝑊 ∈ Proset )
33		simplr 781	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝐹𝐻𝐺)
34		simpr 490	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝑢 ∈ 𝐵)
35	1, 2, 3, 4, 5, 31, 32, 33, 34	mgccole2 33379	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → (𝐹‘(𝐺‘𝑢)) ≲ 𝑢)
36	35	ralrimiva 3159	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢)
37	6	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑉 ∈ Proset )
38	7	ad2antrr 739	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑊 ∈ Proset )
39		simplr 781	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝐹𝐻𝐺)
40		simpr 490	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
41	1, 2, 3, 4, 5, 37, 38, 39, 40	mgccole1 33378	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))
42	41	ralrimiva 3159	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))
43	36, 42	jca 521	. . . 4 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))))
44	30, 43	jca 521	. . 3 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))
45	9, 44	jca 521	. 2 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))))))
46	6	ad4antr 745	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝑉 ∈ Proset )
47	7	ad4antr 745	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝑊 ∈ Proset )
48		simp-4r 796	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴))
49	48	simpld 500	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝐹:𝐴⟶𝐵)
50	48	simprd 501	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝐺:𝐵⟶𝐴)
51		simpllr 788	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))))
52	51	simpld 500	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
53		breq1 5114	. . . . . . . . 9 ⊢ (𝑥 = 𝑚 → (𝑥 ≤ 𝑦 ↔ 𝑚 ≤ 𝑦))
54		fveq2 6885	. . . . . . . . . 10 ⊢ (𝑥 = 𝑚 → (𝐹‘𝑥) = (𝐹‘𝑚))
55	54	breq1d 5121	. . . . . . . . 9 ⊢ (𝑥 = 𝑚 → ((𝐹‘𝑥) ≲ (𝐹‘𝑦) ↔ (𝐹‘𝑚) ≲ (𝐹‘𝑦)))
56	53, 55	imbi12d 347	. . . . . . . 8 ⊢ (𝑥 = 𝑚 → ((𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ↔ (𝑚 ≤ 𝑦 → (𝐹‘𝑚) ≲ (𝐹‘𝑦))))
57		breq2 5115	. . . . . . . . 9 ⊢ (𝑦 = 𝑛 → (𝑚 ≤ 𝑦 ↔ 𝑚 ≤ 𝑛))
58		fveq2 6885	. . . . . . . . . 10 ⊢ (𝑦 = 𝑛 → (𝐹‘𝑦) = (𝐹‘𝑛))
59	58	breq2d 5123	. . . . . . . . 9 ⊢ (𝑦 = 𝑛 → ((𝐹‘𝑚) ≲ (𝐹‘𝑦) ↔ (𝐹‘𝑚) ≲ (𝐹‘𝑛)))
60	57, 59	imbi12d 347	. . . . . . . 8 ⊢ (𝑦 = 𝑛 → ((𝑚 ≤ 𝑦 → (𝐹‘𝑚) ≲ (𝐹‘𝑦)) ↔ (𝑚 ≤ 𝑛 → (𝐹‘𝑚) ≲ (𝐹‘𝑛))))
61	56, 60	cbvral2vw 3249	. . . . . . 7 ⊢ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ↔ ∀𝑚 ∈ 𝐴 ∀𝑛 ∈ 𝐴 (𝑚 ≤ 𝑛 → (𝐹‘𝑚) ≲ (𝐹‘𝑛)))
62	52, 61	sylib 221	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑚 ∈ 𝐴 ∀𝑛 ∈ 𝐴 (𝑚 ≤ 𝑛 → (𝐹‘𝑚) ≲ (𝐹‘𝑛)))
63	51	simprd 501	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
64		breq1 5114	. . . . . . . . 9 ⊢ (𝑢 = 𝑖 → (𝑢 ≲ 𝑣 ↔ 𝑖 ≲ 𝑣))
65		fveq2 6885	. . . . . . . . . 10 ⊢ (𝑢 = 𝑖 → (𝐺‘𝑢) = (𝐺‘𝑖))
66	65	breq1d 5121	. . . . . . . . 9 ⊢ (𝑢 = 𝑖 → ((𝐺‘𝑢) ≤ (𝐺‘𝑣) ↔ (𝐺‘𝑖) ≤ (𝐺‘𝑣)))
67	64, 66	imbi12d 347	. . . . . . . 8 ⊢ (𝑢 = 𝑖 → ((𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)) ↔ (𝑖 ≲ 𝑣 → (𝐺‘𝑖) ≤ (𝐺‘𝑣))))
68		breq2 5115	. . . . . . . . 9 ⊢ (𝑣 = 𝑗 → (𝑖 ≲ 𝑣 ↔ 𝑖 ≲ 𝑗))
69		fveq2 6885	. . . . . . . . . 10 ⊢ (𝑣 = 𝑗 → (𝐺‘𝑣) = (𝐺‘𝑗))
70	69	breq2d 5123	. . . . . . . . 9 ⊢ (𝑣 = 𝑗 → ((𝐺‘𝑖) ≤ (𝐺‘𝑣) ↔ (𝐺‘𝑖) ≤ (𝐺‘𝑗)))
71	68, 70	imbi12d 347	. . . . . . . 8 ⊢ (𝑣 = 𝑗 → ((𝑖 ≲ 𝑣 → (𝐺‘𝑖) ≤ (𝐺‘𝑣)) ↔ (𝑖 ≲ 𝑗 → (𝐺‘𝑖) ≤ (𝐺‘𝑗))))
72	67, 71	cbvral2vw 3249	. . . . . . 7 ⊢ (∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)) ↔ ∀𝑖 ∈ 𝐵 ∀𝑗 ∈ 𝐵 (𝑖 ≲ 𝑗 → (𝐺‘𝑖) ≤ (𝐺‘𝑗)))
73	63, 72	sylib 221	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑖 ∈ 𝐵 ∀𝑗 ∈ 𝐵 (𝑖 ≲ 𝑗 → (𝐺‘𝑖) ≤ (𝐺‘𝑗)))
74		id 23	. . . . . . . 8 ⊢ (𝑥 = 𝑚 → 𝑥 = 𝑚)
75		2fveq3 6890	. . . . . . . 8 ⊢ (𝑥 = 𝑚 → (𝐺‘(𝐹‘𝑥)) = (𝐺‘(𝐹‘𝑚)))
76	74, 75	breq12d 5124	. . . . . . 7 ⊢ (𝑥 = 𝑚 → (𝑥 ≤ (𝐺‘(𝐹‘𝑥)) ↔ 𝑚 ≤ (𝐺‘(𝐹‘𝑚))))
77		simplr 781	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑚 ∈ 𝐴) → ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))
78		simpr 490	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑚 ∈ 𝐴) → 𝑚 ∈ 𝐴)
79	76, 77, 78	rspcdva 3584	. . . . . 6 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑚 ∈ 𝐴) → 𝑚 ≤ (𝐺‘(𝐹‘𝑚)))
80		2fveq3 6890	. . . . . . . 8 ⊢ (𝑢 = 𝑖 → (𝐹‘(𝐺‘𝑢)) = (𝐹‘(𝐺‘𝑖)))
81		id 23	. . . . . . . 8 ⊢ (𝑢 = 𝑖 → 𝑢 = 𝑖)
82	80, 81	breq12d 5124	. . . . . . 7 ⊢ (𝑢 = 𝑖 → ((𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ↔ (𝐹‘(𝐺‘𝑖)) ≲ 𝑖))
83		simpllr 788	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑖 ∈ 𝐵) → ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢)
84		simpr 490	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑖 ∈ 𝐵) → 𝑖 ∈ 𝐵)
85	82, 83, 84	rspcdva 3584	. . . . . 6 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑖 ∈ 𝐵) → (𝐹‘(𝐺‘𝑖)) ≲ 𝑖)
86	1, 2, 3, 4, 5, 46, 47, 49, 50, 62, 73, 79, 85	dfmgc2lem 33383	. . . . 5 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝐹𝐻𝐺)
87	86	anasss 472	. . . 4 ⊢ ((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))) → 𝐹𝐻𝐺)
88	87	anasss 472	. . 3 ⊢ (((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))))) → 𝐹𝐻𝐺)
89	88	anasss 472	. 2 ⊢ ((𝜑 ∧ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))) → 𝐹𝐻𝐺)
90	45, 89	impbida 813	1 ⊢ (𝜑 → (𝐹𝐻𝐺 ↔ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 401 = wceq 1570 ∈ wcel 2146 ∀wral 3081 class class class wbr 5111 ⟶wf 6536 ‘cfv 6540 (class class class)co 7419 Basecbs 17295 lecple 17343 Proset cproset 18374 MGalConncmgc 33367

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2148 ax-9 2156 ax-10 2179 ax-11 2195 ax-12 2216 ax-ext 2737 ax-sep 5259 ax-nul 5271 ax-pow 5338 ax-pr 5406 ax-un 7742

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2569 df-eu 2599 df-clab 2744 df-cleq 2757 df-clel 2840 df-nfc 2914 df-ne 2961 df-ral 3082 df-rex 3092 df-rab 3419 df-v 3459 df-sbc 3747 df-csb 3855 df-dif 3909 df-un 3911 df-in 3913 df-ss 3923 df-nul 4287 df-if 4490 df-pw 4566 df-sn 4592 df-pr 4594 df-op 4598 df-uni 4875 df-br 5112 df-opab 5176 df-id 5558 df-xp 5669 df-rel 5670 df-cnv 5671 df-co 5672 df-dm 5673 df-rn 5674 df-iota 6496 df-fun 6542 df-fn 6543 df-f 6544 df-fv 6548 df-ov 7422 df-oprab 7423 df-mpo 7424 df-map 8832 df-proset 18376 df-mgc 33369

This theorem is used by: mgcmnt1d 33385 mgcmnt2d 33386 mgcf1olem1 33389 mgcf1olem2 33390 mgcf1o 33391

W3C validator