Theorem brssc 17829

Description: The subcategory subset relation is a relation. (Contributed by Mario Carneiro, 6-Jan-2017.)

Assertion

Ref	Expression
brssc	⊢ (𝐻 ⊆cat 𝐽 ↔ ∃𝑡(𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥)))

Distinct variable groups:   𝑡,𝑠,𝑥,𝐻   𝐽,𝑠,𝑡,𝑥

Proof of Theorem brssc

Dummy variables ℎ 𝑗 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sscrel 17828	. . 3 ⊢ Rel ⊆cat
2	1	brrelex12i 5720	. 2 ⊢ (𝐻 ⊆cat 𝐽 → (𝐻 ∈ V ∧ 𝐽 ∈ V))
3		vex 3467	. . . . . 6 ⊢ 𝑡 ∈ V
4	3, 3	xpex 7755	. . . . 5 ⊢ (𝑡 × 𝑡) ∈ V
5		fnex 7219	. . . . 5 ⊢ ((𝐽 Fn (𝑡 × 𝑡) ∧ (𝑡 × 𝑡) ∈ V) → 𝐽 ∈ V)
6	4, 5	mpan2 691	. . . 4 ⊢ (𝐽 Fn (𝑡 × 𝑡) → 𝐽 ∈ V)
7		elex 3484	. . . . 5 ⊢ (𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥) → 𝐻 ∈ V)
8	7	rexlimivw 3138	. . . 4 ⊢ (∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥) → 𝐻 ∈ V)
9	6, 8	anim12ci 614	. . 3 ⊢ ((𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥)) → (𝐻 ∈ V ∧ 𝐽 ∈ V))
10	9	exlimiv 1929	. 2 ⊢ (∃𝑡(𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥)) → (𝐻 ∈ V ∧ 𝐽 ∈ V))
11		simpr 484	. . . . . 6 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → 𝑗 = 𝐽)
12	11	fneq1d 6641	. . . . 5 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → (𝑗 Fn (𝑡 × 𝑡) ↔ 𝐽 Fn (𝑡 × 𝑡)))
13		simpl 482	. . . . . . 7 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → ℎ = 𝐻)
14	11	fveq1d 6888	. . . . . . . . 9 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → (𝑗‘𝑥) = (𝐽‘𝑥))
15	14	pweqd 4597	. . . . . . . 8 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → 𝒫 (𝑗‘𝑥) = 𝒫 (𝐽‘𝑥))
16	15	ixpeq2dv 8935	. . . . . . 7 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝑗‘𝑥) = X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥))
17	13, 16	eleq12d 2827	. . . . . 6 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → (ℎ ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝑗‘𝑥) ↔ 𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥)))
18	17	rexbidv 3166	. . . . 5 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → (∃𝑠 ∈ 𝒫 𝑡ℎ ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝑗‘𝑥) ↔ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥)))
19	12, 18	anbi12d 632	. . . 4 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → ((𝑗 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡ℎ ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝑗‘𝑥)) ↔ (𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥))))
20	19	exbidv 1920	. . 3 ⊢ ((ℎ = 𝐻 ∧ 𝑗 = 𝐽) → (∃𝑡(𝑗 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡ℎ ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝑗‘𝑥)) ↔ ∃𝑡(𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥))))
21		df-ssc 17825	. . 3 ⊢ ⊆cat = {⟨ℎ, 𝑗⟩ ∣ ∃𝑡(𝑗 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡ℎ ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝑗‘𝑥))}
22	20, 21	brabga 5519	. 2 ⊢ ((𝐻 ∈ V ∧ 𝐽 ∈ V) → (𝐻 ⊆cat 𝐽 ↔ ∃𝑡(𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥))))
23	2, 10, 22	pm5.21nii 378	1 ⊢ (𝐻 ⊆cat 𝐽 ↔ ∃𝑡(𝐽 Fn (𝑡 × 𝑡) ∧ ∃𝑠 ∈ 𝒫 𝑡𝐻 ∈ X𝑥 ∈ (𝑠 × 𝑠)𝒫 (𝐽‘𝑥)))

Syntax hints:   ↔ wb 206   ∧ wa 395   = wceq 1539  ∃wex 1778   ∈ wcel 2107  ∃wrex 3059  Vcvv 3463  𝒫 cpw 4580   class class class wbr 5123   × cxp 5663   Fn wfn 6536  ‘cfv 6541  Xcixp 8919   ⊆_cat cssc 17822

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-8 2109  ax-9 2117  ax-10 2140  ax-11 2156  ax-12 2176  ax-ext 2706  ax-rep 5259  ax-sep 5276  ax-nul 5286  ax-pow 5345  ax-pr 5412  ax-un 7737

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2726  df-clel 2808  df-nfc 2884  df-ne 2932  df-ral 3051  df-rex 3060  df-reu 3364  df-rab 3420  df-v 3465  df-sbc 3771  df-csb 3880  df-dif 3934  df-un 3936  df-in 3938  df-ss 3948  df-nul 4314  df-if 4506  df-pw 4582  df-sn 4607  df-pr 4609  df-op 4613  df-uni 4888  df-iun 4973  df-br 5124  df-opab 5186  df-mpt 5206  df-id 5558  df-xp 5671  df-rel 5672  df-cnv 5673  df-co 5674  df-dm 5675  df-rn 5676  df-res 5677  df-ima 5678  df-iota 6494  df-fun 6543  df-fn 6544  df-f 6545  df-f1 6546  df-fo 6547  df-f1o 6548  df-fv 6549  df-ixp 8920  df-ssc 17825

This theorem is referenced by:  sscpwex  17830  sscfn1  17832  sscfn2  17833  isssc  17835