MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  catcisolem Structured version   Visualization version   GIF version

Theorem catcisolem 18335
Description: Lemma for catciso 18336. (Contributed by Mario Carneiro, 29-Jan-2017.)
Hypotheses
Ref Expression
catciso.c 𝐶 = (CatCat‘𝑈)
catciso.b 𝐵 = (Base‘𝐶)
catciso.r 𝑅 = (Base‘𝑋)
catciso.s 𝑆 = (Base‘𝑌)
catciso.u (𝜑 → 𝑈 ∈ 𝑉)
catciso.x (𝜑 → 𝑋 ∈ 𝐵)
catciso.y (𝜑 → 𝑌 ∈ 𝐵)
catcisolem.i 𝐼 = (Inv‘𝐶)
catcisolem.g 𝐻 = (𝑥 ∈ 𝑆, 𝑦 ∈ 𝑆 ↦ ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)))
catcisolem.1 (𝜑 → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
catcisolem.2 (𝜑 → 𝐹:𝑅⟶1-1onto𝑆)
Assertion
Ref Expression
catcisolem (𝜑 → ⟨𝐹, 𝐺⟩(𝑋𝐼𝑌)⟨◡𝐹, 𝐻⟩)
Distinct variable groups:   𝑥,𝑦,𝐶   𝑥,𝐹,𝑦   𝑥,𝐺,𝑦   𝜑,𝑥,𝑦   𝑥,𝐼,𝑦   𝑥,𝑅,𝑦   𝑥,𝑆,𝑦   𝑥,𝑋,𝑦   𝑥,𝑌,𝑦
Allowed substitution hints:   𝐵(𝑥, 𝑦)   𝑈(𝑥, 𝑦)   𝐻(𝑥, 𝑦)   𝑉(𝑥, 𝑦)

Proof of Theorem catcisolem
Dummy variables 𝑓 𝑔 𝑢 𝑣 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 catcisolem.2 . . . . . . 7 (𝜑 → 𝐹:𝑅⟶1-1onto𝑆)
2 f1ococnv1 6885 . . . . . . 7 (𝐹:𝑅⟶1-1onto𝑆 → (◡𝐹 ∘ 𝐹) = ( I ↾ 𝑅))
31, 2syl 18 . . . . . 6 (𝜑 → (◡𝐹 ∘ 𝐹) = ( I ↾ 𝑅))
413ad2ant1 1151 . . . . . . . . . . . . . 14 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → 𝐹:𝑅⟶1-1onto𝑆)
5 f1of 6854 . . . . . . . . . . . . . 14 (𝐹:𝑅⟶1-1onto𝑆 → 𝐹:𝑅⟶𝑆)
64, 5syl 18 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → 𝐹:𝑅⟶𝑆)
7 simp2 1155 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → 𝑢 ∈ 𝑅)
86, 7ffvelcdmd 7117 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (𝐹‘𝑢) ∈ 𝑆)
9 simp3 1156 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → 𝑣 ∈ 𝑅)
106, 9ffvelcdmd 7117 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (𝐹‘𝑣) ∈ 𝑆)
11 simpl 488 . . . . . . . . . . . . . . . 16 ((𝑥 = (𝐹‘𝑢) ∧ 𝑦 = (𝐹‘𝑣)) → 𝑥 = (𝐹‘𝑢))
1211fveq2d 6920 . . . . . . . . . . . . . . 15 ((𝑥 = (𝐹‘𝑢) ∧ 𝑦 = (𝐹‘𝑣)) → (◡𝐹‘𝑥) = (◡𝐹‘(𝐹‘𝑢)))
13 simpr 490 . . . . . . . . . . . . . . . 16 ((𝑥 = (𝐹‘𝑢) ∧ 𝑦 = (𝐹‘𝑣)) → 𝑦 = (𝐹‘𝑣))
1413fveq2d 6920 . . . . . . . . . . . . . . 15 ((𝑥 = (𝐹‘𝑢) ∧ 𝑦 = (𝐹‘𝑣)) → (◡𝐹‘𝑦) = (◡𝐹‘(𝐹‘𝑣)))
1512, 14oveq12d 7469 . . . . . . . . . . . . . 14 ((𝑥 = (𝐹‘𝑢) ∧ 𝑦 = (𝐹‘𝑣)) → ((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))))
1615cnveqd 5865 . . . . . . . . . . . . 13 ((𝑥 = (𝐹‘𝑢) ∧ 𝑦 = (𝐹‘𝑣)) → ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ◡((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))))
17 catcisolem.g . . . . . . . . . . . . 13 𝐻 = (𝑥 ∈ 𝑆, 𝑦 ∈ 𝑆 ↦ ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)))
18 ovex 7484 . . . . . . . . . . . . . 14 ((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))) ∈ V
1918cnvex 7971 . . . . . . . . . . . . 13 ◡((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))) ∈ V
2016, 17, 19ovmpoa 7607 . . . . . . . . . . . 12 (((𝐹‘𝑢) ∈ 𝑆 ∧ (𝐹‘𝑣) ∈ 𝑆) → ((𝐹‘𝑢)𝐻(𝐹‘𝑣)) = ◡((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))))
218, 10, 20syl2anc 596 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → ((𝐹‘𝑢)𝐻(𝐹‘𝑣)) = ◡((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))))
22 f1ocnvfv1 7315 . . . . . . . . . . . . . 14 ((𝐹:𝑅⟶1-1onto𝑆 ∧ 𝑢 ∈ 𝑅) → (◡𝐹‘(𝐹‘𝑢)) = 𝑢)
234, 7, 22syl2anc 596 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (◡𝐹‘(𝐹‘𝑢)) = 𝑢)
24 f1ocnvfv1 7315 . . . . . . . . . . . . . 14 ((𝐹:𝑅⟶1-1onto𝑆 ∧ 𝑣 ∈ 𝑅) → (◡𝐹‘(𝐹‘𝑣)) = 𝑣)
254, 9, 24syl2anc 596 . . . . . . . . . . . . 13 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (◡𝐹‘(𝐹‘𝑣)) = 𝑣)
2623, 25oveq12d 7469 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → ((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))) = (𝑢𝐺𝑣))
2726cnveqd 5865 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → ◡((◡𝐹‘(𝐹‘𝑢))𝐺(◡𝐹‘(𝐹‘𝑣))) = ◡(𝑢𝐺𝑣))
2821, 27eqtrd 2798 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → ((𝐹‘𝑢)𝐻(𝐹‘𝑣)) = ◡(𝑢𝐺𝑣))
2928coeq1d 5850 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (((𝐹‘𝑢)𝐻(𝐹‘𝑣)) ∘ (𝑢𝐺𝑣)) = (◡(𝑢𝐺𝑣) ∘ (𝑢𝐺𝑣)))
30 catciso.r . . . . . . . . . . 11 𝑅 = (Base‘𝑋)
31 eqid 2763 . . . . . . . . . . 11 (Hom ‘𝑋) = (Hom ‘𝑋)
32 eqid 2763 . . . . . . . . . . 11 (Hom ‘𝑌) = (Hom ‘𝑌)
33 catcisolem.1 . . . . . . . . . . . 12 (𝜑 → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
34333ad2ant1 1151 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
3530, 31, 32, 34, 7, 9ffthf1o 18146 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (𝑢𝐺𝑣):(𝑢(Hom ‘𝑋)𝑣)⟶1-1onto((𝐹‘𝑢)(Hom ‘𝑌)(𝐹‘𝑣)))
36 f1ococnv1 6885 . . . . . . . . . 10 ((𝑢𝐺𝑣):(𝑢(Hom ‘𝑋)𝑣)⟶1-1onto((𝐹‘𝑢)(Hom ‘𝑌)(𝐹‘𝑣)) → (◡(𝑢𝐺𝑣) ∘ (𝑢𝐺𝑣)) = ( I ↾ (𝑢(Hom ‘𝑋)𝑣)))
3735, 36syl 18 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (◡(𝑢𝐺𝑣) ∘ (𝑢𝐺𝑣)) = ( I ↾ (𝑢(Hom ‘𝑋)𝑣)))
3829, 37eqtrd 2798 . . . . . . . 8 ((𝜑 ∧ 𝑢 ∈ 𝑅 ∧ 𝑣 ∈ 𝑅) → (((𝐹‘𝑢)𝐻(𝐹‘𝑣)) ∘ (𝑢𝐺𝑣)) = ( I ↾ (𝑢(Hom ‘𝑋)𝑣)))
3938mpoeq3dva 7528 . . . . . . 7 (𝜑 → (𝑢 ∈ 𝑅, 𝑣 ∈ 𝑅 ↦ (((𝐹‘𝑢)𝐻(𝐹‘𝑣)) ∘ (𝑢𝐺𝑣))) = (𝑢 ∈ 𝑅, 𝑣 ∈ 𝑅 ↦ ( I ↾ (𝑢(Hom ‘𝑋)𝑣))))
40 fveq2 6916 . . . . . . . . . 10 (𝑧 = ⟨𝑢, 𝑣⟩ → ((Hom ‘𝑋)‘𝑧) = ((Hom ‘𝑋)‘⟨𝑢, 𝑣⟩))
41 df-ov 7454 . . . . . . . . . 10 (𝑢(Hom ‘𝑋)𝑣) = ((Hom ‘𝑋)‘⟨𝑢, 𝑣⟩)
4240, 41eqtr4di 2816 . . . . . . . . 9 (𝑧 = ⟨𝑢, 𝑣⟩ → ((Hom ‘𝑋)‘𝑧) = (𝑢(Hom ‘𝑋)𝑣))
4342reseq2d 5986 . . . . . . . 8 (𝑧 = ⟨𝑢, 𝑣⟩ → ( I ↾ ((Hom ‘𝑋)‘𝑧)) = ( I ↾ (𝑢(Hom ‘𝑋)𝑣)))
4443mpompt 7565 . . . . . . 7 (𝑧 ∈ (𝑅 × 𝑅) ↦ ( I ↾ ((Hom ‘𝑋)‘𝑧))) = (𝑢 ∈ 𝑅, 𝑣 ∈ 𝑅 ↦ ( I ↾ (𝑢(Hom ‘𝑋)𝑣)))
4539, 44eqtr4di 2816 . . . . . 6 (𝜑 → (𝑢 ∈ 𝑅, 𝑣 ∈ 𝑅 ↦ (((𝐹‘𝑢)𝐻(𝐹‘𝑣)) ∘ (𝑢𝐺𝑣))) = (𝑧 ∈ (𝑅 × 𝑅) ↦ ( I ↾ ((Hom ‘𝑋)‘𝑧))))
463, 45opeq12d 4853 . . . . 5 (𝜑 → ⟨(◡𝐹 ∘ 𝐹), (𝑢 ∈ 𝑅, 𝑣 ∈ 𝑅 ↦ (((𝐹‘𝑢)𝐻(𝐹‘𝑣)) ∘ (𝑢𝐺𝑣)))⟩ = ⟨( I ↾ 𝑅), (𝑧 ∈ (𝑅 × 𝑅) ↦ ( I ↾ ((Hom ‘𝑋)‘𝑧)))⟩)
47 inss1 4136 . . . . . . . . 9 ((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌)) ⊆ (𝑋 Full 𝑌)
48 fullfunc 18133 . . . . . . . . 9 (𝑋 Full 𝑌) ⊆ (𝑋 Func 𝑌)
4947, 48sstri 3922 . . . . . . . 8 ((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌)) ⊆ (𝑋 Func 𝑌)
5049ssbri 5156 . . . . . . 7 (𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺 → 𝐹(𝑋 Func 𝑌)𝐺)
5133, 50syl 18 . . . . . 6 (𝜑 → 𝐹(𝑋 Func 𝑌)𝐺)
52 catciso.s . . . . . . 7 𝑆 = (Base‘𝑌)
53 eqid 2763 . . . . . . 7 (Id‘𝑌) = (Id‘𝑌)
54 eqid 2763 . . . . . . 7 (Id‘𝑋) = (Id‘𝑋)
55 eqid 2763 . . . . . . 7 (comp‘𝑌) = (comp‘𝑌)
56 eqid 2763 . . . . . . 7 (comp‘𝑋) = (comp‘𝑋)
57 catciso.c . . . . . . . . . 10 𝐶 = (CatCat‘𝑈)
58 catciso.b . . . . . . . . . 10 𝐵 = (Base‘𝐶)
59 catciso.u . . . . . . . . . 10 (𝜑 → 𝑈 ∈ 𝑉)
6057, 58, 59catcbas 18326 . . . . . . . . 9 (𝜑 → 𝐵 = (𝑈 ∩ Cat))
61 inss2 4137 . . . . . . . . 9 (𝑈 ∩ Cat) ⊆ Cat
6260, 61eqsstrdi 3957 . . . . . . . 8 (𝜑 → 𝐵 ⊆ Cat)
63 catciso.y . . . . . . . 8 (𝜑 → 𝑌 ∈ 𝐵)
6462, 63sseldd 3914 . . . . . . 7 (𝜑 → 𝑌 ∈ Cat)
65 catciso.x . . . . . . . 8 (𝜑 → 𝑋 ∈ 𝐵)
6662, 65sseldd 3914 . . . . . . 7 (𝜑 → 𝑋 ∈ Cat)
67 f1ocnv 6867 . . . . . . . 8 (𝐹:𝑅⟶1-1onto𝑆 → ◡𝐹:𝑆⟶1-1onto𝑅)
68 f1of 6854 . . . . . . . 8 (◡𝐹:𝑆⟶1-1onto𝑅 → ◡𝐹:𝑆⟶𝑅)
691, 67, 683syl 19 . . . . . . 7 (𝜑 → ◡𝐹:𝑆⟶𝑅)
70 ovex 7484 . . . . . . . . . 10 ((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) ∈ V
7170cnvex 7971 . . . . . . . . 9 ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) ∈ V
7217, 71fnmpoi 8116 . . . . . . . 8 𝐻 Fn (𝑆 × 𝑆)
7372a1i 11 . . . . . . 7 (𝜑 → 𝐻 Fn (𝑆 × 𝑆))
7433adantr 486 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
7569ffvelcdmda 7116 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆) → (◡𝐹‘𝑢) ∈ 𝑅)
7675adantrr 730 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (◡𝐹‘𝑢) ∈ 𝑅)
7769ffvelcdmda 7116 . . . . . . . . . . 11 ((𝜑 ∧ 𝑣 ∈ 𝑆) → (◡𝐹‘𝑣) ∈ 𝑅)
7877adantrl 729 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (◡𝐹‘𝑣) ∈ 𝑅)
7930, 31, 32, 74, 76, 78ffthf1o 18146 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))))
80 f1ocnv 6867 . . . . . . . . 9 (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))) → ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣)))⟶1-1onto((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
81 f1of 6854 . . . . . . . . 9 (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣)))⟶1-1onto((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)) → ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣)))⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
8279, 80, 813syl 19 . . . . . . . 8 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣)))⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
83 simpl 488 . . . . . . . . . . . . . 14 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → 𝑥 = 𝑢)
8483fveq2d 6920 . . . . . . . . . . . . 13 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → (◡𝐹‘𝑥) = (◡𝐹‘𝑢))
85 simpr 490 . . . . . . . . . . . . . 14 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → 𝑦 = 𝑣)
8685fveq2d 6920 . . . . . . . . . . . . 13 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → (◡𝐹‘𝑦) = (◡𝐹‘𝑣))
8784, 86oveq12d 7469 . . . . . . . . . . . 12 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → ((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)))
8887cnveqd 5865 . . . . . . . . . . 11 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑣) → ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)))
89 ovex 7484 . . . . . . . . . . . 12 ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∈ V
9089cnvex 7971 . . . . . . . . . . 11 ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∈ V
9188, 17, 90ovmpoa 7607 . . . . . . . . . 10 ((𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (𝑢𝐻𝑣) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)))
9291adantl 487 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (𝑢𝐻𝑣) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)))
931adantr 486 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → 𝐹:𝑅⟶1-1onto𝑆)
94 simprl 783 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → 𝑢 ∈ 𝑆)
95 f1ocnvfv2 7316 . . . . . . . . . . . 12 ((𝐹:𝑅⟶1-1onto𝑆 ∧ 𝑢 ∈ 𝑆) → (𝐹‘(◡𝐹‘𝑢)) = 𝑢)
9693, 94, 95syl2anc 596 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (𝐹‘(◡𝐹‘𝑢)) = 𝑢)
97 simprr 785 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → 𝑣 ∈ 𝑆)
98 f1ocnvfv2 7316 . . . . . . . . . . . 12 ((𝐹:𝑅⟶1-1onto𝑆 ∧ 𝑣 ∈ 𝑆) → (𝐹‘(◡𝐹‘𝑣)) = 𝑣)
9993, 97, 98syl2anc 596 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (𝐹‘(◡𝐹‘𝑣)) = 𝑣)
10096, 99oveq12d 7469 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → ((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))) = (𝑢(Hom ‘𝑌)𝑣))
101100eqcomd 2769 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (𝑢(Hom ‘𝑌)𝑣) = ((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))))
10292, 101feq12d 6727 . . . . . . . 8 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → ((𝑢𝐻𝑣):(𝑢(Hom ‘𝑌)𝑣)⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)) ↔ ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣)))⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))))
10382, 102mpbird 260 . . . . . . 7 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆)) → (𝑢𝐻𝑣):(𝑢(Hom ‘𝑌)𝑣)⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
104 simpr 490 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝑢 ∈ 𝑆)
105 simpl 488 . . . . . . . . . . . . . 14 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑢) → 𝑥 = 𝑢)
106105fveq2d 6920 . . . . . . . . . . . . 13 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑢) → (◡𝐹‘𝑥) = (◡𝐹‘𝑢))
107 simpr 490 . . . . . . . . . . . . . 14 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑢) → 𝑦 = 𝑢)
108107fveq2d 6920 . . . . . . . . . . . . 13 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑢) → (◡𝐹‘𝑦) = (◡𝐹‘𝑢))
109106, 108oveq12d 7469 . . . . . . . . . . . 12 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑢) → ((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)))
110109cnveqd 5865 . . . . . . . . . . 11 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑢) → ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)))
111 ovex 7484 . . . . . . . . . . . 12 ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)) ∈ V
112111cnvex 7971 . . . . . . . . . . 11 ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)) ∈ V
113110, 17, 112ovmpoa 7607 . . . . . . . . . 10 ((𝑢 ∈ 𝑆 ∧ 𝑢 ∈ 𝑆) → (𝑢𝐻𝑢) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)))
114104, 104, 113syl2anc 596 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑆) → (𝑢𝐻𝑢) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)))
115114fveq1d 6918 . . . . . . . 8 ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((𝑢𝐻𝑢)‘((Id‘𝑌)‘𝑢)) = (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑌)‘𝑢)))
11651adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝐹(𝑋 Func 𝑌)𝐺)
11730, 54, 53, 116, 75funcid 18095 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑋)‘(◡𝐹‘𝑢))) = ((Id‘𝑌)‘(𝐹‘(◡𝐹‘𝑢))))
1181, 95sylan 592 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆) → (𝐹‘(◡𝐹‘𝑢)) = 𝑢)
119118fveq2d 6920 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((Id‘𝑌)‘(𝐹‘(◡𝐹‘𝑢))) = ((Id‘𝑌)‘𝑢))
120117, 119eqtrd 2798 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑆) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑋)‘(◡𝐹‘𝑢))) = ((Id‘𝑌)‘𝑢))
12133adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
12230, 31, 32, 121, 75, 75ffthf1o 18146 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑢))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑢))))
12366adantr 486 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆) → 𝑋 ∈ Cat)
12430, 31, 54, 123, 75catidcl 17906 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((Id‘𝑋)‘(◡𝐹‘𝑢)) ∈ ((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑢)))
125 f1ocnvfv 7317 . . . . . . . . . 10 ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑢))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑢))) ∧ ((Id‘𝑋)‘(◡𝐹‘𝑢)) ∈ ((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑢))) → ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑋)‘(◡𝐹‘𝑢))) = ((Id‘𝑌)‘𝑢) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑌)‘𝑢)) = ((Id‘𝑋)‘(◡𝐹‘𝑢))))
126122, 124, 125syl2anc 596 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑋)‘(◡𝐹‘𝑢))) = ((Id‘𝑌)‘𝑢) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑌)‘𝑢)) = ((Id‘𝑋)‘(◡𝐹‘𝑢))))
127120, 126mpd 16 . . . . . . . 8 ((𝜑 ∧ 𝑢 ∈ 𝑆) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑢))‘((Id‘𝑌)‘𝑢)) = ((Id‘𝑋)‘(◡𝐹‘𝑢)))
128115, 127eqtrd 2798 . . . . . . 7 ((𝜑 ∧ 𝑢 ∈ 𝑆) → ((𝑢𝐻𝑢)‘((Id‘𝑌)‘𝑢)) = ((Id‘𝑋)‘(◡𝐹‘𝑢)))
129513ad2ant1 1151 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝐹(𝑋 Func 𝑌)𝐺)
130693ad2ant1 1151 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ◡𝐹:𝑆⟶𝑅)
131 simp21 1225 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝑢 ∈ 𝑆)
132130, 131ffvelcdmd 7117 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (◡𝐹‘𝑢) ∈ 𝑅)
133 simp22 1226 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝑣 ∈ 𝑆)
134130, 133ffvelcdmd 7117 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (◡𝐹‘𝑣) ∈ 𝑅)
135 simp23 1227 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝑧 ∈ 𝑆)
136130, 135ffvelcdmd 7117 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (◡𝐹‘𝑧) ∈ 𝑅)
137333ad2ant1 1151 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
13830, 31, 32, 137, 132, 134ffthf1o 18146 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))))
13913ad2ant1 1151 . . . . . . . . . . . . . . . . 17 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝐹:𝑅⟶1-1onto𝑆)
140139, 131, 95syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (𝐹‘(◡𝐹‘𝑢)) = 𝑢)
141139, 133, 98syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (𝐹‘(◡𝐹‘𝑣)) = 𝑣)
142140, 141oveq12d 7469 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))) = (𝑢(Hom ‘𝑌)𝑣))
143142f1oeq3d 6851 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))) ↔ ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣)))
144138, 143mpbid 235 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣))
145 f1ocnv 6867 . . . . . . . . . . . . 13 (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣) → ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):(𝑢(Hom ‘𝑌)𝑣)⟶1-1onto((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
146 f1of 6854 . . . . . . . . . . . . 13 (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):(𝑢(Hom ‘𝑌)𝑣)⟶1-1onto((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)) → ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):(𝑢(Hom ‘𝑌)𝑣)⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
147144, 145, 1463syl 19 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):(𝑢(Hom ‘𝑌)𝑣)⟶((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
148 simp3l 1220 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣))
149147, 148ffvelcdmd 7117 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓) ∈ ((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣)))
15030, 31, 32, 137, 134, 136ffthf1o 18146 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto((𝐹‘(◡𝐹‘𝑣))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑧))))
151 f1ocnvfv2 7316 . . . . . . . . . . . . . . . . 17 ((𝐹:𝑅⟶1-1onto𝑆 ∧ 𝑧 ∈ 𝑆) → (𝐹‘(◡𝐹‘𝑧)) = 𝑧)
152139, 135, 151syl2anc 596 . . . . . . . . . . . . . . . 16 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (𝐹‘(◡𝐹‘𝑧)) = 𝑧)
153141, 152oveq12d 7469 . . . . . . . . . . . . . . 15 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝐹‘(◡𝐹‘𝑣))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑧))) = (𝑣(Hom ‘𝑌)𝑧))
154153f1oeq3d 6851 . . . . . . . . . . . . . 14 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto((𝐹‘(◡𝐹‘𝑣))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑧))) ↔ ((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑣(Hom ‘𝑌)𝑧)))
155150, 154mpbid 235 . . . . . . . . . . . . 13 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑣(Hom ‘𝑌)𝑧))
156 f1ocnv 6867 . . . . . . . . . . . . 13 (((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑣(Hom ‘𝑌)𝑧) → ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):(𝑣(Hom ‘𝑌)𝑧)⟶1-1onto((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧)))
157 f1of 6854 . . . . . . . . . . . . 13 (◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):(𝑣(Hom ‘𝑌)𝑧)⟶1-1onto((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧)) → ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):(𝑣(Hom ‘𝑌)𝑧)⟶((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧)))
158155, 156, 1573syl 19 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):(𝑣(Hom ‘𝑌)𝑧)⟶((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧)))
159 simp3r 1221 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))
160158, 159ffvelcdmd 7117 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔) ∈ ((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧)))
16130, 31, 56, 55, 129, 132, 134, 136, 149, 160funcco 18096 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))) = ((((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘(◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔))(⟨(𝐹‘(◡𝐹‘𝑢)), (𝐹‘(◡𝐹‘𝑣))⟩(comp‘𝑌)(𝐹‘(◡𝐹‘𝑧)))(((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))))
162140, 141opeq12d 4853 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ⟨(𝐹‘(◡𝐹‘𝑢)), (𝐹‘(◡𝐹‘𝑣))⟩ = ⟨𝑢, 𝑣⟩)
163162, 152oveq12d 7469 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (⟨(𝐹‘(◡𝐹‘𝑢)), (𝐹‘(◡𝐹‘𝑣))⟩(comp‘𝑌)(𝐹‘(◡𝐹‘𝑧))) = (⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧))
164 f1ocnvfv2 7316 . . . . . . . . . . . 12 ((((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑣)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑣(Hom ‘𝑌)𝑧) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧)) → (((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘(◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)) = 𝑔)
165155, 159, 164syl2anc 596 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘(◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)) = 𝑔)
166 f1ocnvfv2 7316 . . . . . . . . . . . 12 ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣) ∧ 𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣)) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓)) = 𝑓)
167144, 148, 166syl2anc 596 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓)) = 𝑓)
168163, 165, 167oveq123d 7472 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘(◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔))(⟨(𝐹‘(◡𝐹‘𝑢)), (𝐹‘(◡𝐹‘𝑣))⟩(comp‘𝑌)(𝐹‘(◡𝐹‘𝑧)))(((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))) = (𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓))
169161, 168eqtrd 2798 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))) = (𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓))
17030, 31, 32, 137, 132, 136ffthf1o 18146 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑧))))
171140, 152oveq12d 7469 . . . . . . . . . . . 12 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑧))) = (𝑢(Hom ‘𝑌)𝑧))
172171f1oeq3d 6851 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑧))) ↔ ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑢(Hom ‘𝑌)𝑧)))
173170, 172mpbid 235 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑢(Hom ‘𝑌)𝑧))
174663ad2ant1 1151 . . . . . . . . . . 11 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → 𝑋 ∈ Cat)
17530, 31, 56, 174, 132, 134, 136, 149, 160catcocl 17909 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓)) ∈ ((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧)))
176 f1ocnvfv 7317 . . . . . . . . . 10 ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧))⟶1-1onto(𝑢(Hom ‘𝑌)𝑧) ∧ ((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓)) ∈ ((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑧))) → ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))) = (𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘(𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓)) = ((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))))
177173, 175, 176syl2anc 596 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))) = (𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘(𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓)) = ((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))))
178169, 177mpd 16 . . . . . . . 8 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘(𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓)) = ((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓)))
179 simpl 488 . . . . . . . . . . . . . 14 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑧) → 𝑥 = 𝑢)
180179fveq2d 6920 . . . . . . . . . . . . 13 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑧) → (◡𝐹‘𝑥) = (◡𝐹‘𝑢))
181 simpr 490 . . . . . . . . . . . . . 14 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑧) → 𝑦 = 𝑧)
182181fveq2d 6920 . . . . . . . . . . . . 13 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑧) → (◡𝐹‘𝑦) = (◡𝐹‘𝑧))
183180, 182oveq12d 7469 . . . . . . . . . . . 12 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑧) → ((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)))
184183cnveqd 5865 . . . . . . . . . . 11 ((𝑥 = 𝑢 ∧ 𝑦 = 𝑧) → ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)))
185 ovex 7484 . . . . . . . . . . . 12 ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)) ∈ V
186185cnvex 7971 . . . . . . . . . . 11 ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)) ∈ V
187184, 17, 186ovmpoa 7607 . . . . . . . . . 10 ((𝑢 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) → (𝑢𝐻𝑧) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)))
188131, 135, 187syl2anc 596 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (𝑢𝐻𝑧) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧)))
189188fveq1d 6918 . . . . . . . 8 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝑢𝐻𝑧)‘(𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓)) = (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑧))‘(𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓)))
190 simpl 488 . . . . . . . . . . . . . . 15 ((𝑥 = 𝑣 ∧ 𝑦 = 𝑧) → 𝑥 = 𝑣)
191190fveq2d 6920 . . . . . . . . . . . . . 14 ((𝑥 = 𝑣 ∧ 𝑦 = 𝑧) → (◡𝐹‘𝑥) = (◡𝐹‘𝑣))
192 simpr 490 . . . . . . . . . . . . . . 15 ((𝑥 = 𝑣 ∧ 𝑦 = 𝑧) → 𝑦 = 𝑧)
193192fveq2d 6920 . . . . . . . . . . . . . 14 ((𝑥 = 𝑣 ∧ 𝑦 = 𝑧) → (◡𝐹‘𝑦) = (◡𝐹‘𝑧))
194191, 193oveq12d 7469 . . . . . . . . . . . . 13 ((𝑥 = 𝑣 ∧ 𝑦 = 𝑧) → ((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)))
195194cnveqd 5865 . . . . . . . . . . . 12 ((𝑥 = 𝑣 ∧ 𝑦 = 𝑧) → ◡((◡𝐹‘𝑥)𝐺(◡𝐹‘𝑦)) = ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)))
196 ovex 7484 . . . . . . . . . . . . 13 ((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)) ∈ V
197196cnvex 7971 . . . . . . . . . . . 12 ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)) ∈ V
198195, 17, 197ovmpoa 7607 . . . . . . . . . . 11 ((𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) → (𝑣𝐻𝑧) = ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)))
199133, 135, 198syl2anc 596 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (𝑣𝐻𝑧) = ◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧)))
200199fveq1d 6918 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝑣𝐻𝑧)‘𝑔) = (◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔))
201131, 133, 91syl2anc 596 . . . . . . . . . 10 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (𝑢𝐻𝑣) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)))
202201fveq1d 6918 . . . . . . . . 9 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝑢𝐻𝑣)‘𝑓) = (◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓))
203200, 202oveq12d 7469 . . . . . . . 8 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → (((𝑣𝐻𝑧)‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))((𝑢𝐻𝑣)‘𝑓)) = ((◡((◡𝐹‘𝑣)𝐺(◡𝐹‘𝑧))‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))(◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))‘𝑓)))
204178, 189, 2033eqtr4d 2808 . . . . . . 7 ((𝜑 ∧ (𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆 ∧ 𝑧 ∈ 𝑆) ∧ (𝑓 ∈ (𝑢(Hom ‘𝑌)𝑣) ∧ 𝑔 ∈ (𝑣(Hom ‘𝑌)𝑧))) → ((𝑢𝐻𝑧)‘(𝑔(⟨𝑢, 𝑣⟩(comp‘𝑌)𝑧)𝑓)) = (((𝑣𝐻𝑧)‘𝑔)(⟨(◡𝐹‘𝑢), (◡𝐹‘𝑣)⟩(comp‘𝑋)(◡𝐹‘𝑧))((𝑢𝐻𝑣)‘𝑓)))
20552, 30, 32, 31, 53, 54, 55, 56, 64, 66, 69, 73, 103, 128, 204isfuncd 18090 . . . . . 6 (𝜑 → ◡𝐹(𝑌 Func 𝑋)𝐻)
20630, 51, 205cofuval2 18112 . . . . 5 (𝜑 → (⟨◡𝐹, 𝐻⟩ ∘func ⟨𝐹, 𝐺⟩) = ⟨(◡𝐹 ∘ 𝐹), (𝑢 ∈ 𝑅, 𝑣 ∈ 𝑅 ↦ (((𝐹‘𝑢)𝐻(𝐹‘𝑣)) ∘ (𝑢𝐺𝑣)))⟩)
207 eqid 2763 . . . . . 6 (idfunc‘𝑋) = (idfunc‘𝑋)
208207, 30, 66, 31idfuval 18101 . . . . 5 (𝜑 → (idfunc‘𝑋) = ⟨( I ↾ 𝑅), (𝑧 ∈ (𝑅 × 𝑅) ↦ ( I ↾ ((Hom ‘𝑋)‘𝑧)))⟩)
20946, 206, 2083eqtr4d 2808 . . . 4 (𝜑 → (⟨◡𝐹, 𝐻⟩ ∘func ⟨𝐹, 𝐺⟩) = (idfunc‘𝑋))
210 eqid 2763 . . . . 5 (comp‘𝐶) = (comp‘𝐶)
211 df-br 5109 . . . . . 6 (𝐹(𝑋 Func 𝑌)𝐺 ↔ ⟨𝐹, 𝐺⟩ ∈ (𝑋 Func 𝑌))
21251, 211sylib 221 . . . . 5 (𝜑 → ⟨𝐹, 𝐺⟩ ∈ (𝑋 Func 𝑌))
213 df-br 5109 . . . . . 6 (◡𝐹(𝑌 Func 𝑋)𝐻 ↔ ⟨◡𝐹, 𝐻⟩ ∈ (𝑌 Func 𝑋))
214205, 213sylib 221 . . . . 5 (𝜑 → ⟨◡𝐹, 𝐻⟩ ∈ (𝑌 Func 𝑋))
21557, 58, 59, 210, 65, 63, 65, 212, 214catcco 18330 . . . 4 (𝜑 → (⟨◡𝐹, 𝐻⟩(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)⟨𝐹, 𝐺⟩) = (⟨◡𝐹, 𝐻⟩ ∘func ⟨𝐹, 𝐺⟩))
216 eqid 2763 . . . . 5 (Id‘𝐶) = (Id‘𝐶)
21757, 58, 216, 207, 59, 65catcid 18332 . . . 4 (𝜑 → ((Id‘𝐶)‘𝑋) = (idfunc‘𝑋))
218209, 215, 2173eqtr4d 2808 . . 3 (𝜑 → (⟨◡𝐹, 𝐻⟩(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)⟨𝐹, 𝐺⟩) = ((Id‘𝐶)‘𝑋))
219 eqid 2763 . . . 4 (Hom ‘𝐶) = (Hom ‘𝐶)
220 eqid 2763 . . . 4 (Sect‘𝐶) = (Sect‘𝐶)
22157catccat 18333 . . . . 5 (𝑈 ∈ 𝑉 → 𝐶 ∈ Cat)
22259, 221syl 18 . . . 4 (𝜑 → 𝐶 ∈ Cat)
22357, 58, 59, 219, 65, 63catchom 18328 . . . . 5 (𝜑 → (𝑋(Hom ‘𝐶)𝑌) = (𝑋 Func 𝑌))
224212, 223eleqtrrd 2867 . . . 4 (𝜑 → ⟨𝐹, 𝐺⟩ ∈ (𝑋(Hom ‘𝐶)𝑌))
22557, 58, 59, 219, 63, 65catchom 18328 . . . . 5 (𝜑 → (𝑌(Hom ‘𝐶)𝑋) = (𝑌 Func 𝑋))
226214, 225eleqtrrd 2867 . . . 4 (𝜑 → ⟨◡𝐹, 𝐻⟩ ∈ (𝑌(Hom ‘𝐶)𝑋))
22758, 219, 210, 216, 220, 222, 65, 63, 224, 226issect2 17979 . . 3 (𝜑 → (⟨𝐹, 𝐺⟩(𝑋(Sect‘𝐶)𝑌)⟨◡𝐹, 𝐻⟩ ↔ (⟨◡𝐹, 𝐻⟩(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)⟨𝐹, 𝐺⟩) = ((Id‘𝐶)‘𝑋)))
228218, 227mpbird 260 . 2 (𝜑 → ⟨𝐹, 𝐺⟩(𝑋(Sect‘𝐶)𝑌)⟨◡𝐹, 𝐻⟩)
229 f1ococnv2 6883 . . . . . . 7 (𝐹:𝑅⟶1-1onto𝑆 → (𝐹 ∘ ◡𝐹) = ( I ↾ 𝑆))
2301, 229syl 18 . . . . . 6 (𝜑 → (𝐹 ∘ ◡𝐹) = ( I ↾ 𝑆))
231913adant1 1148 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (𝑢𝐻𝑣) = ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)))
232231coeq2d 5851 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ (𝑢𝐻𝑣)) = (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))))
233333ad2ant1 1151 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → 𝐹((𝑋 Full 𝑌) ∩ (𝑋 Faith 𝑌))𝐺)
234753adant3 1150 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (◡𝐹‘𝑢) ∈ 𝑅)
235773adant2 1149 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (◡𝐹‘𝑣) ∈ 𝑅)
23630, 31, 32, 233, 234, 235ffthf1o 18146 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))))
2371003impb 1132 . . . . . . . . . . . 12 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → ((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))) = (𝑢(Hom ‘𝑌)𝑣))
238237f1oeq3d 6851 . . . . . . . . . . 11 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto((𝐹‘(◡𝐹‘𝑢))(Hom ‘𝑌)(𝐹‘(◡𝐹‘𝑣))) ↔ ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣)))
239236, 238mpbid 235 . . . . . . . . . 10 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → ((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣))
240 f1ococnv2 6883 . . . . . . . . . 10 (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)):((◡𝐹‘𝑢)(Hom ‘𝑋)(◡𝐹‘𝑣))⟶1-1onto(𝑢(Hom ‘𝑌)𝑣) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))) = ( I ↾ (𝑢(Hom ‘𝑌)𝑣)))
241239, 240syl 18 . . . . . . . . 9 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ ◡((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣))) = ( I ↾ (𝑢(Hom ‘𝑌)𝑣)))
242232, 241eqtrd 2798 . . . . . . . 8 ((𝜑 ∧ 𝑢 ∈ 𝑆 ∧ 𝑣 ∈ 𝑆) → (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ (𝑢𝐻𝑣)) = ( I ↾ (𝑢(Hom ‘𝑌)𝑣)))
243242mpoeq3dva 7528 . . . . . . 7 (𝜑 → (𝑢 ∈ 𝑆, 𝑣 ∈ 𝑆 ↦ (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ (𝑢𝐻𝑣))) = (𝑢 ∈ 𝑆, 𝑣 ∈ 𝑆 ↦ ( I ↾ (𝑢(Hom ‘𝑌)𝑣))))
244 fveq2 6916 . . . . . . . . . 10 (𝑧 = ⟨𝑢, 𝑣⟩ → ((Hom ‘𝑌)‘𝑧) = ((Hom ‘𝑌)‘⟨𝑢, 𝑣⟩))
245 df-ov 7454 . . . . . . . . . 10 (𝑢(Hom ‘𝑌)𝑣) = ((Hom ‘𝑌)‘⟨𝑢, 𝑣⟩)
246244, 245eqtr4di 2816 . . . . . . . . 9 (𝑧 = ⟨𝑢, 𝑣⟩ → ((Hom ‘𝑌)‘𝑧) = (𝑢(Hom ‘𝑌)𝑣))
247246reseq2d 5986 . . . . . . . 8 (𝑧 = ⟨𝑢, 𝑣⟩ → ( I ↾ ((Hom ‘𝑌)‘𝑧)) = ( I ↾ (𝑢(Hom ‘𝑌)𝑣)))
248247mpompt 7565 . . . . . . 7 (𝑧 ∈ (𝑆 × 𝑆) ↦ ( I ↾ ((Hom ‘𝑌)‘𝑧))) = (𝑢 ∈ 𝑆, 𝑣 ∈ 𝑆 ↦ ( I ↾ (𝑢(Hom ‘𝑌)𝑣)))
249243, 248eqtr4di 2816 . . . . . 6 (𝜑 → (𝑢 ∈ 𝑆, 𝑣 ∈ 𝑆 ↦ (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ (𝑢𝐻𝑣))) = (𝑧 ∈ (𝑆 × 𝑆) ↦ ( I ↾ ((Hom ‘𝑌)‘𝑧))))
250230, 249opeq12d 4853 . . . . 5 (𝜑 → ⟨(𝐹 ∘ ◡𝐹), (𝑢 ∈ 𝑆, 𝑣 ∈ 𝑆 ↦ (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ (𝑢𝐻𝑣)))⟩ = ⟨( I ↾ 𝑆), (𝑧 ∈ (𝑆 × 𝑆) ↦ ( I ↾ ((Hom ‘𝑌)‘𝑧)))⟩)
25152, 205, 51cofuval2 18112 . . . . 5 (𝜑 → (⟨𝐹, 𝐺⟩ ∘func ⟨◡𝐹, 𝐻⟩) = ⟨(𝐹 ∘ ◡𝐹), (𝑢 ∈ 𝑆, 𝑣 ∈ 𝑆 ↦ (((◡𝐹‘𝑢)𝐺(◡𝐹‘𝑣)) ∘ (𝑢𝐻𝑣)))⟩)
252 eqid 2763 . . . . . 6 (idfunc‘𝑌) = (idfunc‘𝑌)
253252, 52, 64, 32idfuval 18101 . . . . 5 (𝜑 → (idfunc‘𝑌) = ⟨( I ↾ 𝑆), (𝑧 ∈ (𝑆 × 𝑆) ↦ ( I ↾ ((Hom ‘𝑌)‘𝑧)))⟩)
254250, 251, 2533eqtr4d 2808 . . . 4 (𝜑 → (⟨𝐹, 𝐺⟩ ∘func ⟨◡𝐹, 𝐻⟩) = (idfunc‘𝑌))
25557, 58, 59, 210, 63, 65, 63, 214, 212catcco 18330 . . . 4 (𝜑 → (⟨𝐹, 𝐺⟩(⟨𝑌, 𝑋⟩(comp‘𝐶)𝑌)⟨◡𝐹, 𝐻⟩) = (⟨𝐹, 𝐺⟩ ∘func ⟨◡𝐹, 𝐻⟩))
25657, 58, 216, 252, 59, 63catcid 18332 . . . 4 (𝜑 → ((Id‘𝐶)‘𝑌) = (idfunc‘𝑌))
257254, 255, 2563eqtr4d 2808 . . 3 (𝜑 → (⟨𝐹, 𝐺⟩(⟨𝑌, 𝑋⟩(comp‘𝐶)𝑌)⟨◡𝐹, 𝐻⟩) = ((Id‘𝐶)‘𝑌))
25858, 219, 210, 216, 220, 222, 63, 65, 226, 224issect2 17979 . . 3 (𝜑 → (⟨◡𝐹, 𝐻⟩(𝑌(Sect‘𝐶)𝑋)⟨𝐹, 𝐺⟩ ↔ (⟨𝐹, 𝐺⟩(⟨𝑌, 𝑋⟩(comp‘𝐶)𝑌)⟨◡𝐹, 𝐻⟩) = ((Id‘𝐶)‘𝑌)))
259257, 258mpbird 260 . 2 (𝜑 → ⟨◡𝐹, 𝐻⟩(𝑌(Sect‘𝐶)𝑋)⟨𝐹, 𝐺⟩)
260 catcisolem.i . . 3 𝐼 = (Inv‘𝐶)
26158, 260, 222, 65, 63, 220isinv 17985 . 2 (𝜑 → (⟨𝐹, 𝐺⟩(𝑋𝐼𝑌)⟨◡𝐹, 𝐻⟩ ↔ (⟨𝐹, 𝐺⟩(𝑋(Sect‘𝐶)𝑌)⟨◡𝐹, 𝐻⟩ ∧ ⟨◡𝐹, 𝐻⟩(𝑌(Sect‘𝐶)𝑋)⟨𝐹, 𝐺⟩)))
262228, 259, 261mpbir2and 726 1 (𝜑 → ⟨𝐹, 𝐺⟩(𝑋𝐼𝑌)⟨◡𝐹, 𝐻⟩)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2147   ∩ cin 4092  ⟨cop 4840   class class class wbr 5108   ↦ cmpt 5192   I cid 5552   × cxp 5656  ◡ccnv 5657   ↾ cres 5660   ∘ ccom 5662   Fn wfn 6561  ⟶wf 6562  ⟶1-1ontowf1o 6565  ‘cfv 6566  (class class class)co 7451   ∈ cmpo 7453  Basecbs 17431  Hom chom 17483  compcco 17484  Catccat 17888  Idccid 17889  Sectcsect 17969  Invcinv 17970   Func cfunc 18079  idfunccidfu 18080   ∘func ccofu 18081   Full cful 18129   Faith cfth 18130  CatCatccatc 18323
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 1945  ax-6 2002  ax-7 2043  ax-8 2149  ax-9 2157  ax-10 2180  ax-11 2197  ax-12 2216  ax-ext 2735  ax-rep 5238  ax-sep 5255  ax-nul 5266  ax-pow 5334  ax-pr 5398  ax-un 7783  ax-cnex 11295  ax-resscn 11296  ax-1cn 11297  ax-icn 11298  ax-addcl 11299  ax-addrcl 11300  ax-mulcl 11301  ax-mulrcl 11302  ax-mulcom 11303  ax-addass 11304  ax-mulass 11305  ax-distr 11306  ax-i2m1 11307  ax-1ne0 11308  ax-1rid 11309  ax-rnegex 11310  ax-rrecex 11311  ax-cnre 11312  ax-pre-lttri 11313  ax-pre-lttrn 11314  ax-pre-ltadd 11315  ax-pre-mulgt0 11316
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2102  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2839  df-nfc 2913  df-ne 2960  df-nel 3066  df-ral 3081  df-rex 3091  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3456  df-sbc 3743  df-csb 3852  df-ss 3901  df-pss 4017  df-dif 4050  df-in 4094  df-un 4154  df-nul 4282  df-if 4486  df-pw 4562  df-sn 4589  df-pr 4591  df-tp 4593  df-op 4841  df-uni 4873  df-iun 4958  df-br 5109  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5553  df-eprel 5558  df-po 5566  df-so 5567  df-fr 5611  df-we 5613  df-xp 5664  df-rel 5665  df-cnv 5666  df-co 5667  df-dm 5668  df-rn 5669  df-res 5670  df-ima 5671  df-pred 6330  df-ord 6391  df-on 6392  df-lim 6393  df-suc 6394  df-iota 6520  df-fun 6568  df-fn 6569  df-f 6570  df-f1 6571  df-fo 6572  df-f1o 6573  df-fv 6574  df-riota 7408  df-ov 7454  df-oprab 7455  df-mpo 7456  df-om 7912  df-1st 8035  df-2nd 8036  df-frecs 8337  df-wrecs 8368  df-recs 8417  df-rdg 8456  df-1o 8514  df-er 8755  df-map 8887  df-ixp 8964  df-en 9012  df-dom 9013  df-sdom 9014  df-fin 9015  df-pnf 11384  df-mnf 11385  df-xr 11386  df-ltxr 11387  df-le 11388  df-sub 11582  df-neg 11583  df-nn 12376  df-2 12445  df-3 12446  df-4 12447  df-5 12448  df-6 12449  df-7 12450  df-8 12451  df-9 12452  df-n0 12647  df-z 12734  df-dec 12855  df-uz 13006  df-fz 13680  df-struct 17369  df-slot 17404  df-ndx 17416  df-base 17432  df-hom 17497  df-cco 17498  df-cat 17892  df-cid 17893  df-sect 17972  df-inv 17973  df-func 18083  df-idfu 18084  df-cofu 18085  df-full 18131  df-fth 18132  df-catc 18324
This theorem is used by:  catciso  18336
  Copyright terms: Public domain W3C validator