anchor.diff:          Expr.Sequential(exprAction,exprState) 
   
   
  +let invokeCodeOnRequest = 
  +    let hello = "hello"
  +    <@@ printing "In request ..." hello  @@>
  +
  +let invokeCodeOnAccept = 
  +    let hello = "hello"
  +    <@@ printing "In accept ..." hello  @@>
  +
   let invokeCodeOnReceive (args:Expr list) (payload: ScribbleProtocole.Payload [])  (payloadDelim: string List) 
                          (labelDelim : string List)  (endDelim: string List)  (nameLabel:string) (message: byte[]) 
                           exprState role fullName = 
  
positive.code:     sb.Append("</summary>") |> ignore
      sb.ToString()
  
  let generateMethod aType (methodName:string) listParam nextType (errorMessage:string) 
                     (event: ScribbleProtocole.Root) exprState role = 
      
      let fullName = event.Label
      let nameLabel = fullName.Replace("(","").Replace(")","")
      let labelDelim, payloadDelim, endDelim = getDelims fullName
      let decode = new System.Text.UTF8Encoding()
      let message = Array.append (decode.GetBytes(fullName)) (decode.GetBytes(labelDelim.Head))
  
      match methodName with
          |"send" -> 
              let myMethod = 
                  ProvidedMethod(methodName+nameLabel, listParam, nextType,
                      IsStaticMethod = false,
  
negative.code:                 |> addMethod myMethod
                  |> ignore
          |"receive" ->  
              let labelDelim, payloadDelim, endDelim = getDelims fullName
              let decode = new System.Text.UTF8Encoding()
              let message = Array.append (decode.GetBytes(fullName)) (decode.GetBytes(labelDelim.Head))
  
              let myMethod = 
                  ProvidedMethod(methodName+nameLabel,listParam,nextType,
                      IsStaticMethod = false,
  