adds Modes module

This commit is contained in:
2019-11-05 21:20:09 +01:00
parent c968da15f0
commit 21650c4011

16
src/Modes.elm Normal file
View File

@@ -0,0 +1,16 @@
module Modes exposing (..)
type ViewMode
= Sell
| Buy
| Grab
| Add
canSelectIn : ViewMode -> Bool
canSelectIn mode =
case mode of
Sell -> True
Buy -> True
Grab -> True
Add -> False