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

{ Proof }



Definitions occuring in Statement :  Message: Message normal-locally-programmable: NormalLProgrammable(A;X) simple-loc-comb-1: simple-loc-comb-1(F;X) eclass: EClass(A[eo; e]) Id: Id uimplies: b supposing a uall: [x:A]. B[x] all: x:A. B[x] implies: P  Q set: {x:A| B[x]}  apply: f a function: x:A  B[x] universe: Type equal: s = t empty-bag: {} bag: bag(T) valueall-type: valueall-type(T)
Lemmas :  simple-loc-comb1-nlp

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


Date html generated: 2011_08_17-PM-04_08_18
Last ObjectModification: 2011_06_29-PM-06_21_22

Home Index