TaggedWithComb(A;B;test) ==
  SimpleComb1(T.T 
r (A 
 B);T.B;v.if (bag-size(v) =
 1)
  then let a,b = only(v) 
       in if test a then {b} else {} fi 
  else {}
  fi )
Definitions occuring in Statement : 
SimpleComb1: SimpleComb1(T1.P1[T1];T.F[T];a.H[a]), 
subtype_rel: A 
r B, 
eq_int: (i =
 j), 
ifthenelse: if b then t else f fi , 
apply: f a, 
spread: spread def, 
product: x:A 
 B[x], 
natural_number: $n, 
bag-only: only(bs), 
bag-size: bag-size(bs), 
single-bag: {x}, 
empty-bag: {}
Definitions : 
SimpleComb1: SimpleComb1(T1.P1[T1];T.F[T];a.H[a]), 
subtype_rel: A 
r B, 
product: x:A 
 B[x], 
eq_int: (i =
 j), 
bag-size: bag-size(bs), 
natural_number: $n, 
spread: spread def, 
bag-only: only(bs), 
ifthenelse: if b then t else f fi , 
apply: f a, 
single-bag: {x}, 
empty-bag: {}
FDL editor aliases : 
TaggedWithComb
TaggedWithComb(A;B;test)  ==
    SimpleComb1(T.T  \msubseteq{}r  (A  \mtimes{}  B);T.B;v.if  (bag-size(v)  =\msubz{}  1)
    then  let  a,b  =  only(v) 
              in  if  test  a  then  \{b\}  else  \{\}  fi 
    else  \{\}
    fi  )
Date html generated:
2011_08_17-PM-06_29_50
Last ObjectModification:
2011_01_22-PM-10_13_49
Home
Index