---

{ [A,B:'].
    C:{C:'| valueall-type(C)} . F:bag(A)  bag(B)  bag(C)  bag(C).
      [X:EClass(A)]. [Y:EClass(B)].
        (((s:bag(C)
              ((as:bag(A). (F[as;{};s] = {}))
               (bs:bag(B). (F[{};bs;s] = {}))))
          (s:bag(C). (F[{};{};s] = {})))
         NormalLProgrammable'(A;X)
         NormalLProgrammable'(B;Y)
         NormalLProgrammable'(C;F|X, Y, Prior(self)|)) }

{ Proof }

---

Definitions occuring in Statement :  Message: Message,  normal-locally-programmable: NormalLProgrammable(A;X),  rec-combined-class-2: F|X, Y, Prior(self)|,  eclass: EClass(A[eo; e]),  uall: [x:A]. B[x],  so_apply: x[s1;s2;s3],  all: x:A. B[x],  squash: T,  implies: P  Q,  or: P  Q,  and: P  Q,  set: {x:A| B[x]} ,  function: x:A  B[x],  universe: Type,  equal: s = t,  empty-bag: {},  bag: bag(T),  valueall-type: valueall-type(T)
Lemmas :  rec-combined-class2-nlp

---

\mforall{}[A,B:\mBbbU{}'].
    \mforall{}C:\{C:\mBbbU{}'|  valueall-type(C)\}  .  \mforall{}F:bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(C)  {}\mrightarrow{}  bag(C).
        \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].
            (((\mdownarrow{}\mforall{}s:bag(C).  ((\mforall{}as:bag(A).  (F[as;\{\};s]  =  \{\}))  \mwedge{}  (\mforall{}bs:bag(B).  (F[\{\};bs;s]  =  \{\}))))
              \mvee{}  (\mdownarrow{}\mforall{}s:bag(C).  (F[\{\};\{\};s]  =  \{\})))
            {}\mRightarrow{}  NormalLProgrammable'(A;X)
            {}\mRightarrow{}  NormalLProgrammable'(B;Y)
            {}\mRightarrow{}  NormalLProgrammable'(C;F|X,  Y,  Prior(self)|))


Date html generated: 2011_08_17-PM-04_09_55
Last ObjectModification: 2011_06_29-AM-11_00_24

Home Index