blob: d9d2dcd68ae073a86456b1a8817b7d2fd06627c3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
module Struct.Flags exposing
(
Type,
get_frequency,
get_players
)
-- Elm -------------------------------------------------------------------------
import List
-- Shared ----------------------------------------------------------------------
import Util.List
--------------------------------------------------------------------------------
-- TYPES -----------------------------------------------------------------------
--------------------------------------------------------------------------------
type alias Type =
{
frequency : Int,
players : String
}
--------------------------------------------------------------------------------
-- LOCAL -----------------------------------------------------------------------
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-- EXPORTED --------------------------------------------------------------------
--------------------------------------------------------------------------------
get_frequency : Type -> Int
get_frequency flags = flags.frequency
get_players : Type -> String
get_players flags = flags.players
|
