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