module ADB_UserInterface (
  Command(..), 
  mainDialog,          -- IO Command
                       -- show options of main menu,
                       -- read coomand from user
  readSearchStr,       -- IO String
                       -- read search string from user
  displayMatches,      -- [Address]  -> IO ()
                       -- display enumerated list of all
                       -- matches from search or delete use case
  readAddressDialogue, -- IO (Address)
                       -- read address from user
  readChoice     -- Int -> IO Int
                       -- given the no of matches, read delete
                       -- choice from user
) where

import AddressDB

data Command = 
  AddEntry |
  Search   |
  Delete   |
  Quit