anchor.diff:    plc { writeAny ".dintVar" dintExp }   |> Result.isOk |> Assert.IsTrue
     plc { writeAny ".realVar" realExp }   |> Result.isOk |> Assert.IsTrue
     plc { writeAny ".lrealVar" lrealExp } |> Result.isOk |> Assert.IsTrue
  -  plc { writeAny ".string80Var" stringExp } |> Result.isOk |> Assert.IsTrue
   
     let boolAct:BOOL =  readOnce setupClient ".boolVar"
     let byteAct:BYTE =  readOnce setupClient ".byteVar"
  
positive.code:   let dintAct:DINT =  readOnce setupClient ".dintVar"
    let realAct:REAL =  readOnce setupClient ".realVar"
    let lrealAct:LREAL = readOnce setupClient  ".lrealVar"
    let stringAct = readStrOnce setupClient  ".string80Var" 80
  
    Assert.AreEqual(boolExp, boolAct)
    Assert.AreEqual(byteExp, byteAct)
  
negative.code:   Assert.AreEqual(dintExp, dintAct)
    Assert.AreEqual(realExp, realAct)
    Assert.AreEqual(lrealExp, lrealAct)
  
  [<Test>]
  let ``Accessing an array in the PLC - read`` () =
    let fixture = new Fixture()
    let setupClient = new TcAdsClient()
    
    setupClient.Connect("192.168.68.132.1.1", 801)
  