Nuprl Lemma : gammaFIM_id
g,h:
 List 
 
.
  (spr(g) 
 (
a:
 List. (((g a) = 0) 
 ((g (a @ [h a])) = 0))) 
 (
l:
 List. (((g l) = 0) 
 (l = gammaFIM(l;g;h)))))
Proof
Definitions occuring in Statement : 
gammaFIM: gammaFIM(a;g;h), 
append: as @ bs, 
nat:
, 
all:
x:A. B[x], 
implies: P 
 Q, 
apply: f a, 
function: x:A 
 B[x], 
natural_number: $n, 
equal: s = t
Definitions : 
all:
x:A. B[x], 
nat:
, 
implies: P 
 Q, 
gammaFIM: gammaFIM(a;g;h), 
member: t 
 T, 
prop:
, 
le: A 
 B, 
not:
A, 
false: False, 
so_lambda: 
x.t[x], 
ifthenelse: if b then t else f fi , 
btrue: tt, 
bfalse: ff, 
exists:
x:A. B[x], 
and: P 
 Q, 
rev_implies: P 
 Q, 
iff: P 

 Q, 
uall:
[x:A]. B[x], 
so_apply: x[s], 
bool:
, 
unit: Unit, 
uimplies: b supposing a, 
assert:
b, 
uiff: uiff(P;Q), 
bnot: 
b, 
or: P 
 Q, 
sq_type: SQType(T), 
guard: {T}, 
it:
Lemmas : 
equal_wf, 
nat_wf, 
le_wf, 
Error :list_wf, 
all_wf, 
append_wf, 
Error :cons_wf, 
Error :nil_wf, 
spr_wf, 
Error :list_ind_reverse_wf_dependent, 
eq_int_wf, 
subtype_rel_set_simple, 
bool_wf, 
eqtt_to_assert, 
assert_of_eq_int, 
eqff_to_assert, 
bool_cases_sqequal, 
subtype_base_sq, 
bool_subtype_base, 
Error :assert-bnot, 
neg_assert_of_eq_int, 
Error :list_ind_reverse_wf, 
spr_down_closed, 
and_wf, 
eq_int_eq_true, 
btrue_wf, 
ifthenelse_wf
\mforall{}g,h:\mBbbN{}  List  {}\mrightarrow{}  \mBbbN{}.
    (spr(g)
    {}\mRightarrow{}  (\mforall{}a:\mBbbN{}  List.  (((g  a)  =  0)  {}\mRightarrow{}  ((g  (a  @  [h  a]))  =  0)))
    {}\mRightarrow{}  (\mforall{}l:\mBbbN{}  List.  (((g  l)  =  0)  {}\mRightarrow{}  (l  =  gammaFIM(l;g;h)))))
Date html generated:
2013_03_20-AM-10_32_58
Last ObjectModification:
2013_03_08-PM-10_39_33
Home
Index