anchor.diff:  
   let stdin_Close =
       let json           = """{ "Row" : 1 ,"Col": 6, "Line": "stdin.", "FilePath" : "./dummy.fsx", "Source" : "", "Init":"false"}"""
  -    replyer.Send(json)
  -    System.Threading.Thread.Sleep 500
  -    let stdinMethods   = ( decode64( replyer.recieveData().Data ) ).Split('\n') |> fun ary -> ary.[0]
  +    // replyer.Send(json)
  +    // System.Threading.Thread.Sleep 500
  +    let stdinMethods   = ( decode64( replyer.sendRecieve(json).Data ) ).Split('\n') |> fun ary -> ary.[0]
       let resultString   = JsonConvert.DeserializeObject<deopletefs.JsonFormat>(stdinMethods).word
       let expectedString = "Close"
       check expectedString resultString
   
   let oneWordHints_AbstractClassAttribute =
       let json           = """{ "Row" : 1 ,"Col": 1, "Line": "a", "FilePath" : "./dummy.fsx", "Source" : "", "Init":"false"}"""
  -    replyer.Send(json)
  -    System.Threading.Thread.Sleep 500
  -    let filteredByA    = ( decode64( replyer.recieveData().Data ) ).Split('\n') |> fun ary -> ary.[0]
  +    // replyer.Send(json)
  +    // System.Threading.Thread.Sleep 500
  +    let filteredByA    = ( decode64( replyer.sendRecieve(json).Data ) ).Split('\n') |> fun ary -> ary.[0]
       let resultString   = JsonConvert.DeserializeObject<deopletefs.JsonFormat>(filteredByA).word
       let expectedString = "AbstractClassAttribute"
       check expectedString resultString
  
positive.code:   member this.Send(message:string) =
      ps.StandardInput.WriteLine(message)
  
    // 子プロセスを終了する
    member this.Quit() =
      ps.Kill()
  
    member this.recieveData() :DataReceivedEventArgs =
      snd ( cq.TryDequeue() )
  
  
  
negative.code: open deopletefs.FSharpIntellisence
  
  let check  x y  =
    stdout.WriteLine " ----------------------------------- "
    if x = y then
      "OK" |> printfn "%A"
      x |> printfn "%A"
      y |> printfn "%A"
    else
      "NG" |> printfn "%A"
      x |> printfn "%A"
      y |> printfn "%A"
      raise (System.ArgumentException("===== NG =====") )
  
  let encode64 (s:string) =
      System.Convert.ToBase64String( System.Text.Encoding.UTF8.GetBytes( s ) )
  