{ [Info,A,B,C,D:Type].
    F:bag(A)  bag(B)  bag(C)  bag(D)
      [X:EClass(A)]. [Y:EClass(B)]. [Z:EClass(C)].
        (F|X, Y, Y|  EClass(D)) }

{ Proof }



Definitions occuring in Statement :  simple-comb-3: F|X, Y, Y| eclass: EClass(A[eo; e]) uall: [x:A]. B[x] all: x:A. B[x] member: t  T function: x:A  B[x] universe: Type bag: bag(T)
Lemmas :  intensional-universe_wf int_seg_properties decidable__equal_int int_subtype_base not_wf le_wf false_wf member_wf nat_wf simple-comb_wf eclass_wf bag_wf event-ordering+_wf event-ordering+_inc es-E_wf int_seg_wf select_wf length_wf_nat length_nil length_cons non_neg_length length_wf1 top_wf subtype_rel_wf es-interface-top subtype_base_sq

\mforall{}[Info,A,B,C,D:Type].
    \mforall{}F:bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(C)  {}\mrightarrow{}  bag(D)
        \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].  \mforall{}[Z:EClass(C)].    (F|X,  Y,  Y|  \mmember{}  EClass(D))


Date html generated: 2011_08_16-PM-05_00_11
Last ObjectModification: 2011_07_23-AM-10_55_50

Home Index