Step
*
1
of Lemma
bag_remove1_aux_property
1. [T] : Type
2. eq : EqDecider(T)
3. x : T
4. checked : T List
⊢ (∃as,bs:T List. (([] = ((as @ [x]) @ bs) ∈ (T List)) ∧ ((inr Ax ) = (inl ((rev(as) @ checked) @ bs)) ∈ (T List?))))
∨ ((¬(x ∈ [])) ∧ ((inr Ax ) = (inr ⋅ ) ∈ (T List?)))
BY
{ (OrRight THEN Auto) }
Latex:
Latex:
1.  [T]  :  Type
2.  eq  :  EqDecider(T)
3.  x  :  T
4.  checked  :  T  List
\mvdash{}  (\mexists{}as,bs:T  List.  (([]  =  ((as  @  [x])  @  bs))  \mwedge{}  ((inr  Ax  )  =  (inl  ((rev(as)  @  checked)  @  bs)))))
\mvee{}  ((\mneg{}(x  \mmember{}  []))  \mwedge{}  ((inr  Ax  )  =  (inr  \mcdot{}  )))
By
Latex:
(OrRight  THEN  Auto)
Home
Index