Create initial state

This commit is contained in:
2017-11-11 09:45:25 +03:00
commit ddfec7a8e4
9 changed files with 174 additions and 0 deletions

9
src/Lib.hs Normal file
View File

@ -0,0 +1,9 @@
module Lib
( check
) where
import Data.Bool
import Data.Dates
check :: DateTime -> String -> Bool
check _ _ = False