Step
*
1
3
1
1
1
1
2
of Lemma
longer-list-not-member
1. T : Type
2. eq : ∀x,y:T.  Dec(x = y ∈ T)@i
3. u : T@i
4. v : T List@i
5. ∀L1:T List. (no_repeats(T;L1) 
⇒ no_repeats(T;v) 
⇒ (||v|| > ||L1||) 
⇒ (∃x:T. ((x ∈ v) ∧ (¬(x ∈ L1)))))@i
6. x : T
7. ¬(x = u ∈ T)
8. u1 : T@i
9. v1 : T List@i
10. (x ∈ v1) 
⇒ (x ∈ remove-first(λt.isl(eq t u);v1))@i
11. (x ∈ v1)
⊢ (x ∈ if isl(eq u1 u) then v1 else [u1 / remove-first(λt.isl(eq t u);v1)] fi )
BY
{ ThinTrivial }
1
1. T : Type
2. eq : ∀x,y:T.  Dec(x = y ∈ T)@i
3. u : T@i
4. v : T List@i
5. ∀L1:T List. (no_repeats(T;L1) 
⇒ no_repeats(T;v) 
⇒ (||v|| > ||L1||) 
⇒ (∃x:T. ((x ∈ v) ∧ (¬(x ∈ L1)))))@i
6. x : T
7. ¬(x = u ∈ T)
8. u1 : T@i
9. v1 : T List@i
10. (x ∈ v1)
11. (x ∈ remove-first(λt.isl(eq t u);v1))@i
⊢ (x ∈ if isl(eq u1 u) then v1 else [u1 / remove-first(λt.isl(eq t u);v1)] fi )
Latex:
Latex:
1.  T  :  Type
2.  eq  :  \mforall{}x,y:T.    Dec(x  =  y)@i
3.  u  :  T@i
4.  v  :  T  List@i
5.  \mforall{}L1:T  List
          (no\_repeats(T;L1)  {}\mRightarrow{}  no\_repeats(T;v)  {}\mRightarrow{}  (||v||  >  ||L1||)  {}\mRightarrow{}  (\mexists{}x:T.  ((x  \mmember{}  v)  \mwedge{}  (\mneg{}(x  \mmember{}  L1)))))@i
6.  x  :  T
7.  \mneg{}(x  =  u)
8.  u1  :  T@i
9.  v1  :  T  List@i
10.  (x  \mmember{}  v1)  {}\mRightarrow{}  (x  \mmember{}  remove-first(\mlambda{}t.isl(eq  t  u);v1))@i
11.  (x  \mmember{}  v1)
\mvdash{}  (x  \mmember{}  if  isl(eq  u1  u)  then  v1  else  [u1  /  remove-first(\mlambda{}t.isl(eq  t  u);v1)]  fi  )
By
Latex:
ThinTrivial
Home
Index