Hafas Client in F#

Ths is a port of the JavaScript hafas-client library to F#.

The hafas endpoints Db, Bvg and Svv are supported.

The F# library compiles to dotnet and (via Fable) to JavaScript and Python.

Interfaces

The library exposes 4 interfaces:

a direct (raw) interface to the hafas endpoints,
a F# async based interface corresponding to hafas-client api,
a JS promise based interface corresponding to the TS Type definitions for hafas-client,
an interface to build profiles for endpoints.

The library compiles via Fable to a webpack module with this TS Type definition.

Examples

HafasAsyncClient with F#

use client = new FsHafas.Api.HafasAsyncClient(FsHafas.Profiles.Db.profile)
async {
    let! locations = client.AsyncLocations "Hannover" (Some Default.LocationsOptions)

    FsHafas.Printf.Short.Locations locations |> printfn "%s"
}
|> Async.RunSynchronously

HafasAsyncClient with C#

using (var client = new FsHafas.Api.HafasAsyncClient(FsHafas.Profiles.Db.profile))
{
    var locations = await HafasAsyncClient.toTask(client.AsyncLocations("Hannover", Default.LocationsOptions));

    Console.WriteLine(FsHafas.Printf.Short.Locations(locations));
}

val client: obj

val async: AsyncBuilder

val locations: obj

union case Option.Some: Value: 'T -> Option<'T>

val printfn: format: Printf.TextWriterFormat<'T> -> 'T

Multiple items
type Async = static member AsBeginEnd: computation: ('Arg -> Async<'T>) -> ('Arg * AsyncCallback * obj -> IAsyncResult) * (IAsyncResult -> 'T) * (IAsyncResult -> unit) static member AwaitEvent: event: IEvent<'Del,'T> * ?cancelAction: (unit -> unit) -> Async<'T> (requires delegate and 'Del :> Delegate) static member AwaitIAsyncResult: iar: IAsyncResult * ?millisecondsTimeout: int -> Async<bool> static member AwaitTask: task: Task<'T> -> Async<'T> + 1 overload static member AwaitWaitHandle: waitHandle: WaitHandle * ?millisecondsTimeout: int -> Async<bool> static member CancelDefaultToken: unit -> unit static member Catch: computation: Async<'T> -> Async<Choice<'T,exn>> static member Choice: computations: Async<'T option> seq -> Async<'T option> static member FromBeginEnd: beginAction: (AsyncCallback * obj -> IAsyncResult) * endAction: (IAsyncResult -> 'T) * ?cancelAction: (unit -> unit) -> Async<'T> + 3 overloads static member FromContinuations: callback: (('T -> unit) * (exn -> unit) * (OperationCanceledException -> unit) -> unit) -> Async<'T> ...

--------------------
type Async<'T>

static member Async.RunSynchronously: computation: Async<'T> * ?timeout: int * ?cancellationToken: System.Threading.CancellationToken -> 'T