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