anchor.diff:  
   
   module Simple =
  -    let textFn<'T> (text:string) = 
  +    let textFn<'T> (text:string) =
           let bytes =         System.Text.Encoding.UTF8.GetBytes(text)
           let contentLength = Microsoft.Extensions.Primitives.StringValues(bytes.Length.ToString())
           let contentType =   Microsoft.Extensions.Primitives.StringValues "text/plain"
  -        fun (x:State<'T>) -> 
  +        fun (x:State<'T>) ->
               x.HttpContext.Response.Headers.["Content-Length"] <- contentLength
               x.HttpContext.Response.Headers.["Content-Type"] <- contentType
               let t = x.HttpContext.Response.Body.WriteAsync(bytes,0,bytes.Length)
  
positive.code:             awt.OnCompleted x.Continue
  
  module View =
       
      let fortuneView =
          html [] [
              head [] [
                  title []  [ rawText "Fortunes" ]
              ]        
              body [] [
                  table [] [ 
                      tr [] [
                          th [] [ rawText "id" ]
                          th [] [ rawText "message" ]
  
negative.code:     // Config to used based on console arg
      let config : Action<Builder.IApplicationBuilder> =
              match args with
              | [|"simple"|] ->
                  printfn "Using Simple Config..."
                  Action<Builder.IApplicationBuilder>( fun app -> app.UseZebraSimpleMiddleware<int>(0,simpleApp) |> ignore )
              | _            ->
                  printfn "Using Stock Config..."
                  Action<Builder.IApplicationBuilder>( fun app -> app.UseZebraMiddleware<int>(0,fallback,webapp) |> ignore )
  
      WebHostBuilder()
          .UseKestrel()
          .Configure(config)
          .Build()
          .Run()
      0
  