anchor.diff:          wait configuration.interactionTimeout (fun _ ->
               try 
                   (find selector).Click()
  +                Thread.Sleep 4000
                   true
               with 
               | :? CanopyElementNotFoundException -> raise <| CanopyException(sprintf "Failed to click: %A because it could not be found" selector)
               | _ -> false)
       with
       | :? CanopyException -> reraise()
  -    | _ as ex -> failwithf "Failed to click: %A%sInner Message: %A" selector System.Environment.NewLine ex
  +    | ex -> failwithf "Failed to click: %A%sInner Message: %A" selector System.Environment.NewLine ex
   
   /// Clicks the Android back button
   let back () =
  
positive.code:     with
      | :? CanopyException -> reraise()
      | :? WebDriverTimeoutException -> failwith "Not displayed check failed."
      | _ as ex -> failwithf "Not displayed check failed for unknown reasons.%sInner Message: %s" System.Environment.NewLine ex.Message
  
  /// Takes a screenshot of the emulator and saves it as png.
  let screenshot path fileName = 
  
negative.code:     with
      | :? CanopyException -> reraise()
      | :? WebDriverTimeoutException -> failwithf "Not Equal check failed.%sExpected NOT: %s Got: %s" System.Environment.NewLine value (find selector).Text
      | ex -> failwithf "Not Equal check failed for unknown reasons.%sInner Message: %s" System.Environment.NewLine ex.Message
  
  /// Check that an element is displayed
  let displayed selector = 
  