>
>   import IOutilities(getCookedLine)
>   import DateEntry(makeDateTuple, displayDateTuple,
>                    normalizeDateEntry)

>   main =
>     do
>       putStr promptDateEntry
>       dateEntry <- getCookedLine
>       (putStr . (++ "\n") . normalizeDateEntry) dateEntry
>        


variable: promptDateEntry

>   promptDateEntry :: String
>   promptDateEntry = "Enter date: "

Last Modified: