Step
*
2
of Lemma
append_comm_1
1. T : Type
2. a : T
3. u : T
4. v : T List
5. (v @ [a]) ≡(T) ([a] @ v)
⊢ [u / (v @ [a])] ≡(T) [a; [u / v]]
BY
{ ((RWH (HypC (-1)) 0 THENA Auto) THEN Reduce 0) }
1
1. T : Type
2. a : T
3. u : T
4. v : T List
5. (v @ [a]) ≡(T) ([a] @ v)
⊢ [u; [a / v]] ≡(T) [a; [u / v]]
Latex:
Latex:
1.  T  :  Type
2.  a  :  T
3.  u  :  T
4.  v  :  T  List
5.  (v  @  [a])  \mequiv{}(T)  ([a]  @  v)
\mvdash{}  [u  /  (v  @  [a])]  \mequiv{}(T)  [a;  [u  /  v]]
By
Latex:
((RWH  (HypC  (-1))  0  THENA  Auto)  THEN  Reduce  0)
Home
Index