mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-09-15 21:46:53 +00:00
14 lines
245 B
Elm
14 lines
245 B
Elm
module Messages.EquipmentUseData exposing (..)
|
|
|
|
import Data.EquipmentUse exposing (EquipmentUse(..))
|
|
|
|
|
|
gb : EquipmentUse -> String
|
|
gb pu =
|
|
case pu of
|
|
Concerning ->
|
|
"Concerning"
|
|
|
|
Disabled ->
|
|
"Disabled"
|