module Struct.Flags exposing ( Type, get_frequency, get_players ) -- Elm ------------------------------------------------------------------------- import List -- Shared ---------------------------------------------------------------------- import Util.List -------------------------------------------------------------------------------- -- TYPES ----------------------------------------------------------------------- -------------------------------------------------------------------------------- type alias Type = { frequency : Int, players : (List String) } -------------------------------------------------------------------------------- -- LOCAL ----------------------------------------------------------------------- -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- -- EXPORTED -------------------------------------------------------------------- -------------------------------------------------------------------------------- get_frequency : Type -> Int get_frequency flags = flags.frequency get_players : Type -> (List String) get_players flags = flags.players