{ 
[T:Type]. 
[R:T 
 T 
 
].
    (SWellFounded(x R y)
    
 (
x,y:T.  Dec(x R y))
    
 rel_finite(T;R)
    
 rel_finite(T;
x,y.(x (R^*) y))) }
{ Proof }
Definitions occuring in Statement : 
decidable: Dec(P), 
uall:
[x:A]. B[x], 
prop:
, 
infix_ap: x f y, 
all:
x:A. B[x], 
implies: P 
 Q, 
lambda:
x.A[x], 
function: x:A 
 B[x], 
universe: Type, 
rel_star: R^*, 
rel_finite: rel_finite(T;R), 
strongwellfounded: SWellFounded(R[x; y])
Definitions : 
uall:
[x:A]. B[x], 
prop:
, 
implies: P 
 Q, 
infix_ap: x f y, 
all:
x:A. B[x], 
rel_finite: rel_finite(T;R), 
member: t 
 T, 
exists:
x:A. B[x], 
so_lambda: 
x y.t[x; y], 
or: P 
 Q, 
guard: {T}, 
iff: P 

 Q, 
and: P 
 Q, 
rev_implies: P 
 Q, 
so_apply: x[s1;s2]
Lemmas : 
rel_plus_finite, 
rel-star-iff-rel-plus-or, 
cons_member, 
rel_star_wf, 
l_member_wf, 
rel_finite_wf, 
decidable_wf, 
strongwellfounded_wf
\mforall{}[T:Type].  \mforall{}[R:T  {}\mrightarrow{}  T  {}\mrightarrow{}  \mBbbP{}].
    (SWellFounded(x  R  y)
    {}\mRightarrow{}  (\mforall{}x,y:T.    Dec(x  R  y))
    {}\mRightarrow{}  rel\_finite(T;R)
    {}\mRightarrow{}  rel\_finite(T;\mlambda{}x,y.(x  rel\_star(T;  R)  y)))
Date html generated:
2011_08_16-AM-10_18_46
Last ObjectModification:
2011_06_18-AM-09_07_38
Home
Index