Step
*
1
2
2
1
of Lemma
select_reject_permr
1. T : Type
2. u : T
3. v : T List
4. ∀i:ℕ||v||. ([v[i] / v\[i]] ≡(T) v)
5. i : ℕ||[u / v]||
6. ¬(i = 0 ∈ ℤ)
⊢ [v[i - 1]; [u / v\[i - 1]]] ≡(T) [u / v]
BY
{ (RWH (LemmaC `hd_two_swap_permr`) 0 THENA Auto') }
1
1. T : Type
2. u : T
3. v : T List
4. ∀i:ℕ||v||. ([v[i] / v\[i]] ≡(T) v)
5. i : ℕ||[u / v]||
6. ¬(i = 0 ∈ ℤ)
⊢ [u; [v[i - 1] / v\[i - 1]]] ≡(T) [u / v]
Latex:
Latex:
1.  T  :  Type
2.  u  :  T
3.  v  :  T  List
4.  \mforall{}i:\mBbbN{}||v||.  ([v[i]  /  v\mbackslash{}[i]]  \mequiv{}(T)  v)
5.  i  :  \mBbbN{}||[u  /  v]||
6.  \mneg{}(i  =  0)
\mvdash{}  [v[i  -  1];  [u  /  v\mbackslash{}[i  -  1]]]  \mequiv{}(T)  [u  /  v]
By
Latex:
(RWH  (LemmaC  `hd\_two\_swap\_permr`)  0  THENA  Auto')
Home
Index