Theorem smndex1igid

Description: The composition of the modulo function I and a constant function ( GK ) results in ( GK ) itself. (Contributed by AV, 14-Feb-2024)

	Ref	Expression
Hypotheses	smndex1ibas.m	$$⊢M=\mathrm{EndoFMnd}\left({\mathbb{N}}_0\right)$$
	smndex1ibas.n	$$⊢N\in \mathbb{N}$$
	smndex1ibas.i	$$⊢I=\left(x\in {\mathbb{N}}_0⟼x\mathrm{mod}N\right)$$
	smndex1ibas.g	$$⊢G=\left(n\in \left(0..^N\right)⟼\left(x\in {\mathbb{N}}_0⟼n\right)\right)$$
Assertion	smndex1igid	$$⊢K\in \left(0..^N\right)\to I\circ G\left(K\right)=G\left(K\right)$$

Proof

Step	Hyp	Ref	Expression
1		smndex1ibas.m	$$⊢M=\mathrm{EndoFMnd}\left({\mathbb{N}}_0\right)$$
2		smndex1ibas.n	$$⊢N\in \mathbb{N}$$
3		smndex1ibas.i	$$⊢I=\left(x\in {\mathbb{N}}_0⟼x\mathrm{mod}N\right)$$
4		smndex1ibas.g	$$⊢G=\left(n\in \left(0..^N\right)⟼\left(x\in {\mathbb{N}}_0⟼n\right)\right)$$
5		fconstmpt	$$⊢{\mathbb{N}}_0\times \left\{K\right\}=\left(x\in {\mathbb{N}}_0⟼K\right)$$
6	5	eqcomi	$$⊢\left(x\in {\mathbb{N}}_0⟼K\right)={\mathbb{N}}_0\times \left\{K\right\}$$
7	6	a1i	$$⊢K\in \left(0..^N\right)\to \left(x\in {\mathbb{N}}_0⟼K\right)={\mathbb{N}}_0\times \left\{K\right\}$$
8	7	coeq2d	$$⊢K\in \left(0..^N\right)\to I\circ \left(x\in {\mathbb{N}}_0⟼K\right)=I\circ \left({\mathbb{N}}_0\times \left\{K\right\}\right)$$
9		simpl	$$⊢\left(n=K\wedge x\in {\mathbb{N}}_0\right)\to n=K$$
10	9	mpteq2dva	$$⊢n=K\to \left(x\in {\mathbb{N}}_0⟼n\right)=\left(x\in {\mathbb{N}}_0⟼K\right)$$
11		nn0ex	$$⊢{\mathbb{N}}_0\in \mathrm{V}$$
12	11	mptex	$$⊢\left(x\in {\mathbb{N}}_0⟼K\right)\in \mathrm{V}$$
13	10 4 12	fvmpt	$$⊢K\in \left(0..^N\right)\to G\left(K\right)=\left(x\in {\mathbb{N}}_0⟼K\right)$$
14	13	coeq2d	$$⊢K\in \left(0..^N\right)\to I\circ G\left(K\right)=I\circ \left(x\in {\mathbb{N}}_0⟼K\right)$$
15		oveq1	$$⊢x=K\to x\mathrm{mod}N=K\mathrm{mod}N$$
16		zmodidfzoimp	$$⊢K\in \left(0..^N\right)\to K\mathrm{mod}N=K$$
17	15 16	sylan9eqr	$$⊢\left(K\in \left(0..^N\right)\wedge x=K\right)\to x\mathrm{mod}N=K$$
18		elfzonn0	$$⊢K\in \left(0..^N\right)\to K\in {\mathbb{N}}_0$$
19	3 17 18 18	fvmptd2	$$⊢K\in \left(0..^N\right)\to I\left(K\right)=K$$
20	19	eqcomd	$$⊢K\in \left(0..^N\right)\to K=I\left(K\right)$$
21	20	sneqd	$$⊢K\in \left(0..^N\right)\to \left\{K\right\}=\left\{I\left(K\right)\right\}$$
22	21	xpeq2d	$$⊢K\in \left(0..^N\right)\to {\mathbb{N}}_0\times \left\{K\right\}={\mathbb{N}}_0\times \left\{I\left(K\right)\right\}$$
23	13 6	eqtrdi	$$⊢K\in \left(0..^N\right)\to G\left(K\right)={\mathbb{N}}_0\times \left\{K\right\}$$
24		ovex	$$⊢x\mathrm{mod}N\in \mathrm{V}$$
25	24 3	fnmpti	$$⊢IFn{\mathbb{N}}_0$$
26		fcoconst	$$⊢\left(IFn{\mathbb{N}}_0\wedge K\in {\mathbb{N}}_0\right)\to I\circ \left({\mathbb{N}}_0\times \left\{K\right\}\right)={\mathbb{N}}_0\times \left\{I\left(K\right)\right\}$$
27	25 18 26	sylancr	$$⊢K\in \left(0..^N\right)\to I\circ \left({\mathbb{N}}_0\times \left\{K\right\}\right)={\mathbb{N}}_0\times \left\{I\left(K\right)\right\}$$
28	22 23 27	3eqtr4d	$$⊢K\in \left(0..^N\right)\to G\left(K\right)=I\circ \left({\mathbb{N}}_0\times \left\{K\right\}\right)$$
29	8 14 28	3eqtr4d	$$⊢K\in \left(0..^N\right)\to I\circ G\left(K\right)=G\left(K\right)$$