Step * 2 1 of Lemma list_split_wf

.....equality..... 
1. Type
2. (T List) ⟶ 𝔹
3. : ℕ
4. List
5. ∀L1:T List
     (||L1|| < ||L||
      (list_split(f;L1) ∈ {p:T List List × (T List)| let LL,L2 in is_list_splitting(T;L1;LL;L2;f)} ))
6. ¬↑null(L)
⊢ firstn(||L|| 1;L) [last(L)]
BY
TACTIC:(BLemma `last-lemma-sq`  THEN Auto) }


Latex:


Latex:
.....equality..... 
1.  T  :  Type
2.  f  :  (T  List)  {}\mrightarrow{}  \mBbbB{}
3.  n  :  \mBbbN{}
4.  L  :  T  List
5.  \mforall{}L1:T  List
          (||L1||  <  ||L||
          {}\mRightarrow{}  (list\_split(f;L1)  \mmember{}  \{p:T  List  List  \mtimes{}  (T  List)| 
                                                          let  LL,L2  =  p 
                                                          in  is\_list\_splitting(T;L1;LL;L2;f)\}  ))
6.  \mneg{}\muparrow{}null(L)
\mvdash{}  L  \msim{}  firstn(||L||  -  1;L)  @  [last(L)]


By


Latex:
TACTIC:(BLemma  `last-lemma-sq`    THEN  Auto)




Home Index