From 6a0c5087f716ed6c876a666db6573491bfd3e094 Mon Sep 17 00:00:00 2001 From: Joris Date: Sun, 12 Jun 2016 23:54:17 +0200 Subject: Design income form --- src/client/elm/Utils/Date.elm | 39 --------------------------------------- 1 file changed, 39 deletions(-) delete mode 100644 src/client/elm/Utils/Date.elm (limited to 'src/client/elm/Utils/Date.elm') diff --git a/src/client/elm/Utils/Date.elm b/src/client/elm/Utils/Date.elm deleted file mode 100644 index 352e4ce..0000000 --- a/src/client/elm/Utils/Date.elm +++ /dev/null @@ -1,39 +0,0 @@ -module Utils.Date exposing - ( monthToNum - , numToMonth - ) - -import Date exposing (..) - -monthToNum : Month -> Int -monthToNum month = - case month of - Jan -> 1 - Feb -> 2 - Mar -> 3 - Apr -> 4 - May -> 5 - Jun -> 6 - Jul -> 7 - Aug -> 8 - Sep -> 9 - Oct -> 10 - Nov -> 11 - Dec -> 12 - -numToMonth : Int -> Month -numToMonth n = - case n of - 1 -> Jan - 2 -> Feb - 3 -> Mar - 4 -> Apr - 5 -> May - 6 -> Jun - 7 -> Jul - 8 -> Aug - 9 -> Sep - 10 -> Oct - 11 -> Nov - 12 -> Dec - _ -> Jan -- cgit v1.2.3