Step * 1 1 1 1 1 1 of Lemma fset-find_wf


1. Type
2. eq EqDecider(T)
3. T ⟶ 𝔹
4. Base
5. s ∈ List
6. ∃x:T. ((x ∈ s) ∧ (↑(P x)))
⊢ hd(filter(P;s)) ∈ {x:T| (x ∈ s) ∧ (↑(P x))} 
BY
((InstLemma `filter_type` [⌜{x:T| (x ∈ s)} ⌝;⌜P⌝;⌜s⌝]⋅ THENA Auto)
   THEN SubsumeC ⌜{x:{x:T| (x ∈ s)} | ↑(P x)} ⌝⋅
   THEN Auto
   THEN Try (((D THENA Auto) THEN -1 THEN -2 THEN Complete (Auto)))) }

1
1. Type
2. eq EqDecider(T)
3. T ⟶ 𝔹
4. Base
5. s ∈ List
6. ∃x:T. ((x ∈ s) ∧ (↑(P x)))
7. filter(P;s) ∈ {x:{x:T| (x ∈ s)} | ↑(P x)}  List
⊢ ||filter(P;s)|| ≥ 


Latex:


Latex:

1.  T  :  Type
2.  eq  :  EqDecider(T)
3.  P  :  T  {}\mrightarrow{}  \mBbbB{}
4.  s  :  Base
5.  s  \mmember{}  T  List
6.  \mexists{}x:T.  ((x  \mmember{}  s)  \mwedge{}  (\muparrow{}(P  x)))
\mvdash{}  hd(filter(P;s))  \mmember{}  \{x:T|  (x  \mmember{}  s)  \mwedge{}  (\muparrow{}(P  x))\} 


By


Latex:
((InstLemma  `filter\_type`  [\mkleeneopen{}\{x:T|  (x  \mmember{}  s)\}  \mkleeneclose{};\mkleeneopen{}P\mkleeneclose{};\mkleeneopen{}s\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  SubsumeC  \mkleeneopen{}\{x:\{x:T|  (x  \mmember{}  s)\}  |  \muparrow{}(P  x)\}  \mkleeneclose{}\mcdot{}
  THEN  Auto
  THEN  Try  (((D  0  THENA  Auto)  THEN  D  -1  THEN  D  -2  THEN  Complete  (Auto))))




Home Index