{ 
es:EO
    
[T:Type]
      
f:T 
 T. ((
x:T. f x c
 x) 
 retraction(T;f)) 
      supposing strong-subtype(T;E) }
{ Proof }
Definitions occuring in Statement : 
es-causle: e c
 e', 
es-E: E, 
event_ordering: EO, 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
all:
x:A. B[x], 
implies: P 
 Q, 
apply: f a, 
function: x:A 
 B[x], 
universe: Type, 
strong-subtype: strong-subtype(A;B), 
retraction: retraction(T;f)
Definitions : 
intensional-universe: IType, 
record: record(x.T[x]), 
es-causl: (e < e'), 
sq_stable: SqStable(P), 
pair: <a, b>, 
so_apply: x[s], 
guard: {T}, 
l_member: (x 
 l), 
assert:
b, 
so_lambda: 
x.t[x], 
fpf: a:A fp-> B[a], 
apply: f a, 
eq_atom: x =a y, 
eq_atom: eq_atom$n(x;y), 
record-select: r.x, 
infix_ap: x f y, 
dep-isect: Error :dep-isect, 
record+: record+, 
le: A 
 B, 
ge: i 
 j , 
not:
A, 
and: P 
 Q, 
uiff: uiff(P;Q), 
less_than: a < b, 
union: left + right, 
or: P 
 Q, 
es-causle: e c
 e', 
event_ordering: EO, 
universe: Type, 
uimplies: b supposing a, 
prop:
, 
retraction: retraction(T;f), 
exists:
x:A. B[x], 
nat:
, 
set: {x:A| B[x]} , 
strong-subtype: strong-subtype(A;B), 
cand: A c
 B, 
product: x:A 
 B[x], 
subtype_rel: A 
r B, 
es-E: E, 
uall:
[x:A]. B[x], 
isect:
x:A. B[x], 
member: t 
 T, 
equal: s = t, 
all:
x:A. B[x], 
function: x:A 
 B[x], 
implies: P 
 Q, 
MaAuto: Error :MaAuto, 
CollapseTHEN: Error :CollapseTHEN, 
Try: Error :Try, 
strongwellfounded: SWellFounded(R[x; y]), 
Auto: Error :Auto, 
CollapseTHENA: Error :CollapseTHENA, 
void: Void, 
real:
, 
false: False, 
iff: P 

 Q, 
atom: Atom, 
int_seg: {i..j
}, 
bool:
, 
quotient: x,y:A//B[x; y], 
divides: b | a, 
assoced: a ~ b, 
set_car: |p|, 
set_leq: a 
 b, 
set_lt: a <p b, 
grp_car: |g|, 
grp_lt: a < b, 
rng_car: |r|, 
unit: Unit, 
int:
, 
nat_plus: 
, 
l_contains: A 
 B, 
inject: Inj(A;B;f), 
reducible: reducible(a), 
prime: prime(a), 
squash:
T, 
l_exists: (
x
L. P[x]), 
l_all: (
x
L.P[x]), 
fun-connected: y is f*(x), 
limited-type: LimitedType, 
rationals:
, 
qle: r 
 s, 
qless: r < s, 
q-rel: q-rel(r;x), 
atom: Atom$n, 
i-finite: i-finite(I), 
i-closed: i-closed(I), 
p-outcome: Outcome, 
dstype: dstype(TypeNames; d; a), 
fset-member: a 
 s, 
f-subset: xs 
 ys, 
fset: FSet{T}, 
fset-closed: (s closed under fs), 
string: Error :string, 
Id: Id, 
IdLnk: IdLnk, 
Knd: Knd, 
MaName: MaName, 
l_disjoint: l_disjoint(T;l1;l2), 
consensus-state3: consensus-state3(T), 
cs-not-completed: in state s, a has not completed inning i, 
cs-archived: by state s, a archived v in inning i, 
cs-passed: by state s, a passed inning i without archiving a value, 
cs-inning-committed: in state s, inning i has committed v, 
cs-inning-committable: in state s, inning i could commit v , 
cs-archive-blocked: in state s, ws' blocks ws from archiving v in inning i, 
cs-precondition: state s may consider v in inning i, 
consensus-rcv: consensus-rcv(V;A), 
decidable: Dec(P), 
es-locl: (e <loc e'), 
list: type List, 
top: Top, 
true: True, 
fpf-cap: f(x)?z, 
subtype: S 
 T, 
suptype: suptype(S; T), 
D: Error :D, 
tactic: Error :tactic
Lemmas : 
subtype_rel_function, 
subtype_rel_self, 
decidable__lt, 
es-causl-swellfnd, 
retraction_wf, 
nat_wf, 
es-causle_wf, 
strong-subtype_witness, 
es-E_wf, 
strong-subtype_wf, 
event_ordering_wf, 
uall_wf, 
subtype_rel_wf, 
member_wf, 
uiff_inversion, 
assert_wf, 
intensional-universe_wf, 
es-causl_wf
\mforall{}es:EO.  \mforall{}[T:Type].  \mforall{}f:T  {}\mrightarrow{}  T.  ((\mforall{}x:T.  f  x  c\mleq{}  x)  {}\mRightarrow{}  retraction(T;f))  supposing  strong-subtype(T;E)
Date html generated:
2011_08_16-AM-10_32_22
Last ObjectModification:
2011_06_18-AM-09_13_58
Home
Index