{ 
[x:Pi_term]. pioption-right(x) 
Pi_term supposing 
pioption?(x) }
{ Proof }
Definitions occuring in Statement :
pioption-right: pioption-right(x),
pioption?: pioption?(x),
pi_term: Pi_term,
assert: b,
uimplies: b supposing a,
uall: [x:A]. B[x],
member: t T
Definitions :
uall: [x:A]. B[x],
pi_term: Pi_term,
uimplies: b supposing a,
assert: b,
pioption?: pioption?(x),
member: t T,
pioption-right: pioption-right(x),
implies: P 
Q,
bfalse: ff,
btrue: tt,
ifthenelse: if b then t else f fi ,
unit: Unit,
false: False,
it: 
,
pizero: 0,
prop: 
,
picomm: pre.body,
pioption: (left + right),
pipar: (left | right),
pirep: !body,
pinew: (new name. body)
Lemmas :
pi_term_wf,
false_wf,
true_wf,
assert_wf,
pioption?_wf
\mforall{}[x:Pi\_term]. pioption-right(x) \mmember{} Pi\_term supposing \muparrow{}pioption?(x)
Date html generated:
2011_08_17-PM-06_43_50
Last ObjectModification:
2011_06_18-PM-12_12_10
Home
Index