anchor.diff:      async {
         return! OK (DateTime.Now.ToString()) x
       }
  -let main1 argv = 
  +[<EntryPoint>]
  +let main argv = 
     let time1 = GET >=> path "/time1" >=> now1
     startWebServer defaultConfig time1
     0 // return an integer exit code
  
positive.code:       return! MODEL DateTime.Now x
      }
  
  (**
  
  Using DSL:
  
  *)
  
  let api1 = 
    swagger {
      // syntax 1
  
negative.code: open Rest
  open FunnyDsl
  open Swagger
  open Suave
  open System
  
  let now : WebPart =
    fun (x : HttpContext) ->
  