>
>   import IOutilities(getCookedLine)
>   import ItemEntry(makeItemTuple, displayItemTuple,
>                    normalizeItemEntry)

>   main =
>     do
>       putStr promptItemEntry
>       itemEntry <- getCookedLine
>       (putStr . (++ "\n") . normalizeItemEntry) itemEntry
>        


variable: promptItemEntry

>   promptItemEntry :: String
>   promptItemEntry = "Enter item, color, size, and price: "

Last Modified: