---

Step * 1 2 of Lemma coW-play-invariant


1. [A] : 𝕌'
2. B : A ⟶ Type
3. w : coW(A;a.B[a])
4. w' : coW(A;a.B[a])
5. n : ℕ
6. s : win2strat(coW-game(a.B[a];w;w');n)
7. moves : strat2play(coW-game(a.B[a];w;w');n;s)
8. moves[0] = InitialPos(coW-game(a.B[a];w;w')) ∈ Pos(coW-game(a.B[a];w;w'))
9. ∀i:ℕn + 1
     ((↓Legal1(moves[2 * i];moves[(2 * i) + 1]))
     ∧ (i < n
       ⇒ ((↓Legal2(moves[(2 * i) + 1];moves[2 * (i + 1)]))
          ∧ (moves[2 * (i + 1)] = (s play-truncate(moves;2 * (i + 1))) ∈ Pos(coW-game(a.B[a];w;w'))))))
10. 0 ≤ n
11. coW-pos-lens(moves[0];0;0)
⊢ coW-pos-lens(moves[1];0;1) ∨ coW-pos-lens(moves[1];1;0)
BY
{ ((D -3 With ⌜0⌝  THENA Auto)
   THEN D -1
   THEN Thin (-1)
   THEN Reduce -1
   THEN Fold `play-item` (-4)
   THEN (RWO "-4" (-1) THENA Auto)) }

1
1. [A] : 𝕌'
2. B : A ⟶ Type
3. w : coW(A;a.B[a])
4. w' : coW(A;a.B[a])
5. n : ℕ
6. s : win2strat(coW-game(a.B[a];w;w');n)
7. moves : strat2play(coW-game(a.B[a];w;w');n;s)
8. moves[0] = InitialPos(coW-game(a.B[a];w;w')) ∈ Pos(coW-game(a.B[a];w;w'))
9. 0 ≤ n
10. coW-pos-lens(moves[0];0;0)
11. ↓Legal1(InitialPos(coW-game(a.B[a];w;w'));moves[1])
⊢ coW-pos-lens(moves[1];0;1) ∨ coW-pos-lens(moves[1];1;0)

---

Latex:

---

Latex:

1.  [A]  :  \mBbbU{}'
2.  B  :  A  {}\mrightarrow{}  Type
3.  w  :  coW(A;a.B[a])
4.  w'  :  coW(A;a.B[a])
5.  n  :  \mBbbN{}
6.  s  :  win2strat(coW-game(a.B[a];w;w');n)
7.  moves  :  strat2play(coW-game(a.B[a];w;w');n;s)
8.  moves[0]  =  InitialPos(coW-game(a.B[a];w;w'))
9.  \mforall{}i:\mBbbN{}n  +  1
          ((\mdownarrow{}Legal1(moves[2  *  i];moves[(2  *  i)  +  1]))
          \mwedge{}  (i  <  n
              {}\mRightarrow{}  ((\mdownarrow{}Legal2(moves[(2  *  i)  +  1];moves[2  *  (i  +  1)]))
                    \mwedge{}  (moves[2  *  (i  +  1)]  =  (s  play-truncate(moves;2  *  (i  +  1)))))))
10.  0  \mleq{}  n
11.  coW-pos-lens(moves[0];0;0)
\mvdash{}  coW-pos-lens(moves[1];0;1)  \mvee{}  coW-pos-lens(moves[1];1;0)


By

---

Latex:
((D  -3  With  \mkleeneopen{}0\mkleeneclose{}    THENA  Auto)
  THEN  D  -1
  THEN  Thin  (-1)
  THEN  Reduce  -1
  THEN  Fold  `play-item`  (-4)
  THEN  (RWO  "-4"  (-1)  THENA  Auto))

---

Home Index