main :: IO ()
main = do 
  printLPSolution (Map.fromList [ ("night", 12.2), ("morning",25.1), ("evening",53.5) ])
main :: IO ()
main = do 
  printLPSolution (Map.fromList [ ("night", 12.2), ("morning",25.1), ("evening",53.5) ])
main = do 
  printLPSolution (Map.fromList [ ("night", 12.2), ("morning",25.1), ("evening",53.5) ])