{ [P:Pi_term]. P = !pirep-body(P) supposing pirep?(P) }

{ Proof }



Definitions occuring in Statement :  pirep-body: pirep-body(x),  pirep?: pirep?(x),  pirep: !body,  pi_term: Pi_term,  assert: b,  uimplies: b supposing a,  uall: [x:A]. B[x],  equal: s = t
Definitions :  uall: [x:A]. B[x],  pi_term: Pi_term,  uimplies: b supposing a,  pirep?: pirep?(x),  pirep: !body,  pirep-body: pirep-body(x),  member: t  T,  and: P  Q,  unit: Unit,  false: False,  implies: P  Q,  it: ,  pizero: 0,  not: A,  prop: ,  picomm: pre.body,  pioption: (left + right),  pipar: (left | right),  pinew: (new name. body)
Lemmas :  pi_term_wf,  btrue_neq_bfalse,  assert_wf,  pirep?_wf,  pizero_wf,  picomm_wf,  pioption_wf,  pipar_wf,  pirep_wf,  pinew_wf,  assert_elim,  bfalse_wf

\mforall{}[P:Pi\_term].  P  =  !pirep-body(P)  supposing  \muparrow{}pirep?(P)


Date html generated: 2011_08_17-PM-06_46_11
Last ObjectModification: 2011_06_18-PM-12_16_54

Home Index