flow-allowed{i:l}(R;dd;G;a;b;T) ==
  let S,ds,da = dd in 
  i:{i:Id| (i  S)} . j:{j:Id| (ij)G} .
    (((<(link(a i j) from i to j), b>  R-lnktags(R)))
     (kfpf-domain(da i).send-allowed(R;k;(link(a i j) from i to j);[b]))
     R-decls-compat(R;es-decl-set-single(j;;rcv((link(a i j) from i to j),b)
                                              : T)))



Definitions :  spreadn: spread3,  all: x:A. B[x],  id-graph-edge: (ij)G,  not: A,  l_member: (x  l),  pair: <a, b>,  product: x:A  B[x],  IdLnk: IdLnk,  Id: Id,  and: P  Q,  l_all: (xL.P[x]),  fpf-domain: fpf-domain(f),  set: {x:A| B[x]} ,  Knd: Knd,  hasloc: hasloc(k;i),  assert: b,  cons: [car / cdr],  nil: [],  R-decls-compat: R-decls-compat(R;dd),  es-decl-set-single: es-decl-set-single(i;ds;da),  fpf-empty: ,  fpf-single: x : v,  rcv: rcv(l,tg),  mk_lnk: (link(n) from i to j),  apply: f a
FDL editor aliases :  flow-allowed

flow-allowed\{i:l\}(R;dd;G;a;b;T)  ==
    let  S,ds,da  =  dd  in 
    \mforall{}i:\{i:Id|  (i  \mmember{}  S)\}  .  \mforall{}j:\{j:Id|  (i{}\mrightarrow{}j)\mmember{}G\}  .
        ((\mneg{}(<(link(a  i  j)  from  i  to  j),  b>  \mmember{}  R-lnktags(R)))
        \mwedge{}  (\mforall{}k\mmember{}fpf-domain(da  i).\muparrow{}send-allowed(R;k;(link(a  i  j)  from  i  to  j);[b]))
        \mwedge{}  R-decls-compat(R;es-decl-set-single(j;\motimes{};rcv((link(a  i  j)  from  i  to  j),b)  :  T)))


Date html generated: 2010_08_27-AM-09_32_31
Last ObjectModification: 2009_12_16-AM-01_10_42

Home Index