{ 
[M:Type 
Type]
r:pRunType(P.M[P])
SWellFounded(x run-lt(r) y)
supposing e:runEvents(r)
((fst(fst(run-info(r;e)))) < run-event-step(e)) }
{ Proof }
Definitions occuring in Statement :
run-lt: run-lt(r),
run-event-step: run-event-step(e),
runEvents: runEvents(r),
run-info: run-info(r;e),
pRunType: pRunType(T.M[T]),
uimplies: b supposing a,
uall: [x:A]. B[x],
infix_ap: x f y,
so_apply: x[s],
pi1: fst(t),
all: x:A. B[x],
less_than: a < b,
function: x:A B[x],
universe: Type,
strongwellfounded: SWellFounded(R[x; y])
Definitions :
uall: [x:A]. B[x],
all: x:A. B[x],
so_apply: x[s],
uimplies: b supposing a,
strongwellfounded: SWellFounded(R[x; y]),
infix_ap: x f y,
member: t 
T,
so_lambda: 
x.t[x],
exists: 
x:A. B[x],
implies: P 
Q,
prop: 
,
top: Top,
subtype: S 
T,
nat: 
,
guard: {T}
Lemmas :
run-lt-step-less,
runEvents_wf,
run-event-step_wf,
run-lt_wf,
nat_wf,
pi1_wf_top,
top_wf,
run-info_wf,
Id_wf,
pMsg_wf,
pRunType_wf
\mforall{}[M:Type {}\mrightarrow{} Type]
\mforall{}r:pRunType(P.M[P])
SWellFounded(x run-lt(r) y)
supposing \mforall{}e:runEvents(r). ((fst(fst(run-info(r;e)))) < run-event-step(e))
Date html generated:
2011_08_17-PM-03_37_47
Last ObjectModification:
2011_06_18-AM-11_19_13
Home
Index