Step
*
of Lemma
oalist_cases
∀a:LOSet. ∀b:AbDMon. ∀Q:((|a| × |b|) List) ⟶ ℙ.
  (Q[[]]
  
⇒ (∀ws:|oal(a;b)|. ∀x:|a|. ∀y:|b|.  ((↑before(x;map(λx.(fst(x));ws))) 
⇒ (¬(y = e ∈ |b|)) 
⇒ Q[[<x, y> / ws]]))
  
⇒ {∀ws:|oal(a;b)|. Q[ws]})
BY
{ ((Unfold `guard` 0 THEN RepD) THENA Auto) }
1
1. a : LOSet
2. b : AbDMon
3. Q : ((|a| × |b|) List) ⟶ ℙ
4. Q[[]]
5. ∀ws:|oal(a;b)|. ∀x:|a|. ∀y:|b|.  ((↑before(x;map(λx.(fst(x));ws))) 
⇒ (¬(y = e ∈ |b|)) 
⇒ Q[[<x, y> / ws]])
6. ws : |oal(a;b)|
⊢ Q[ws]
Latex:
Latex:
\mforall{}a:LOSet.  \mforall{}b:AbDMon.  \mforall{}Q:((|a|  \mtimes{}  |b|)  List)  {}\mrightarrow{}  \mBbbP{}.
    (Q[[]]
    {}\mRightarrow{}  (\mforall{}ws:|oal(a;b)|.  \mforall{}x:|a|.  \mforall{}y:|b|.
                ((\muparrow{}before(x;map(\mlambda{}x.(fst(x));ws)))  {}\mRightarrow{}  (\mneg{}(y  =  e))  {}\mRightarrow{}  Q[[<x,  y>  /  ws]]))
    {}\mRightarrow{}  \{\mforall{}ws:|oal(a;b)|.  Q[ws]\})
By
Latex:
((Unfold  `guard`  0  THEN  RepD)  THENA  Auto)
Home
Index