tvl-depot/users/wpcarro/website/sandbox/learnpianochords/src/Tempo.elm
Vincent Ambo 019f8fd211 subtree(users/wpcarro): docking briefcase at '24f5a642'
git-subtree-dir: users/wpcarro
git-subtree-mainline: 464bbcb15c
git-subtree-split: 24f5a642af
Change-Id: I6105b3762b79126b3488359c95978cadb3efa789
2021-12-14 02:15:47 +03:00

33 lines
720 B
Elm

module Tempo exposing (render)
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (..)
import Responsive
import Tailwind
import UI
type alias Props msg =
{ tempo : Int
, handleInput : String -> msg
}
render : Props msg -> Html msg
render { tempo, handleInput } =
div [ class "text-center" ]
[ p
[ [ "py-10"
, Responsive.h2
]
|> Tailwind.use
|> class
]
[ text (String.fromInt tempo ++ " BPM") ]
, UI.textField
{ placeholderText = "Set tempo..."
, handleInput = handleInput
, classes = []
}
]