Theorem thincsect 47047

Description: In a thin category, one morphism is a section of another iff they are pointing towards each other. (Contributed by Zhi Wang, 24-Sep-2024.)

Hypotheses

Ref	Expression
thincsect.c	⊢ (𝜑 → 𝐶 ∈ ThinCat)
thincsect.b	⊢ 𝐵 = (Base‘𝐶)
thincsect.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)
thincsect.y	⊢ (𝜑 → 𝑌 ∈ 𝐵)
thincsect.s	⊢ 𝑆 = (Sect‘𝐶)
thincsect.h	⊢ 𝐻 = (Hom ‘𝐶)

Assertion

Ref	Expression
thincsect	⊢ (𝜑 → (𝐹(𝑋𝑆𝑌)𝐺 ↔ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))))

Proof of Theorem thincsect

Step	Hyp	Ref	Expression
1		thincsect.b	. . . 4 ⊢ 𝐵 = (Base‘𝐶)
2		thincsect.h	. . . 4 ⊢ 𝐻 = (Hom ‘𝐶)
3		eqid 2736	. . . 4 ⊢ (comp‘𝐶) = (comp‘𝐶)
4		eqid 2736	. . . 4 ⊢ (Id‘𝐶) = (Id‘𝐶)
5		thincsect.s	. . . 4 ⊢ 𝑆 = (Sect‘𝐶)
6		thincsect.c	. . . . 5 ⊢ (𝜑 → 𝐶 ∈ ThinCat)
7	6	thinccd 47015	. . . 4 ⊢ (𝜑 → 𝐶 ∈ Cat)
8		thincsect.x	. . . 4 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
9		thincsect.y	. . . 4 ⊢ (𝜑 → 𝑌 ∈ 𝐵)
10	1, 2, 3, 4, 5, 7, 8, 9	issect 17633	. . 3 ⊢ (𝜑 → (𝐹(𝑋𝑆𝑌)𝐺 ↔ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋) ∧ (𝐺(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)𝐹) = ((Id‘𝐶)‘𝑋))))
11		df-3an 1089	. . 3 ⊢ ((𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋) ∧ (𝐺(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)𝐹) = ((Id‘𝐶)‘𝑋)) ↔ ((𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋)) ∧ (𝐺(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)𝐹) = ((Id‘𝐶)‘𝑋)))
12	10, 11	bitrdi 286	. 2 ⊢ (𝜑 → (𝐹(𝑋𝑆𝑌)𝐺 ↔ ((𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋)) ∧ (𝐺(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)𝐹) = ((Id‘𝐶)‘𝑋))))
13	6	adantr 481	. . 3 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → 𝐶 ∈ ThinCat)
14	8	adantr 481	. . 3 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → 𝑋 ∈ 𝐵)
15	7	adantr 481	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → 𝐶 ∈ Cat)
16	9	adantr 481	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → 𝑌 ∈ 𝐵)
17		simprl 769	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → 𝐹 ∈ (𝑋𝐻𝑌))
18		simprr 771	. . . 4 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → 𝐺 ∈ (𝑌𝐻𝑋))
19	1, 2, 3, 15, 14, 16, 14, 17, 18	catcocl 17562	. . 3 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → (𝐺(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)𝐹) ∈ (𝑋𝐻𝑋))
20	13, 1, 2, 14, 4, 19	thincid 47023	. 2 ⊢ ((𝜑 ∧ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))) → (𝐺(⟨𝑋, 𝑌⟩(comp‘𝐶)𝑋)𝐹) = ((Id‘𝐶)‘𝑋))
21	12, 20	mpbiran3d 46852	1 ⊢ (𝜑 → (𝐹(𝑋𝑆𝑌)𝐺 ↔ (𝐹 ∈ (𝑋𝐻𝑌) ∧ 𝐺 ∈ (𝑌𝐻𝑋))))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   ∧ w3a 1087   = wceq 1541   ∈ wcel 2106  ⟨cop 4591   class class class wbr 5104  ‘cfv 6494  (class class class)co 7354  Basecbs 17080  Hom chom 17141  compcco 17142  Catccat 17541  Idccid 17542  Sectcsect 17624  ThinCatcthinc 47009

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2707  ax-rep 5241  ax-sep 5255  ax-nul 5262  ax-pow 5319  ax-pr 5383  ax-un 7669

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-nfc 2888  df-ne 2943  df-ral 3064  df-rex 3073  df-rmo 3352  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3739  df-csb 3855  df-dif 3912  df-un 3914  df-in 3916  df-ss 3926  df-nul 4282  df-if 4486  df-pw 4561  df-sn 4586  df-pr 4588  df-op 4592  df-uni 4865  df-iun 4955  df-br 5105  df-opab 5167  df-mpt 5188  df-id 5530  df-xp 5638  df-rel 5639  df-cnv 5640  df-co 5641  df-dm 5642  df-rn 5643  df-res 5644  df-ima 5645  df-iota 6446  df-fun 6496  df-fn 6497  df-f 6498  df-f1 6499  df-fo 6500  df-f1o 6501  df-fv 6502  df-riota 7310  df-ov 7357  df-oprab 7358  df-mpo 7359  df-1st 7918  df-2nd 7919  df-cat 17545  df-cid 17546  df-sect 17627  df-thinc 47010

This theorem is referenced by:  thincsect2  47048  thinciso  47050