Nuprl Lemma : ranked-eo-pred
∀[L,rk:Top]. ∀[e:Top × Top].  (pred(e) ~ if snd(e)=0  then e  else <fst(e), (snd(e)) - 1>)
Proof
Definitions occuring in Statement : 
ranked-eo: ranked-eo(L;rk), 
es-pred: pred(e), 
uall: ∀[x:A]. B[x], 
top: Top, 
pi1: fst(t), 
pi2: snd(t), 
int_eq: if a=b  then c  else d, 
pair: <a, b>, 
product: x:A × B[x], 
subtract: n - m, 
natural_number: $n, 
sqequal: s ~ t
Lemmas : 
rec_select_update_lemma, 
top_wf
Latex:
\mforall{}[L,rk:Top].  \mforall{}[e:Top  \mtimes{}  Top].    (pred(e)  \msim{}  if  snd(e)=0    then  e    else  <fst(e),  (snd(e))  -  1>)
Date html generated:
2015_07_21-PM-04_44_21
Last ObjectModification:
2015_01_27-PM-04_59_48
Home
Index