Theorem rescabsOLD 17538

Description: Obsolete proof of seqp1d 13728 as of 10-Nov-2024. Restriction absorption law. (Contributed by Mario Carneiro, 6-Jan-2017.) (Proof modification is discouraged.) (New usage is discouraged.)

Hypotheses

Ref	Expression
rescabs.c	⊢ (𝜑 → 𝐶 ∈ 𝑉)
rescabs.h	⊢ (𝜑 → 𝐻 Fn (𝑆 × 𝑆))
rescabs.j	⊢ (𝜑 → 𝐽 Fn (𝑇 × 𝑇))
rescabs.s	⊢ (𝜑 → 𝑆 ∈ 𝑊)
rescabs.t	⊢ (𝜑 → 𝑇 ⊆ 𝑆)

Assertion

Ref	Expression
rescabsOLD	⊢ (𝜑 → ((𝐶 ↾cat 𝐻) ↾cat 𝐽) = (𝐶 ↾cat 𝐽))

Proof of Theorem rescabsOLD

Step	Hyp	Ref	Expression
1		eqid 2740	. . . 4 ⊢ (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾cat 𝐽) = (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾cat 𝐽)
2		ovexd 7304	. . . 4 ⊢ (𝜑 → ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ∈ V)
3		rescabs.s	. . . . 5 ⊢ (𝜑 → 𝑆 ∈ 𝑊)
4		rescabs.t	. . . . 5 ⊢ (𝜑 → 𝑇 ⊆ 𝑆)
5	3, 4	ssexd 5252	. . . 4 ⊢ (𝜑 → 𝑇 ∈ V)
6		rescabs.j	. . . 4 ⊢ (𝜑 → 𝐽 Fn (𝑇 × 𝑇))
7	1, 2, 5, 6	rescval2 17530	. . 3 ⊢ (𝜑 → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾cat 𝐽) = ((((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
8		simpr 485	. . . . . . 7 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇)
9		ovexd 7304	. . . . . . 7 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ∈ V)
10	5	adantr 481	. . . . . . 7 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝑇 ∈ V)
11		eqid 2740	. . . . . . . 8 ⊢ (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) = (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇)
12		baseid 16905	. . . . . . . . 9 ⊢ Base = Slot (Base‘ndx)
13		1re 10968	. . . . . . . . . . 11 ⊢ 1 ∈ ℝ
14		1nn 11976	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
15		4nn0 12244	. . . . . . . . . . . 12 ⊢ 4 ∈ ℕ0
16		1nn0 12241	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ0
17		1lt10 12567	. . . . . . . . . . . 12 ⊢ 1 < ;10
18	14, 15, 16, 17	declti 12466	. . . . . . . . . . 11 ⊢ 1 < ;14
19	13, 18	ltneii 11080	. . . . . . . . . 10 ⊢ 1 ≠ ;14
20		basendx 16911	. . . . . . . . . . 11 ⊢ (Base‘ndx) = 1
21		homndx 17111	. . . . . . . . . . 11 ⊢ (Hom ‘ndx) = ;14
22	20, 21	neeq12i 3012	. . . . . . . . . 10 ⊢ ((Base‘ndx) ≠ (Hom ‘ndx) ↔ 1 ≠ ;14)
23	19, 22	mpbir 230	. . . . . . . . 9 ⊢ (Base‘ndx) ≠ (Hom ‘ndx)
24	12, 23	setsnid 16900	. . . . . . . 8 ⊢ (Base‘(𝐶 ↾s 𝑆)) = (Base‘((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩))
25	11, 24	ressid2 16935	. . . . . . 7 ⊢ (((Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇 ∧ ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ∈ V ∧ 𝑇 ∈ V) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) = ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩))
26	8, 9, 10, 25	syl3anc 1370	. . . . . 6 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) = ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩))
27	26	oveq1d 7284	. . . . 5 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩) = (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Hom ‘ndx), 𝐽⟩))
28		ovex 7302	. . . . . 6 ⊢ (𝐶 ↾s 𝑆) ∈ V
29	5, 5	xpexd 7593	. . . . . . . 8 ⊢ (𝜑 → (𝑇 × 𝑇) ∈ V)
30		fnex 7088	. . . . . . . 8 ⊢ ((𝐽 Fn (𝑇 × 𝑇) ∧ (𝑇 × 𝑇) ∈ V) → 𝐽 ∈ V)
31	6, 29, 30	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → 𝐽 ∈ V)
32	31	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝐽 ∈ V)
33		setsabs 16870	. . . . . 6 ⊢ (((𝐶 ↾s 𝑆) ∈ V ∧ 𝐽 ∈ V) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐽⟩))
34	28, 32, 33	sylancr 587	. . . . 5 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐽⟩))
35		eqid 2740	. . . . . . . . . . . . . 14 ⊢ (𝐶 ↾s 𝑆) = (𝐶 ↾s 𝑆)
36		eqid 2740	. . . . . . . . . . . . . 14 ⊢ (Base‘𝐶) = (Base‘𝐶)
37	35, 36	ressbas 16937	. . . . . . . . . . . . 13 ⊢ (𝑆 ∈ 𝑊 → (𝑆 ∩ (Base‘𝐶)) = (Base‘(𝐶 ↾s 𝑆)))
38	3, 37	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑆 ∩ (Base‘𝐶)) = (Base‘(𝐶 ↾s 𝑆)))
39	38	sseq1d 3957	. . . . . . . . . . 11 ⊢ (𝜑 → ((𝑆 ∩ (Base‘𝐶)) ⊆ 𝑇 ↔ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇))
40	39	biimpar 478	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝑆 ∩ (Base‘𝐶)) ⊆ 𝑇)
41		inss2 4169	. . . . . . . . . . 11 ⊢ (𝑆 ∩ (Base‘𝐶)) ⊆ (Base‘𝐶)
42	41	a1i 11	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝑆 ∩ (Base‘𝐶)) ⊆ (Base‘𝐶))
43	40, 42	ssind 4172	. . . . . . . . 9 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝑆 ∩ (Base‘𝐶)) ⊆ (𝑇 ∩ (Base‘𝐶)))
44	4	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝑇 ⊆ 𝑆)
45	44	ssrind 4175	. . . . . . . . 9 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝑇 ∩ (Base‘𝐶)) ⊆ (𝑆 ∩ (Base‘𝐶)))
46	43, 45	eqssd 3943	. . . . . . . 8 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝑆 ∩ (Base‘𝐶)) = (𝑇 ∩ (Base‘𝐶)))
47	46	oveq2d 7285	. . . . . . 7 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝐶 ↾s (𝑆 ∩ (Base‘𝐶))) = (𝐶 ↾s (𝑇 ∩ (Base‘𝐶))))
48	3	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝑆 ∈ 𝑊)
49	36	ressinbas 16945	. . . . . . . 8 ⊢ (𝑆 ∈ 𝑊 → (𝐶 ↾s 𝑆) = (𝐶 ↾s (𝑆 ∩ (Base‘𝐶))))
50	48, 49	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝐶 ↾s 𝑆) = (𝐶 ↾s (𝑆 ∩ (Base‘𝐶))))
51	36	ressinbas 16945	. . . . . . . 8 ⊢ (𝑇 ∈ V → (𝐶 ↾s 𝑇) = (𝐶 ↾s (𝑇 ∩ (Base‘𝐶))))
52	10, 51	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝐶 ↾s 𝑇) = (𝐶 ↾s (𝑇 ∩ (Base‘𝐶))))
53	47, 50, 52	3eqtr4d 2790	. . . . . 6 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝐶 ↾s 𝑆) = (𝐶 ↾s 𝑇))
54	53	oveq1d 7284	. . . . 5 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
55	27, 34, 54	3eqtrd 2784	. . . 4 ⊢ ((𝜑 ∧ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
56		simpr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇)
57		ovexd 7304	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ∈ V)
58	5	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝑇 ∈ V)
59	11, 24	ressval2 16936	. . . . . . . 8 ⊢ ((¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇 ∧ ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ∈ V ∧ 𝑇 ∈ V) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) = (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩))
60	56, 57, 58, 59	syl3anc 1370	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) = (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩))
61		ovexd 7304	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝐶 ↾s 𝑆) ∈ V)
62	23	necomi 3000	. . . . . . . . 9 ⊢ (Hom ‘ndx) ≠ (Base‘ndx)
63	62	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (Hom ‘ndx) ≠ (Base‘ndx))
64		rescabs.h	. . . . . . . . . 10 ⊢ (𝜑 → 𝐻 Fn (𝑆 × 𝑆))
65	3, 3	xpexd 7593	. . . . . . . . . 10 ⊢ (𝜑 → (𝑆 × 𝑆) ∈ V)
66		fnex 7088	. . . . . . . . . 10 ⊢ ((𝐻 Fn (𝑆 × 𝑆) ∧ (𝑆 × 𝑆) ∈ V) → 𝐻 ∈ V)
67	64, 65, 66	syl2anc 584	. . . . . . . . 9 ⊢ (𝜑 → 𝐻 ∈ V)
68	67	adantr 481	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝐻 ∈ V)
69		fvex 6782	. . . . . . . . . 10 ⊢ (Base‘(𝐶 ↾s 𝑆)) ∈ V
70	69	inex2 5246	. . . . . . . . 9 ⊢ (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆))) ∈ V
71	70	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆))) ∈ V)
72		fvex 6782	. . . . . . . . 9 ⊢ (Hom ‘ndx) ∈ V
73		fvex 6782	. . . . . . . . 9 ⊢ (Base‘ndx) ∈ V
74	72, 73	setscom 16871	. . . . . . . 8 ⊢ ((((𝐶 ↾s 𝑆) ∈ V ∧ (Hom ‘ndx) ≠ (Base‘ndx)) ∧ (𝐻 ∈ V ∧ (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆))) ∈ V)) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩) = (((𝐶 ↾s 𝑆) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩) sSet ⟨(Hom ‘ndx), 𝐻⟩))
75	61, 63, 68, 71, 74	syl22anc 836	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩) = (((𝐶 ↾s 𝑆) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩) sSet ⟨(Hom ‘ndx), 𝐻⟩))
76		eqid 2740	. . . . . . . . . . 11 ⊢ ((𝐶 ↾s 𝑆) ↾s 𝑇) = ((𝐶 ↾s 𝑆) ↾s 𝑇)
77		eqid 2740	. . . . . . . . . . 11 ⊢ (Base‘(𝐶 ↾s 𝑆)) = (Base‘(𝐶 ↾s 𝑆))
78	76, 77	ressval2 16936	. . . . . . . . . 10 ⊢ ((¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇 ∧ (𝐶 ↾s 𝑆) ∈ V ∧ 𝑇 ∈ V) → ((𝐶 ↾s 𝑆) ↾s 𝑇) = ((𝐶 ↾s 𝑆) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩))
79	56, 61, 58, 78	syl3anc 1370	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((𝐶 ↾s 𝑆) ↾s 𝑇) = ((𝐶 ↾s 𝑆) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩))
80	3	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝑆 ∈ 𝑊)
81	4	adantr 481	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝑇 ⊆ 𝑆)
82		ressabs 16949	. . . . . . . . . 10 ⊢ ((𝑆 ∈ 𝑊 ∧ 𝑇 ⊆ 𝑆) → ((𝐶 ↾s 𝑆) ↾s 𝑇) = (𝐶 ↾s 𝑇))
83	80, 81, 82	syl2anc 584	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((𝐶 ↾s 𝑆) ↾s 𝑇) = (𝐶 ↾s 𝑇))
84	79, 83	eqtr3d 2782	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((𝐶 ↾s 𝑆) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩) = (𝐶 ↾s 𝑇))
85	84	oveq1d 7284	. . . . . . 7 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑆) sSet ⟨(Base‘ndx), (𝑇 ∩ (Base‘(𝐶 ↾s 𝑆)))⟩) sSet ⟨(Hom ‘ndx), 𝐻⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐻⟩))
86	60, 75, 85	3eqtrd 2784	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐻⟩))
87	86	oveq1d 7284	. . . . 5 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩) = (((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Hom ‘ndx), 𝐽⟩))
88		ovex 7302	. . . . . 6 ⊢ (𝐶 ↾s 𝑇) ∈ V
89	31	adantr 481	. . . . . 6 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → 𝐽 ∈ V)
90		setsabs 16870	. . . . . 6 ⊢ (((𝐶 ↾s 𝑇) ∈ V ∧ 𝐽 ∈ V) → (((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
91	88, 89, 90	sylancr 587	. . . . 5 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → (((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐻⟩) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
92	87, 91	eqtrd 2780	. . . 4 ⊢ ((𝜑 ∧ ¬ (Base‘(𝐶 ↾s 𝑆)) ⊆ 𝑇) → ((((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
93	55, 92	pm2.61dan 810	. . 3 ⊢ (𝜑 → ((((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
94	7, 93	eqtrd 2780	. 2 ⊢ (𝜑 → (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾cat 𝐽) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
95		eqid 2740	. . . 4 ⊢ (𝐶 ↾cat 𝐻) = (𝐶 ↾cat 𝐻)
96		rescabs.c	. . . 4 ⊢ (𝜑 → 𝐶 ∈ 𝑉)
97	95, 96, 3, 64	rescval2 17530	. . 3 ⊢ (𝜑 → (𝐶 ↾cat 𝐻) = ((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩))
98	97	oveq1d 7284	. 2 ⊢ (𝜑 → ((𝐶 ↾cat 𝐻) ↾cat 𝐽) = (((𝐶 ↾s 𝑆) sSet ⟨(Hom ‘ndx), 𝐻⟩) ↾cat 𝐽))
99		eqid 2740	. . 3 ⊢ (𝐶 ↾cat 𝐽) = (𝐶 ↾cat 𝐽)
100	99, 96, 5, 6	rescval2 17530	. 2 ⊢ (𝜑 → (𝐶 ↾cat 𝐽) = ((𝐶 ↾s 𝑇) sSet ⟨(Hom ‘ndx), 𝐽⟩))
101	94, 98, 100	3eqtr4d 2790	1 ⊢ (𝜑 → ((𝐶 ↾cat 𝐻) ↾cat 𝐽) = (𝐶 ↾cat 𝐽))

Syntax hints:  ¬ wn 3   → wi 4   ∧ wa 396   = wceq 1542   ∈ wcel 2110   ≠ wne 2945  Vcvv 3431   ∩ cin 3891   ⊆ wss 3892  ⟨cop 4573   × cxp 5587   Fn wfn 6426  ‘cfv 6431  (class class class)co 7269  1c1 10865  4c4 12022  ;cdc 12428   sSet csts 16854  ndxcnx 16884  Basecbs 16902   ↾_s cress 16931  Hom chom 16963   ↾_cat cresc 17510

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1975  ax-7 2015  ax-8 2112  ax-9 2120  ax-10 2141  ax-11 2158  ax-12 2175  ax-ext 2711  ax-rep 5214  ax-sep 5227  ax-nul 5234  ax-pow 5292  ax-pr 5356  ax-un 7580  ax-cnex 10920  ax-resscn 10921  ax-1cn 10922  ax-icn 10923  ax-addcl 10924  ax-addrcl 10925  ax-mulcl 10926  ax-mulrcl 10927  ax-mulcom 10928  ax-addass 10929  ax-mulass 10930  ax-distr 10931  ax-i2m1 10932  ax-1ne0 10933  ax-1rid 10934  ax-rnegex 10935  ax-rrecex 10936  ax-cnre 10937  ax-pre-lttri 10938  ax-pre-lttrn 10939  ax-pre-ltadd 10940  ax-pre-mulgt0 10941

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1545  df-fal 1555  df-ex 1787  df-nf 1791  df-sb 2072  df-mo 2542  df-eu 2571  df-clab 2718  df-cleq 2732  df-clel 2818  df-nfc 2891  df-ne 2946  df-nel 3052  df-ral 3071  df-rex 3072  df-reu 3073  df-rab 3075  df-v 3433  df-sbc 3721  df-csb 3838  df-dif 3895  df-un 3897  df-in 3899  df-ss 3909  df-pss 3911  df-nul 4263  df-if 4466  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4846  df-iun 4932  df-br 5080  df-opab 5142  df-mpt 5163  df-tr 5197  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-pred 6200  df-ord 6267  df-on 6268  df-lim 6269  df-suc 6270  df-iota 6389  df-fun 6433  df-fn 6434  df-f 6435  df-f1 6436  df-fo 6437  df-f1o 6438  df-fv 6439  df-riota 7226  df-ov 7272  df-oprab 7273  df-mpo 7274  df-om 7702  df-2nd 7819  df-frecs 8082  df-wrecs 8113  df-recs 8187  df-rdg 8226  df-er 8473  df-en 8709  df-dom 8710  df-sdom 8711  df-pnf 11004  df-mnf 11005  df-xr 11006  df-ltxr 11007  df-le 11008  df-sub 11199  df-neg 11200  df-nn 11966  df-2 12028  df-3 12029  df-4 12030  df-5 12031  df-6 12032  df-7 12033  df-8 12034  df-9 12035  df-n0 12226  df-z 12312  df-dec 12429  df-sets 16855  df-slot 16873  df-ndx 16885  df-base 16903  df-ress 16932  df-hom 16976  df-resc 17513

This theorem is referenced by: (None)