mirror of
https://github.com/TheAnachronism/docspell.git
synced 2025-01-26 00:18:26 +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"
|