{ [s:Name]. [avoid:Name List].
    (maybe-new(s;avoid)  {s':Name| (s'  avoid)} ) }

{ Proof }



Definitions occuring in Statement :  maybe-new: maybe-new(s;avoid),  name: Name,  uall: [x:A]. B[x],  not: A,  member: t  T,  set: {x:A| B[x]} ,  list: type List,  l_member: (x  l)
Definitions :  uall: [x:A]. B[x],  name: Name,  member: t  T,  maybe-new: maybe-new(s;avoid),  name-deq: NameDeq,  all: x:A. B[x],  so_lambda: x.t[x],  nat: ,  exists: x:A. B[x],  not: A,  cand: A c B,  le: A  B,  implies: P  Q,  false: False,  pi1: fst(t),  top: Top,  subtype: S  T,  int_seg: {i..j},  lelt: i  j < k,  and: P  Q,  inject: Inj(A;B;f),  prop: ,  squash: T,  true: True,  or: P  Q,  ifthenelse: if b then t else f fi ,  btrue: tt,  bfalse: ff,  let: let,  rev_implies: P  Q,  iff: P  Q,  uimplies: b supposing a,  so_apply: x[s],  decidable: Dec(P),  l_member: (x  l),  guard: {T},  bool: ,  unit: Unit,  it:
Lemmas :  nat_wf,  assert_wf,  bnot_wf,  deq-member_wf,  list-deq_wf,  atom-deq_wf,  append_wf,  nat-to-str_wf,  not_wf,  l_member_wf,  exists_functionality_wrt_iff,  iff_transitivity,  iff_weakening_uiff,  assert_of_bnot,  not_functionality_wrt_iff,  assert-deq-member,  decidable__ex_int_seg,  add_wf,  length_wf1,  le_wf,  int_seg_wf,  decidable__not,  decidable__l_member,  decidable__equal_list,  decidable__atom_equal,  select_wf,  pigeon-hole,  non_neg_length,  length_wf_nat,  top_wf,  squash_wf,  general-append-cancellation,  str-to-nat-to-str,  str-to-nat_wf,  true_wf,  bool_wf,  eqtt_to_assert,  eqff_to_assert,  mu-property,  mu_wf

\mforall{}[s:Name].  \mforall{}[avoid:Name  List].    (maybe-new(s;avoid)  \mmember{}  \{s':Name|  \mneg{}(s'  \mmember{}  avoid)\}  )


Date html generated: 2011_08_10-AM-07_43_09
Last ObjectModification: 2011_06_18-AM-08_09_50

Home Index