Nuprl Definition : pv8_p1_on_p2b

pv8_p1_on_p2b() ==
  bnum,z.
   let a,b' = z 
   in waitfor.if eqof(union-deq(  Id;Unit;product-deq(;Id;IntDeq;IdDeq);unit-deq())) bnum b'
               then waitfor - a
               else waitfor
               fi 



Definitions occuring in Statement :  id-deq: IdDeq Id: Id ifthenelse: if b then t else f fi  unit: Unit apply: f a lambda: x.A[x] spread: spread def product: x:A  B[x] int: bag-remove: bs - x union-deq: union-deq(A;B;a;b) product-deq: product-deq(A;B;a;b) unit-deq: unit-deq() int-deq: IntDeq eqof: eqof(d)
FDL editor aliases :  pv8_p1_on_p2b

pv8\_p1\_on\_p2b()  ==
    \mlambda{}bnum,z.
      let  a,b'  =  z 
      in  \mlambda{}waitfor.if  eqof(union-deq(\mBbbZ{}  \mtimes{}  Id;Unit;product-deq(\mBbbZ{};Id;IntDeq;IdDeq);unit-deq()))  bnum  b'
                              then  waitfor  -  a
                              else  waitfor
                              fi 


Date html generated: 2012_02_20-PM-07_26_54
Last ObjectModification: 2012_02_06-PM-01_45_15

Home Index