{ 
[A,B:
'].
    
C:{C:
'| valueall-type(C)} . 
F:Id 
 bag(A) 
 bag(B) 
 bag(C).
      
[X:EClass(A)]. 
[Y:EClass(B)].
        (((
l:Id
              ((
as:bag(A). ((F l as {}) = {}))
              
 (
bs:bag(B). ((F l {} bs) = {}))))
         
 (
l:Id. ((F l {} {}) = {})))
        
 NormalLProgrammable'(A;X)
        
 NormalLProgrammable'(B;Y)
        
 NormalLProgrammable'(C;F|Loc,X, Y|)) }
{ Proof }
Definitions occuring in Statement : 
Message: Message, 
normal-locally-programmable: NormalLProgrammable(A;X), 
simple-loc-comb-2: F|Loc,X, Y|, 
eclass: EClass(A[eo; e]), 
Id: Id, 
uall:
[x:A]. B[x], 
all:
x:A. B[x], 
squash:
T, 
implies: P 
 Q, 
or: P 
 Q, 
and: 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-comb2-nlp
\mforall{}[A,B:\mBbbU{}'].
    \mforall{}C:\{C:\mBbbU{}'|  valueall-type(C)\}  .  \mforall{}F:Id  {}\mrightarrow{}  bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(C).
        \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].
            (((\mdownarrow{}\mforall{}l:Id.  ((\mforall{}as:bag(A).  ((F  l  as  \{\})  =  \{\}))  \mwedge{}  (\mforall{}bs:bag(B).  ((F  l  \{\}  bs)  =  \{\}))))
              \mvee{}  (\mdownarrow{}\mforall{}l:Id.  ((F  l  \{\}  \{\})  =  \{\})))
            {}\mRightarrow{}  NormalLProgrammable'(A;X)
            {}\mRightarrow{}  NormalLProgrammable'(B;Y)
            {}\mRightarrow{}  NormalLProgrammable'(C;F|Loc,X,  Y|))
Date html generated:
2011_08_17-PM-04_09_39
Last ObjectModification:
2011_06_29-PM-10_56_34
Home
Index