Theorem thinccic 47835

Description: In a thin category, two objects are isomorphic iff there are morphisms between them in both directions. (Contributed by Zhi Wang, 25-Sep-2024.)

Hypotheses

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

Assertion

Ref	Expression
thinccic	⊢ (𝜑 → (𝑋( ≃𝑐 ‘𝐶)𝑌 ↔ ((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅)))

Proof of Theorem thinccic

Dummy variable 𝑓 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		thincsect.b	. . . . . 6 ⊢ 𝐵 = (Base‘𝐶)
2		thinciso.h	. . . . . 6 ⊢ 𝐻 = (Hom ‘𝐶)
3		eqid 2724	. . . . . 6 ⊢ (Iso‘𝐶) = (Iso‘𝐶)
4		thincsect.c	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ThinCat)
5	4	thinccd 47799	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ Cat)
6		thincsect.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
7		thincsect.y	. . . . . 6 ⊢ (𝜑 → 𝑌 ∈ 𝐵)
8	1, 2, 3, 5, 6, 7	isohom 17721	. . . . 5 ⊢ (𝜑 → (𝑋(Iso‘𝐶)𝑌) ⊆ (𝑋𝐻𝑌))
9	8	sselda 3974	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋(Iso‘𝐶)𝑌)) → 𝑓 ∈ (𝑋𝐻𝑌))
10	4	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝐶 ∈ ThinCat)
11	6	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝑋 ∈ 𝐵)
12	7	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝑌 ∈ 𝐵)
13		simpr 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝑓 ∈ (𝑋𝐻𝑌))
14	10, 1, 11, 12, 2, 3, 13	thinciso 47834	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → (𝑓 ∈ (𝑋(Iso‘𝐶)𝑌) ↔ (𝑌𝐻𝑋) ≠ ∅))
15	9, 14	biadanid 820	. . 3 ⊢ (𝜑 → (𝑓 ∈ (𝑋(Iso‘𝐶)𝑌) ↔ (𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅)))
16	15	exbidv 1916	. 2 ⊢ (𝜑 → (∃𝑓 𝑓 ∈ (𝑋(Iso‘𝐶)𝑌) ↔ ∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅)))
17	3, 1, 5, 6, 7	cic 17744	. 2 ⊢ (𝜑 → (𝑋( ≃𝑐 ‘𝐶)𝑌 ↔ ∃𝑓 𝑓 ∈ (𝑋(Iso‘𝐶)𝑌)))
18		n0 4338	. . . . 5 ⊢ ((𝑋𝐻𝑌) ≠ ∅ ↔ ∃𝑓 𝑓 ∈ (𝑋𝐻𝑌))
19	18	anbi1i 623	. . . 4 ⊢ (((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ (∃𝑓 𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅))
20		19.41v 1945	. . . 4 ⊢ (∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ (∃𝑓 𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅))
21	19, 20	bitr4i 278	. . 3 ⊢ (((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ ∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅))
22	21	a1i 11	. 2 ⊢ (𝜑 → (((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ ∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅)))
23	16, 17, 22	3bitr4d 311	1 ⊢ (𝜑 → (𝑋( ≃𝑐 ‘𝐶)𝑌 ↔ ((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅)))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 395   = wceq 1533  ∃wex 1773   ∈ wcel 2098   ≠ wne 2932  ∅c0 4314   class class class wbr 5138  ‘cfv 6533  (class class class)co 7401  Basecbs 17142  Hom chom 17206  Isociso 17691   ≃_𝑐 ccic 17740  ThinCatcthinc 47793

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-rep 5275  ax-sep 5289  ax-nul 5296  ax-pow 5353  ax-pr 5417  ax-un 7718

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3770  df-csb 3886  df-dif 3943  df-un 3945  df-in 3947  df-ss 3957  df-nul 4315  df-if 4521  df-pw 4596  df-sn 4621  df-pr 4623  df-op 4627  df-uni 4900  df-iun 4989  df-br 5139  df-opab 5201  df-mpt 5222  df-id 5564  df-xp 5672  df-rel 5673  df-cnv 5674  df-co 5675  df-dm 5676  df-rn 5677  df-res 5678  df-ima 5679  df-iota 6485  df-fun 6535  df-fn 6536  df-f 6537  df-f1 6538  df-fo 6539  df-f1o 6540  df-fv 6541  df-riota 7357  df-ov 7404  df-oprab 7405  df-mpo 7406  df-1st 7968  df-2nd 7969  df-supp 8141  df-cat 17610  df-cid 17611  df-sect 17692  df-inv 17693  df-iso 17694  df-cic 17741  df-thinc 47794

This theorem is referenced by:  postc  47856