---

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


1. T : Type
2. eq : EqDecider(T)
3. p : T ⟶ 𝔹
4. as : T List
5. z : ∀x:T. (x ↓∈ as ⇒ (↑p[x]))
⊢ (∀x∈map(λx.p[x];as).x)_b = tt
BY
{ ((RWO "eqtt_to_assert" 0⋅ THEN Auto) THEN RW assert_pushdownC 0 THEN Auto) }

1
1. T : Type
2. eq : EqDecider(T)
3. p : T ⟶ 𝔹
4. as : T List
5. z : ∀x:T. (x ↓∈ as ⇒ (↑p[x]))
⊢ (∀x∈map(λx.p[x];as).↑x)

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  p  :  T  {}\mrightarrow{}  \mBbbB{}
4.  as  :  T  List
5.  z  :  \mforall{}x:T.  (x  \mdownarrow{}\mmember{}  as  {}\mRightarrow{}  (\muparrow{}p[x]))
\mvdash{}  (\mforall{}x\mmember{}map(\mlambda{}x.p[x];as).x)\_b  =  tt


By

---

Latex:
((RWO  "eqtt\_to\_assert"  0\mcdot{}  THEN  Auto)  THEN  RW  assert\_pushdownC  0  THEN  Auto)

---

Home Index