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