CSY/reowolf Files · examples/eg_protocols.pdl · Centrum Wiskunde & Informatica (CWI)

Files @ e7977aeccd2e

Branch filter:

Location: CSY/reowolf/examples/eg_protocols.pdl

e7977aeccd2e 374 B text/plain Show Annotation Show as Raw Download as Raw

make assert() and put() statements, test all statementlike expressions

primitive pres_2(in i, out o) {
  synchronous {
    put(o, get(i));
  }
}
primitive together(in ia, in ib, out oa, out ob){
  while(true) synchronous {
    if(fires(ia)) {
      put(oa, get(ia));
      put(ob, get(ib));
    }
  }	
}

primitive alt_round_merger(in a, in b, out c){
  while(true) {
    synchronous{ put(c, get(a)); }
    synchronous{ put(c, get(b)); }
  }	
}