---

Step * 1 1 1 of Lemma length-list-diff


1. T : Type
2. eq : EqDecider(T)
3. as : T List
4. bs : T List
5. ||filter(λa.(¬ba ∈b bs);as)|| ≤ ||as||
6. ∃a:T. ((a ∈ as) ∧ (a ∈ bs))
⊢ (∃x∈as. ¬↑¬bx ∈b bs)
BY
{ (ExRepD
   THEN D (-2)
   THEN With ⌜i⌝ (D 0)⋅
   THEN Auto
   THEN D (-2)
   THEN RevHypSubst (-2) 0
   THEN Auto
   THEN RW assert_pushdownC 0
   THEN Auto
   THEN D 0
   THEN Auto) }

---

Latex:

---

Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  as  :  T  List
4.  bs  :  T  List
5.  ||filter(\mlambda{}a.(\mneg{}\msubb{}a  \mmember{}\msubb{}  bs);as)||  \mleq{}  ||as||
6.  \mexists{}a:T.  ((a  \mmember{}  as)  \mwedge{}  (a  \mmember{}  bs))
\mvdash{}  (\mexists{}x\mmember{}as.  \mneg{}\muparrow{}\mneg{}\msubb{}x  \mmember{}\msubb{}  bs)


By

---

Latex:
(ExRepD
  THEN  D  (-2)
  THEN  With  \mkleeneopen{}i\mkleeneclose{}  (D  0)\mcdot{}
  THEN  Auto
  THEN  D  (-2)
  THEN  RevHypSubst  (-2)  0
  THEN  Auto
  THEN  RW  assert\_pushdownC  0
  THEN  Auto
  THEN  D  0
  THEN  Auto)

---

Home Index