module Base exposing (..)

import Array exposing (Array)
import Time exposing (Posix)


type WordStatus
    = Correct
    | Wrong
    | Todo
    | CurrentWord


type alias Word =
    { content : String
    , status : WordStatus
    }


type alias Model =
    { begin : Maybe Posix
    , end : Maybe Posix
    , words : Array Word
    , accuracy : Maybe Float
    , length : Int
    , currentWord : Int
    , inputBox : String
    }