CR-responder5{i:l}(s) ==
  B  A: ["rcv"(data(m)); 
           
           "new"(n);
            
           "sign"(<<data(n), <data(m), data(A)>>, B, s>);
            
           "send"(<data(n), data(s)>)]
          @ ["rcv"(<data(k), data(s')>)]



Definitions :  basic-seq-1-5: A  B: pas[A;B;m;n;x;y;z],  append: as @ bs,  id-sdata: data(x),  pair: <a, b>,  cons: [car / cdr],  mk-pa: n(v),  token: "$token",  sdata-pair: <d1, d2>,  atom-sdata: data(a),  nil: []
FDL editor aliases :  CR-responder5

CR-responder5\{i:l\}(s)  ==
    B  {}\mrightarrow{}  A:  ["rcv"(data(m)); 
                     
                      "new"(n);  "sign"(<<data(n),  <data(m),  data(A)>>,  B,  s>);  "send"(<data(n),  data(s)>)]
                    @  ["rcv"(<data(k),  data(s')>)]


Date html generated: 2010_08_28-AM-11_49_10
Last ObjectModification: 2010_03_20-PM-09_45_06

Home Index