anchor.diff:          let url' = printHelper nancyString paramterNames
           (url', parameters)
   
  -    /// This tuple is the response summary information we use to let Nancy build it
  -    type response<'b> = int * 'b * (string * string) list
  -    /// This function takes a response and returns a Nancy response negoriator 
  -    let negotiate (src:response<_>) (negotiator:Nancy.Responses.Negotiation.Negotiator) =
  -        match src with
  -        | code, content, headers -> 
  -            box (negotiator
  -                .WithStatusCode(code)
  -                .WithHeaders(List.toArray headers)
  -                .WithModel(content))
  -
       /// This is derived from the StateBuilder in fsharpx                  
       type State<'T, 'State> = 'State -> 'T * 'State
       let getState = fun s -> (s,s)
  
positive.code:     [<AbstractClass>]
      type Fancy(pipeline:State<unit,NancyModule>) as this =
          inherit NancyModule()
          do
          exec pipeline this |> ignore
negative.code:                     putState nancyModule)) 
  
          [<CustomOperation("delete", MaintainsVariableSpaceUsingBind=true)>]
          member this.Delete(state, url:StringFormat<'a->'b,'c>, processor) =
              // parsing is required for typesafe processor
              let (parsedUrl, parameters) = parseUrl url.Value processor 
              this.Bind(state, fun _ ->
  