let testapp : WebPart =
  choose
    [ pathScan "/add/%d/%d" (fun (a,b) -> OK((a + b).ToString()))
      NOT_FOUND "Found no handlers" ]

val testapp : WebPart

Full name: temp.testapp

Multiple items
module WebPart

from Suave

--------------------
type WebPart = WebPart<HttpContext>

Full name: Suave.Http.WebPart

--------------------
type WebPart<'a> = 'a -> Async<'a option>

Full name: Suave.WebPart.WebPart<_>

val choose : options:WebPart<'a> list -> WebPart<'a>

Full name: Suave.WebPart.choose

val pathScan : pf:PrintfFormat<'a,'b,'c,'d,'t> -> h:('t -> WebPart) -> WebPart

Full name: Suave.Filters.pathScan

val a : int

val b : int

val OK : body:string -> WebPart

Full name: Suave.Successful.OK

val NOT_FOUND : body:string -> WebPart

Full name: Suave.RequestErrors.NOT_FOUND