---

Step * 2 1 1 2 2 1 1 of Lemma cyclic-map-equipollent


1. n : ℕ+
2. ∀L:Combination(n - 1;ℕn - 1). ([n - 1 / L] ∈ Combination(n;ℕn))
3. a1 : ℕn - 1 List
4. no_repeats(ℕn - 1;a1)
5. ||a1|| = (n - 1) ∈ ℤ
6. a2 : ℕn - 1 List
7. no_repeats(ℕn - 1;a2)
8. ||a2|| = (n - 1) ∈ ℤ
9. cycle([n - 1 / a1]) = cycle([n - 1 / a2]) ∈ cyclic-map(ℕn)
10. i : ℕ
11. i < ||a1||
12. (cycle([n - 1 / a1])^(i + 1) - 0 (n - 1)) = a1[(i + 1) - 1] ∈ ℕn
13. (cycle([n - 1 / a2])^(i + 1) - 0 (n - 1)) = a2[(i + 1) - 1] ∈ ℕn
⊢ (cycle([n - 1 / a1])^(i + 1) - 0 (n - 1)) = (cycle([n - 1 / a2])^(i + 1) - 0 (n - 1)) ∈ ℕn
BY
{ xxx(EqTypeHD (-5)
      THENA (Auto
             THEN DVar `f'
             THEN xxx(Try ((GenConclAtAddr [2] THEN Complete (Auto)))
                      THEN Try ((GenConclAtAddr [1] THEN Complete (Auto)))
                      )xxx)
      )xxx }

1
1. n : ℕ+
2. ∀L:Combination(n - 1;ℕn - 1). ([n - 1 / L] ∈ Combination(n;ℕn))
3. a1 : ℕn - 1 List
4. no_repeats(ℕn - 1;a1)
5. ||a1|| = (n - 1) ∈ ℤ
6. a2 : ℕn - 1 List
7. no_repeats(ℕn - 1;a2)
8. ||a2|| = (n - 1) ∈ ℤ
9. cycle([n - 1 / a1]) = cycle([n - 1 / a2]) ∈ ℕn →⟶ ℕn
10. ∀x,y:ℕn.  ∃n@0:ℕ. ((cycle([n - 1 / a1])^n@0 x) = y ∈ ℕn)
11. i : ℕ
12. i < ||a1||
13. (cycle([n - 1 / a1])^(i + 1) - 0 (n - 1)) = a1[(i + 1) - 1] ∈ ℕn
14. (cycle([n - 1 / a2])^(i + 1) - 0 (n - 1)) = a2[(i + 1) - 1] ∈ ℕn
⊢ (cycle([n - 1 / a1])^(i + 1) - 0 (n - 1)) = (cycle([n - 1 / a2])^(i + 1) - 0 (n - 1)) ∈ ℕn

---

Latex:

---

Latex:

1.  n  :  \mBbbN{}\msupplus{}
2.  \mforall{}L:Combination(n  -  1;\mBbbN{}n  -  1).  ([n  -  1  /  L]  \mmember{}  Combination(n;\mBbbN{}n))
3.  a1  :  \mBbbN{}n  -  1  List
4.  no\_repeats(\mBbbN{}n  -  1;a1)
5.  ||a1||  =  (n  -  1)
6.  a2  :  \mBbbN{}n  -  1  List
7.  no\_repeats(\mBbbN{}n  -  1;a2)
8.  ||a2||  =  (n  -  1)
9.  cycle([n  -  1  /  a1])  =  cycle([n  -  1  /  a2])
10.  i  :  \mBbbN{}
11.  i  <  ||a1||
12.  (cycle([n  -  1  /  a1])\^{}(i  +  1)  -  0  (n  -  1))  =  a1[(i  +  1)  -  1]
13.  (cycle([n  -  1  /  a2])\^{}(i  +  1)  -  0  (n  -  1))  =  a2[(i  +  1)  -  1]
\mvdash{}  (cycle([n  -  1  /  a1])\^{}(i  +  1)  -  0  (n  -  1))  =  (cycle([n  -  1  /  a2])\^{}(i  +  1)  -  0  (n  -  1))


By

---

Latex:
xxx(EqTypeHD  (-5)
        THENA  (Auto
                      THEN  DVar  `f'
                      THEN  xxx(Try  ((GenConclAtAddr  [2]  THEN  Complete  (Auto)))
                                        THEN  Try  ((GenConclAtAddr  [1]  THEN  Complete  (Auto)))
                                        )xxx)
        )xxx

---

Home Index