Nuprl Lemma : sqequal-append-cbva-weak3
∀[a:Top List]. ∀[b,F:Top]. (let u ←─ a in let v ←─ b in let x ←─ u @ v in F[x] ~ let x ←─ a @ b in F[x])
Proof
Definitions occuring in Statement :
append: as @ bs,
list: T List,
callbyvalueall: callbyvalueall,
uall: ∀[x:A]. B[x],
top: Top,
so_apply: x[s],
sqequal: s ~ t
Lemmas :
sqequal-append-cbva-weak2,
top_wf,
list_wf
\mforall{}[a:Top List]. \mforall{}[b,F:Top].
(let u \mleftarrow{}{} a
in let v \mleftarrow{}{} b
in let x \mleftarrow{}{} u @ v
in F[x] \msim{} let x \mleftarrow{}{} a @ b
in F[x])
Date html generated:
2015_07_17-AM-08_17_09
Last ObjectModification:
2015_01_27-AM-11_51_03
Home
Index