Nuprl Lemma : es-before-split-last
∀[es,e:Top]. (before(e) ~ if first(e) then [] else before(pred(e)) @ [pred(e)] fi )
Proof
Definitions occuring in Statement :
es-before: before(e),
es-first: first(e),
es-pred: pred(e),
append: as @ bs,
cons: [a / b],
nil: [],
ifthenelse: if b then t else f fi ,
uall: ∀[x:A]. B[x],
top: Top,
sqequal: s ~ t
Lemmas :
top_wf
\mforall{}[es,e:Top]. (before(e) \msim{} if first(e) then [] else before(pred(e)) @ [pred(e)] fi )
Date html generated:
2015_07_17-AM-08_44_04
Last ObjectModification:
2015_01_27-PM-02_29_16
Home
Index