Step * 2 1 1 2 of Lemma assert-bag-all


1. : 𝔹
2. : 𝔹 List
3. (↑reduce(λx,y. (x ∧b y);tt;v))  (∀b:𝔹((b ∈ v)  tt))
⊢ (↑(u ∧b reduce(λx,y. (x ∧b y);tt;v)))  (∀b:𝔹((b ∈ [u v])  tt))
BY
((RW assert_pushdownC THENM RWO "cons_member" 0) THEN Auto THEN (-2) THEN Auto) }


Latex:


Latex:

1.  u  :  \mBbbB{}
2.  v  :  \mBbbB{}  List
3.  (\muparrow{}reduce(\mlambda{}x,y.  (x  \mwedge{}\msubb{}  y);tt;v))  {}\mRightarrow{}  (\mforall{}b:\mBbbB{}.  ((b  \mmember{}  v)  {}\mRightarrow{}  b  =  tt))
\mvdash{}  (\muparrow{}(u  \mwedge{}\msubb{}  reduce(\mlambda{}x,y.  (x  \mwedge{}\msubb{}  y);tt;v)))  {}\mRightarrow{}  (\mforall{}b:\mBbbB{}.  ((b  \mmember{}  [u  /  v])  {}\mRightarrow{}  b  =  tt))


By


Latex:
((RW  assert\_pushdownC  0  THENM  RWO  "cons\_member"  0)  THEN  Auto  THEN  D  (-2)  THEN  Auto)




Home Index