{ 
[P:Pi_term]. pi-rank(P) = (pi-rank(pirep-body(P)) + 1) supposing 
pirep?(P) }
{ Proof }
Definitions occuring in Statement :
pi-rank: pi-rank(p),
pirep-body: pirep-body(x),
pirep?: pirep?(x),
pi_term: Pi_term,
assert: b,
nat: 
,
uimplies: b supposing a,
uall: [x:A]. B[x],
add: n + m,
natural_number: $n,
equal: s = t
Definitions :
uall: [x:A]. B[x],
uimplies: b supposing a,
member: t 
T,
prop: 
,
and: P 
Q
Lemmas :
assert_wf,
pirep?_wf,
pi_term_wf,
pi-rep-decompose,
rank-rep,
pirep-body_wf,
pi-rank_wf,
nat_wf
\mforall{}[P:Pi\_term]. pi-rank(P) = (pi-rank(pirep-body(P)) + 1) supposing \muparrow{}pirep?(P)
Date html generated:
2011_08_17-PM-06_48_01
Last ObjectModification:
2011_06_18-PM-12_20_06
Home
Index