---

Step * 1 of Lemma select-shuffle2


1. T : Type
2. ps : (T × T) List
3. i : ℕ||ps||
⊢ if (2 * i rem 2 =z 0) then fst(ps[(2 * i) ÷ 2]) else snd(ps[(2 * i) ÷ 2]) fi  ~ fst(ps[i])
BY
{ (((InstLemma `rem_invariant` [⌜0⌝;⌜i⌝;⌜2⌝]⋅ THENA Auto) THEN Reduce (-1)) THEN AutoSplit) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  ps  :  (T  \mtimes{}  T)  List
3.  i  :  \mBbbN{}||ps||
\mvdash{}  if  (2  *  i  rem  2  =\msubz{}  0)  then  fst(ps[(2  *  i)  \mdiv{}  2])  else  snd(ps[(2  *  i)  \mdiv{}  2])  fi    \msim{}  fst(ps[i])


By

---

Latex:
(((InstLemma  `rem\_invariant`  [\mkleeneopen{}0\mkleeneclose{};\mkleeneopen{}i\mkleeneclose{};\mkleeneopen{}2\mkleeneclose{}]\mcdot{}  THENA  Auto)  THEN  Reduce  (-1))  THEN  AutoSplit)

---

Home Index