{ 
[T:Type]. 
[g:LabeledGraph(T)]. 
[a,b:
lg-size(g)].
    (lg-add(g;a;b) 
 LabeledGraph(T)) }
{ Proof }
Definitions occuring in Statement : 
lg-add: lg-add(g;a;b), 
lg-size: lg-size(g), 
labeled-graph: LabeledGraph(T), 
int_seg: {i..j
}, 
uall:
[x:A]. B[x], 
member: t 
 T, 
natural_number: $n, 
universe: Type
Definitions : 
uall:
[x:A]. B[x], 
labeled-graph: LabeledGraph(T), 
member: t 
 T, 
lg-add: lg-add(g;a;b), 
top: Top, 
all:
x:A. B[x], 
implies: P 
 Q, 
spreadn: spread3, 
le: A 
 B, 
not:
A, 
false: False, 
nat:
, 
int_seg: {i..j
}, 
lg-size: lg-size(g), 
uimplies: b supposing a, 
lelt: i 
 j < k, 
and: P 
 Q
Lemmas : 
top_wf, 
length_wf1, 
mklist_wf, 
length_wf_nat, 
int_seg_wf, 
mklist_length, 
lg-size_wf, 
nat_wf, 
labeled-graph_wf, 
select_wf, 
ifthenelse_wf, 
eq_int_wf
\mforall{}[T:Type].  \mforall{}[g:LabeledGraph(T)].  \mforall{}[a,b:\mBbbN{}lg-size(g)].    (lg-add(g;a;b)  \mmember{}  LabeledGraph(T))
Date html generated:
2011_08_16-PM-06_39_07
Last ObjectModification:
2011_06_20-AM-01_57_59
Home
Index