Nuprl Lemma : append-normal-form
∀[A,B:Top].  (rec-case(A) of [] => B | a::_ => r.[a / r] ~ A @ B)
Proof
Definitions occuring in Statement : 
append: as @ bs, 
list_ind: list_ind, 
cons: [a / b], 
uall: ∀[x:A]. B[x], 
top: Top, 
sqequal: s ~ t
Definitions unfolded in proof : 
uall: ∀[x:A]. B[x], 
member: t ∈ T, 
list_ind: list_ind, 
cons: [a / b], 
append: as @ bs
Latex:
\mforall{}[A,B:Top].    (rec-case(A)  of  []  =>  B  |  a::$_{}$  =>  r.[a  /  r]  \msim{}  A  @  B)
Date html generated:
2016_05_16-AM-11_02_21
Last ObjectModification:
2016_01_07-PM-11_53_46
Theory : event-ordering
Home
Index