anchor.diff:                (request(fun request ->
                   cmdr {
                     let! f = FormatExtractor(format, request)
  -                  return  referenceData state |> ingredients |> FormatPicker(f) |> OK
  +                  return  referenceData state |> ingredients |> FormatPicker(f) |> OK >=> MimeType(f)
                   })))
   
               pathScan "/blueprints%s" (fun (format) -> 
                 (request(fun request ->
                   cmdr {
                     let! f = FormatExtractor(format, request)
  -                  return  referenceData state |> blueprints |> FormatPicker(f) |> OK
  +                  return  referenceData state |> blueprints |> FormatPicker(f) |> OK >=> MimeType(f)
                   })))
   
               pathScan "/commanders%s" (fun (format) -> 
                 (request(fun request ->
                   cmdr {
                     let! f = FormatExtractor(format, request)
  -                  return  state.Invoke().Keys |> FormatPicker(f) |> OK
  +                  return  state.Invoke().Keys |> FormatPicker(f) |> OK >=> MimeType(f)
                   })))
                  
               pathScan "/%s/cargo%s" (fun (commander, format) -> 
  
positive.code:     | Json  -> json
      | Csv   -> csv
  
    let app =
      choose
        [ GET >=> choose
  
negative.code:                                       | t when t >= timestamp -> true
                                        | _                     -> false)
                            |> json 
                            |> OK >=> MimeType(f)
                 })))
               
              NOT_FOUND "Route not found ¯\_(ツ)_/¯" ]
  