object

module App

open Elmish
open Elmish.React
open Elmish.Bridge

#if DEBUG
open Elmish.Debug
#endif

object

module View

open Feliz
open Feliz.Bulma

open System
open Shared
open Model
open Messages

object

module Update

open System
open Elmish
open Elmish.Bridge

open Shared
open Model
open Messages

object

module Model

open System
open Shared

[<RequireQualifiedAccess>]
type EventSet =
  | Small
  | Large

object

module App

open Elmish
open Elmish.React
open Elmish.Bridge

open Update
open View

Program.mkProgram init update view

object

module View

open Feliz
open Feliz.Bulma

open Shared
open Model
open Messages

let [<Literal>] TimeFormatString = "HH:mm:ss"

object

module Update

open System
open Elmish
open Elmish.Bridge

open Shared
open Model
open Messages

object

module Model

open Shared

[<RequireQualifiedAccess>]
type EventSet =
  | Small
  | Large

type Model = 

object

module Messages

open Shared

type Msg =
    | EventSetChanged of string
    | PlaybackDelayChanged of string
    | StartPlayback
    | PausePlayback
    | StopPlayback

object

module SocketServer

open System
open System.IO
open Microsoft.AspNetCore.Http
open Giraffe
open Elmish
open Elmish.Bridge
open Thoth.Json.Net