anchor.diff:      /// Check if 'text' starts with the 'prefix' string case insensitive
       let inline startsWithIgnoreCase (prefix:string) (text:string) =
           text.IndexOf(prefix, StringComparison.OrdinalIgnoreCase) = 0
  -    
  +
       /// Match if 'text' starts with the 'prefix' string case insensitive
       let (|StartsWithIC|_|) (prefix:string) (text:String) =
           if startsWithIgnoreCase prefix text then Some () else None
  -    
  +
       /// Check if 'text' ends with the 'suffix' string case insensitive
       let inline endsWithIgnoreCase (suffix:string) (text:string) =
           suffix.Length <= text.Length &&
           text.LastIndexOf(suffix, StringComparison.OrdinalIgnoreCase) >= text.Length - suffix.Length
  -    
  +
       /// Match if 'text' ends with the 'suffix' string case insensitive
       let (|EndsWithIC|_|) (suffix:string) (text:String) =
           if endsWithIgnoreCase suffix text then  Some () else None
   
  -    let quoted (text:string) = (if text.Contains(" ") then "\"" + text + "\"" else text) 
  +    let quoted (text:string) = (if text.Contains(" ") then "\"" + text + "\"" else text)
   
       let inline trim (text:string) = text.Trim()
       let inline trimChars chs (text:string) = text.Trim chs
  
positive.code:     member x.DownloadFile (uri : Uri, filePath : string) =
          x.DownloadFileTaskAsync(uri, CancellationToken.None, filePath).GetAwaiter().GetResult()
      member x.DownloadStringTaskAsync (uri : Uri, tok : CancellationToken) =
        async { 
          let! response = x.GetAsync(uri, tok) |> Async.AwaitTaskWithoutAggregate
          do! failIfNoSuccess response
          let! result = response.Content.ReadAsStringAsync() |> Async.AwaitTaskWithoutAggregate
  
negative.code:                     let! value = Async.AwaitObservable source
                      observer.OnNext value
                      do! Async.Sleep milliseconds
                      return! loop()
                  }
                  loop ()
  
  