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 33325

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 33316	. . . 4 ⊢ (𝜑 → (𝐹𝐻𝐺 ↔ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐵 ((𝐹‘𝑥) ≲ 𝑦 ↔ 𝑥 ≤ (𝐺‘𝑦)))))
9	8	simprbda 503	. . 3 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴))
10	6	ad4antr 744	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑉 ∈ Proset )
11	7	ad4antr 744	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑊 ∈ Proset )
12		simp-4r 795	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝐹𝐻𝐺)
13		simpllr 787	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑥 ∈ 𝐴)
14		simplr 780	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑦 ∈ 𝐴)
15		simpr 489	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → 𝑥 ≤ 𝑦)
16	1, 2, 3, 4, 5, 10, 11, 12, 13, 14, 15	mgcmnt1 33321	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) ∧ 𝑥 ≤ 𝑦) → (𝐹‘𝑥) ≲ (𝐹‘𝑦))
17	16	ex 417	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) ∧ 𝑦 ∈ 𝐴) → (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
18	17	anasss 471	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ (𝑥 ∈ 𝐴 ∧ 𝑦 ∈ 𝐴)) → (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
19	18	ralrimivva 3207	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
20	6	ad4antr 744	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑉 ∈ Proset )
21	7	ad4antr 744	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑊 ∈ Proset )
22		simp-4r 795	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝐹𝐻𝐺)
23		simpllr 787	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑢 ∈ 𝐵)
24		simplr 780	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑣 ∈ 𝐵)
25		simpr 489	. . . . . . . . 9 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → 𝑢 ≲ 𝑣)
26	1, 2, 3, 4, 5, 20, 21, 22, 23, 24, 25	mgcmnt2 33322	. . . . . . . 8 ⊢ (((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) ∧ 𝑢 ≲ 𝑣) → (𝐺‘𝑢) ≤ (𝐺‘𝑣))
27	26	ex 417	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) ∧ 𝑣 ∈ 𝐵) → (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
28	27	anasss 471	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ (𝑢 ∈ 𝐵 ∧ 𝑣 ∈ 𝐵)) → (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
29	28	ralrimivva 3207	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
30	19, 29	jca 520	. . . 4 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))))
31	6	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝑉 ∈ Proset )
32	7	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝑊 ∈ Proset )
33		simplr 780	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝐹𝐻𝐺)
34		simpr 489	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → 𝑢 ∈ 𝐵)
35	1, 2, 3, 4, 5, 31, 32, 33, 34	mgccole2 33320	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑢 ∈ 𝐵) → (𝐹‘(𝐺‘𝑢)) ≲ 𝑢)
36	35	ralrimiva 3156	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢)
37	6	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑉 ∈ Proset )
38	7	ad2antrr 738	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑊 ∈ Proset )
39		simplr 780	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝐹𝐻𝐺)
40		simpr 489	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑥 ∈ 𝐴)
41	1, 2, 3, 4, 5, 37, 38, 39, 40	mgccole1 33319	. . . . . 6 ⊢ (((𝜑 ∧ 𝐹𝐻𝐺) ∧ 𝑥 ∈ 𝐴) → 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))
42	41	ralrimiva 3156	. . . . 5 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))
43	36, 42	jca 520	. . . 4 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))))
44	30, 43	jca 520	. . 3 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))
45	9, 44	jca 520	. 2 ⊢ ((𝜑 ∧ 𝐹𝐻𝐺) → ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))))))
46	6	ad4antr 744	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝑉 ∈ Proset )
47	7	ad4antr 744	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝑊 ∈ Proset )
48		simp-4r 795	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴))
49	48	simpld 499	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝐹:𝐴⟶𝐵)
50	48	simprd 500	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝐺:𝐵⟶𝐴)
51		simpllr 787	. . . . . . . 8 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))))
52	51	simpld 499	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)))
53		breq1 5111	. . . . . . . . 9 ⊢ (𝑥 = 𝑚 → (𝑥 ≤ 𝑦 ↔ 𝑚 ≤ 𝑦))
54		fveq2 6881	. . . . . . . . . 10 ⊢ (𝑥 = 𝑚 → (𝐹‘𝑥) = (𝐹‘𝑚))
55	54	breq1d 5118	. . . . . . . . 9 ⊢ (𝑥 = 𝑚 → ((𝐹‘𝑥) ≲ (𝐹‘𝑦) ↔ (𝐹‘𝑚) ≲ (𝐹‘𝑦)))
56	53, 55	imbi12d 347	. . . . . . . 8 ⊢ (𝑥 = 𝑚 → ((𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ↔ (𝑚 ≤ 𝑦 → (𝐹‘𝑚) ≲ (𝐹‘𝑦))))
57		breq2 5112	. . . . . . . . 9 ⊢ (𝑦 = 𝑛 → (𝑚 ≤ 𝑦 ↔ 𝑚 ≤ 𝑛))
58		fveq2 6881	. . . . . . . . . 10 ⊢ (𝑦 = 𝑛 → (𝐹‘𝑦) = (𝐹‘𝑛))
59	58	breq2d 5120	. . . . . . . . 9 ⊢ (𝑦 = 𝑛 → ((𝐹‘𝑚) ≲ (𝐹‘𝑦) ↔ (𝐹‘𝑚) ≲ (𝐹‘𝑛)))
60	57, 59	imbi12d 347	. . . . . . . 8 ⊢ (𝑦 = 𝑛 → ((𝑚 ≤ 𝑦 → (𝐹‘𝑚) ≲ (𝐹‘𝑦)) ↔ (𝑚 ≤ 𝑛 → (𝐹‘𝑚) ≲ (𝐹‘𝑛))))
61	56, 60	cbvral2vw 3246	. . . . . . 7 ⊢ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ↔ ∀𝑚 ∈ 𝐴 ∀𝑛 ∈ 𝐴 (𝑚 ≤ 𝑛 → (𝐹‘𝑚) ≲ (𝐹‘𝑛)))
62	52, 61	sylib 221	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑚 ∈ 𝐴 ∀𝑛 ∈ 𝐴 (𝑚 ≤ 𝑛 → (𝐹‘𝑚) ≲ (𝐹‘𝑛)))
63	51	simprd 500	. . . . . . 7 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))
64		breq1 5111	. . . . . . . . 9 ⊢ (𝑢 = 𝑖 → (𝑢 ≲ 𝑣 ↔ 𝑖 ≲ 𝑣))
65		fveq2 6881	. . . . . . . . . 10 ⊢ (𝑢 = 𝑖 → (𝐺‘𝑢) = (𝐺‘𝑖))
66	65	breq1d 5118	. . . . . . . . 9 ⊢ (𝑢 = 𝑖 → ((𝐺‘𝑢) ≤ (𝐺‘𝑣) ↔ (𝐺‘𝑖) ≤ (𝐺‘𝑣)))
67	64, 66	imbi12d 347	. . . . . . . 8 ⊢ (𝑢 = 𝑖 → ((𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)) ↔ (𝑖 ≲ 𝑣 → (𝐺‘𝑖) ≤ (𝐺‘𝑣))))
68		breq2 5112	. . . . . . . . 9 ⊢ (𝑣 = 𝑗 → (𝑖 ≲ 𝑣 ↔ 𝑖 ≲ 𝑗))
69		fveq2 6881	. . . . . . . . . 10 ⊢ (𝑣 = 𝑗 → (𝐺‘𝑣) = (𝐺‘𝑗))
70	69	breq2d 5120	. . . . . . . . 9 ⊢ (𝑣 = 𝑗 → ((𝐺‘𝑖) ≤ (𝐺‘𝑣) ↔ (𝐺‘𝑖) ≤ (𝐺‘𝑗)))
71	68, 70	imbi12d 347	. . . . . . . 8 ⊢ (𝑣 = 𝑗 → ((𝑖 ≲ 𝑣 → (𝐺‘𝑖) ≤ (𝐺‘𝑣)) ↔ (𝑖 ≲ 𝑗 → (𝐺‘𝑖) ≤ (𝐺‘𝑗))))
72	67, 71	cbvral2vw 3246	. . . . . . 7 ⊢ (∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)) ↔ ∀𝑖 ∈ 𝐵 ∀𝑗 ∈ 𝐵 (𝑖 ≲ 𝑗 → (𝐺‘𝑖) ≤ (𝐺‘𝑗)))
73	63, 72	sylib 221	. . . . . 6 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → ∀𝑖 ∈ 𝐵 ∀𝑗 ∈ 𝐵 (𝑖 ≲ 𝑗 → (𝐺‘𝑖) ≤ (𝐺‘𝑗)))
74		id 23	. . . . . . . 8 ⊢ (𝑥 = 𝑚 → 𝑥 = 𝑚)
75		2fveq3 6886	. . . . . . . 8 ⊢ (𝑥 = 𝑚 → (𝐺‘(𝐹‘𝑥)) = (𝐺‘(𝐹‘𝑚)))
76	74, 75	breq12d 5121	. . . . . . 7 ⊢ (𝑥 = 𝑚 → (𝑥 ≤ (𝐺‘(𝐹‘𝑥)) ↔ 𝑚 ≤ (𝐺‘(𝐹‘𝑚))))
77		simplr 780	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑚 ∈ 𝐴) → ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))
78		simpr 489	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑚 ∈ 𝐴) → 𝑚 ∈ 𝐴)
79	76, 77, 78	rspcdva 3581	. . . . . 6 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑚 ∈ 𝐴) → 𝑚 ≤ (𝐺‘(𝐹‘𝑚)))
80		2fveq3 6886	. . . . . . . 8 ⊢ (𝑢 = 𝑖 → (𝐹‘(𝐺‘𝑢)) = (𝐹‘(𝐺‘𝑖)))
81		id 23	. . . . . . . 8 ⊢ (𝑢 = 𝑖 → 𝑢 = 𝑖)
82	80, 81	breq12d 5121	. . . . . . 7 ⊢ (𝑢 = 𝑖 → ((𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ↔ (𝐹‘(𝐺‘𝑖)) ≲ 𝑖))
83		simpllr 787	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑖 ∈ 𝐵) → ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢)
84		simpr 489	. . . . . . 7 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑖 ∈ 𝐵) → 𝑖 ∈ 𝐵)
85	82, 83, 84	rspcdva 3581	. . . . . 6 ⊢ ((((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) ∧ 𝑖 ∈ 𝐵) → (𝐹‘(𝐺‘𝑖)) ≲ 𝑖)
86	1, 2, 3, 4, 5, 46, 47, 49, 50, 62, 73, 79, 85	dfmgc2lem 33324	. . . . 5 ⊢ (((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ ∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢) ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))) → 𝐹𝐻𝐺)
87	86	anasss 471	. . . 4 ⊢ ((((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ (∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣)))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))) → 𝐹𝐻𝐺)
88	87	anasss 471	. . 3 ⊢ (((𝜑 ∧ (𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴)) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥))))) → 𝐹𝐻𝐺)
89	88	anasss 471	. 2 ⊢ ((𝜑 ∧ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))) → 𝐹𝐻𝐺)
90	45, 89	impbida 812	1 ⊢ (𝜑 → (𝐹𝐻𝐺 ↔ ((𝐹:𝐴⟶𝐵 ∧ 𝐺:𝐵⟶𝐴) ∧ ((∀𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝑥 ≤ 𝑦 → (𝐹‘𝑥) ≲ (𝐹‘𝑦)) ∧ ∀𝑢 ∈ 𝐵 ∀𝑣 ∈ 𝐵 (𝑢 ≲ 𝑣 → (𝐺‘𝑢) ≤ (𝐺‘𝑣))) ∧ (∀𝑢 ∈ 𝐵 (𝐹‘(𝐺‘𝑢)) ≲ 𝑢 ∧ ∀𝑥 ∈ 𝐴 𝑥 ≤ (𝐺‘(𝐹‘𝑥)))))))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ↔ wb 209 ∧ wa 400 = wceq 1569 ∈ wcel 2142 ∀wral 3078 class class class wbr 5108 ⟶wf 6532 ‘cfv 6536 (class class class)co 7412 Basecbs 17275 lecple 17323 Proset cproset 18354 MGalConncmgc 33308

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1824 ax-4 1838 ax-5 1939 ax-6 1996 ax-7 2037 ax-8 2144 ax-9 2152 ax-10 2175 ax-11 2191 ax-12 2212 ax-ext 2734 ax-sep 5256 ax-nul 5268 ax-pow 5335 ax-pr 5403 ax-un 7734

This proof depends on definitions: df-bi 210 df-an 401 df-or 861 df-3an 1104 df-tru 1572 df-fal 1582 df-ex 1809 df-nf 1813 df-sb 2096 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-ral 3079 df-rex 3089 df-rab 3416 df-v 3456 df-sbc 3744 df-csb 3853 df-dif 3907 df-un 3909 df-in 3911 df-ss 3921 df-nul 4286 df-if 4487 df-pw 4563 df-sn 4589 df-pr 4591 df-op 4595 df-uni 4872 df-br 5109 df-opab 5173 df-id 5555 df-xp 5666 df-rel 5667 df-cnv 5668 df-co 5669 df-dm 5670 df-rn 5671 df-iota 6492 df-fun 6538 df-fn 6539 df-f 6540 df-fv 6544 df-ov 7415 df-oprab 7416 df-mpo 7417 df-map 8824 df-proset 18356 df-mgc 33310

This theorem is used by: mgcmnt1d 33326 mgcmnt2d 33327 mgcf1olem1 33330 mgcf1olem2 33331 mgcf1o 33332

W3C validator