Nuprl Lemma : lg-append_assoc

[T:Type]. ∀[a,b,c:LabeledGraph(T)].  (lg-append(a;lg-append(b;c)) lg-append(lg-append(a;b);c))


Proof




Definitions occuring in Statement :  lg-append: lg-append(g1;g2) labeled-graph: LabeledGraph(T) uall: [x:A]. B[x] universe: Type sqequal: t
Lemmas :  length_wf_nat top_wf dep-isect-subtype list_wf int_seg_wf length_wf subtype_rel_list nat_wf subtype_rel_product labeled-graph_wf map_append_sq map-map append_assoc_sq nat_properties less_than_transitivity1 less_than_irreflexivity ge_wf less_than_wf equal-wf-T-base colength_wf_list list-cases map_nil_lemma product_subtype_list spread_cons_lemma sq_stable__le le_antisymmetry_iff add_functionality_wrt_le add-associates add-zero zero-add le-add-cancel decidable__le false_wf not-le-2 condition-implies-le minus-add minus-one-mul add-commutes le_wf subtract_wf not-ge-2 less-iff-le minus-minus add-swap subtype_base_sq set_subtype_base int_subtype_base map_cons_lemma equal-wf-base list_subtype_base length-append length-map-sq value-type-has-value int-value-type subtype_top has-value_wf_base

Latex:
\mforall{}[T:Type].  \mforall{}[a,b,c:LabeledGraph(T)].    (lg-append(a;lg-append(b;c))  \msim{}  lg-append(lg-append(a;b);c))



Date html generated: 2015_07_22-PM-00_27_46
Last ObjectModification: 2015_01_28-PM-11_34_15

Home Index