Azure Service Bus

gistfile1.fs

let t2 =
    TopicDescription "testtopic2"

let t3 =
    TopicDescription "testtopic3"

let setup =
    ServiceBus.run (
        ServiceBus.liftNamespace (
                Namespace.Topics.create t3
             *> Namespace.Topics.delete t2.Path
             *> Namespace.Topics.list ()))

let res =
    Async.RunSynchronously (
        setup connection)