{ 
[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