anchor.diff:  /// Filters an incoming HTTP request based on the beginning of the request path (case insensitive).
   let routeStartsWithCi (partOfPath : string) =
       fun (ctx : HttpHandlerContext) ->
  -        if (getRalativePath ctx.HttpContext).StartsWith(partOfPath, StringComparison.CurrentCultureIgnoreCase) 
  +        if (getPath ctx.HttpContext).StartsWith(partOfPath, StringComparison.CurrentCultureIgnoreCase) 
           then Some ctx
           else None
           |> async.Return
  
positive.code: /// route matches and subsequently passed into the supplied routeHandler.
  let routeCif (route : StringFormat<_, 'T>) (routeHandler : 'T -> HttpHandler) =
      fun (ctx : HttpHandlerContext) ->
          tryMatchInput route (getRalativePath ctx.HttpContext) true
          |> function
              | None      -> None |> async.Return
              | Some args -> routeHandler args ctx
  
negative.code: /// Filters an incoming HTTP request based on the request path (case insensitive).
  let routeCi (path : string) =
      fun (ctx : HttpHandlerContext) ->
          if String.Equals(getPath ctx.HttpContext, path, StringComparison.CurrentCultureIgnoreCase)
          then Some ctx
          else None
          |> async.Return
  