Days between dates: Difference between revisions

m
Line 988:
 
showDateDiff :: String -> String -> String
showDateDiff xss1 yss2 =
maybe
( unlines
["Unparseable as date string pair:", xss1, yss2]
)
( \n ->
concat
["There are ", show n, " days between ", xss1, " and ", yss2, "."]
)
$ daysBetween xss1 yss2</lang>
{{Out}}
<pre>There are 272 days between 2019-01-01 and 2019-09-30.
9,655

edits