Theorem setsmsds

Description: The distance function of a constructed metric space. (Contributed by Mario Carneiro, 28-Aug-2015)

	Ref	Expression
Hypotheses	setsms.x	$$⊢\phi \to X={\mathrm{Base}}_M$$
	setsms.d	$$⊢\phi \to D={\mathrm{dist}\left(M\right)\upharpoonright }_{\left(X\times X\right)}$$
	setsms.k	$$⊢\phi \to K=M\mathrm{sSet}⟨\mathrm{TopSet}\left(\mathrm{ndx}\right),\mathrm{MetOpen}\left(D\right)⟩$$
Assertion	setsmsds	$$⊢\phi \to \mathrm{dist}\left(M\right)=\mathrm{dist}\left(K\right)$$

Proof

Step	Hyp	Ref	Expression
1		setsms.x	$$⊢\phi \to X={\mathrm{Base}}_M$$
2		setsms.d	$$⊢\phi \to D={\mathrm{dist}\left(M\right)\upharpoonright }_{\left(X\times X\right)}$$
3		setsms.k	$$⊢\phi \to K=M\mathrm{sSet}⟨\mathrm{TopSet}\left(\mathrm{ndx}\right),\mathrm{MetOpen}\left(D\right)⟩$$
4		dsid	$$⊢\mathrm{dist}=\mathrm{Slot}\mathrm{dist}\left(\mathrm{ndx}\right)$$
5		9re	$$⊢9\in ℝ$$
6		1nn	$$⊢1\in \mathbb{N}$$
7		2nn0	$$⊢2\in {\mathbb{N}}_0$$
8		9nn0	$$⊢9\in {\mathbb{N}}_0$$
9		9lt10	$$⊢9<10$$
10	6 7 8 9	declti	$$⊢9<12$$
11	5 10	gtneii	$$⊢12\ne 9$$
12		dsndx	$$⊢\mathrm{dist}\left(\mathrm{ndx}\right)=12$$
13		tsetndx	$$⊢\mathrm{TopSet}\left(\mathrm{ndx}\right)=9$$
14	12 13	neeq12i	$$⊢\mathrm{dist}\left(\mathrm{ndx}\right)\ne \mathrm{TopSet}\left(\mathrm{ndx}\right)\leftrightarrow 12\ne 9$$
15	11 14	mpbir	$$⊢\mathrm{dist}\left(\mathrm{ndx}\right)\ne \mathrm{TopSet}\left(\mathrm{ndx}\right)$$
16	4 15	setsnid	$$⊢\mathrm{dist}\left(M\right)=\mathrm{dist}\left(M\mathrm{sSet}⟨\mathrm{TopSet}\left(\mathrm{ndx}\right),\mathrm{MetOpen}\left(D\right)⟩\right)$$
17	3	fveq2d	$$⊢\phi \to \mathrm{dist}\left(K\right)=\mathrm{dist}\left(M\mathrm{sSet}⟨\mathrm{TopSet}\left(\mathrm{ndx}\right),\mathrm{MetOpen}\left(D\right)⟩\right)$$
18	16 17	eqtr4id	$$⊢\phi \to \mathrm{dist}\left(M\right)=\mathrm{dist}\left(K\right)$$