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