Theorem thinccic 47234

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 2731	. . . . . 6 ⊢ (Iso‘𝐶) = (Iso‘𝐶)
4		thincsect.c	. . . . . . 7 ⊢ (𝜑 → 𝐶 ∈ ThinCat)
5	4	thinccd 47198	. . . . . 6 ⊢ (𝜑 → 𝐶 ∈ Cat)
6		thincsect.x	. . . . . 6 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
7		thincsect.y	. . . . . 6 ⊢ (𝜑 → 𝑌 ∈ 𝐵)
8	1, 2, 3, 5, 6, 7	isohom 17688	. . . . 5 ⊢ (𝜑 → (𝑋(Iso‘𝐶)𝑌) ⊆ (𝑋𝐻𝑌))
9	8	sselda 3962	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋(Iso‘𝐶)𝑌)) → 𝑓 ∈ (𝑋𝐻𝑌))
10	4	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝐶 ∈ ThinCat)
11	6	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝑋 ∈ 𝐵)
12	7	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝑌 ∈ 𝐵)
13		simpr 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → 𝑓 ∈ (𝑋𝐻𝑌))
14	10, 1, 11, 12, 2, 3, 13	thinciso 47233	. . . 4 ⊢ ((𝜑 ∧ 𝑓 ∈ (𝑋𝐻𝑌)) → (𝑓 ∈ (𝑋(Iso‘𝐶)𝑌) ↔ (𝑌𝐻𝑋) ≠ ∅))
15	9, 14	biadanid 821	. . 3 ⊢ (𝜑 → (𝑓 ∈ (𝑋(Iso‘𝐶)𝑌) ↔ (𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅)))
16	15	exbidv 1924	. 2 ⊢ (𝜑 → (∃𝑓 𝑓 ∈ (𝑋(Iso‘𝐶)𝑌) ↔ ∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅)))
17	3, 1, 5, 6, 7	cic 17711	. 2 ⊢ (𝜑 → (𝑋( ≃𝑐 ‘𝐶)𝑌 ↔ ∃𝑓 𝑓 ∈ (𝑋(Iso‘𝐶)𝑌)))
18		n0 4326	. . . . 5 ⊢ ((𝑋𝐻𝑌) ≠ ∅ ↔ ∃𝑓 𝑓 ∈ (𝑋𝐻𝑌))
19	18	anbi1i 624	. . . 4 ⊢ (((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ (∃𝑓 𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅))
20		19.41v 1953	. . . 4 ⊢ (∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ (∃𝑓 𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅))
21	19, 20	bitr4i 277	. . 3 ⊢ (((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ ∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅))
22	21	a1i 11	. 2 ⊢ (𝜑 → (((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅) ↔ ∃𝑓(𝑓 ∈ (𝑋𝐻𝑌) ∧ (𝑌𝐻𝑋) ≠ ∅)))
23	16, 17, 22	3bitr4d 310	1 ⊢ (𝜑 → (𝑋( ≃𝑐 ‘𝐶)𝑌 ↔ ((𝑋𝐻𝑌) ≠ ∅ ∧ (𝑌𝐻𝑋) ≠ ∅)))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 396   = wceq 1541  ∃wex 1781   ∈ wcel 2106   ≠ wne 2939  ∅c0 4302   class class class wbr 5125  ‘cfv 6516  (class class class)co 7377  Basecbs 17109  Hom chom 17173  Isociso 17658   ≃_𝑐 ccic 17707  ThinCatcthinc 47192

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 2702  ax-rep 5262  ax-sep 5276  ax-nul 5283  ax-pow 5340  ax-pr 5404  ax-un 7692

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 2533  df-eu 2562  df-clab 2709  df-cleq 2723  df-clel 2809  df-nfc 2884  df-ne 2940  df-ral 3061  df-rex 3070  df-rmo 3364  df-reu 3365  df-rab 3419  df-v 3461  df-sbc 3758  df-csb 3874  df-dif 3931  df-un 3933  df-in 3935  df-ss 3945  df-nul 4303  df-if 4507  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4886  df-iun 4976  df-br 5126  df-opab 5188  df-mpt 5209  df-id 5551  df-xp 5659  df-rel 5660  df-cnv 5661  df-co 5662  df-dm 5663  df-rn 5664  df-res 5665  df-ima 5666  df-iota 6468  df-fun 6518  df-fn 6519  df-f 6520  df-f1 6521  df-fo 6522  df-f1o 6523  df-fv 6524  df-riota 7333  df-ov 7380  df-oprab 7381  df-mpo 7382  df-1st 7941  df-2nd 7942  df-supp 8113  df-cat 17577  df-cid 17578  df-sect 17659  df-inv 17660  df-iso 17661  df-cic 17708  df-thinc 47193

This theorem is referenced by:  postc  47255