Step
*
1
of Lemma
fpf-join-idempotent
.....equality..... 
1. A : Type
2. B : A ─→ Type
3. d : A List
4. f1 : a:{a:A| (a ∈ d)}  ─→ B[a]
5. eq : EqDecider(A)
⊢ filter(λa.(¬ba ∈b d));d) ~ []
BY
{ (BLemma `filter_is_nil` THEN Auto) }
1
1. A : Type
2. B : A ─→ Type
3. d : A List
4. f1 : a:{a:A| (a ∈ d)}  ─→ B[a]
5. eq : EqDecider(A)
⊢ (∀x∈d.¬↑((λa.(¬ba ∈b d))) x))
Latex:
.....equality..... 
1.  A  :  Type
2.  B  :  A  {}\mrightarrow{}  Type
3.  d  :  A  List
4.  f1  :  a:\{a:A|  (a  \mmember{}  d)\}    {}\mrightarrow{}  B[a]
5.  eq  :  EqDecider(A)
\mvdash{}  filter(\mlambda{}a.(\mneg{}\msubb{}a  \mmember{}\msubb{}  d));d)  \msim{}  []
By
(BLemma  `filter\_is\_nil`  THEN  Auto)
Home
Index