{ [A:']
    B:{B:'| valueall-type(B)} . F:Id  bag(A)  bag(B)  bag(B).
      [X:EClass(A)]
        NormalLProgrammable'(A;X)
         NormalLProgrammable'(B;rec-combined-loc-class-1(F;X)) 
        supposing l:Id. s:bag(B).  (F[l;{};s] = {}) }

{ Proof }



Definitions occuring in Statement :  Message: Message,  normal-locally-programmable: NormalLProgrammable(A;X),  rec-combined-loc-class-1: rec-combined-loc-class-1(F;X),  eclass: EClass(A[eo; e]),  Id: Id,  uimplies: b supposing a,  uall: [x:A]. B[x],  so_apply: x[s1;s2;s3],  all: x:A. B[x],  implies: 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-loc-class1-nlp

\mforall{}[A:\mBbbU{}']
    \mforall{}B:\{B:\mBbbU{}'|  valueall-type(B)\}  .  \mforall{}F:Id  {}\mrightarrow{}  bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(B).
        \mforall{}[X:EClass(A)]
            NormalLProgrammable'(A;X)  {}\mRightarrow{}  NormalLProgrammable'(B;rec-combined-loc-class-1(F;X)) 
            supposing  \mforall{}l:Id.  \mforall{}s:bag(B).    (F[l;\{\};s]  =  \{\})


Date html generated: 2011_08_17-PM-04_09_08
Last ObjectModification: 2011_07_15-PM-03_09_52

Home Index