main =
  do print $ minimumBy (comparing itemCost)
           $ filter fight
           $ gearOptions
     print $ maximumBy (comparing itemCost)
           $ filter (not . fight)
           $ gearOptions
main =
  do print $ minimumBy (comparing itemCost)
           $ filter fight
           $ gearOptions
     print $ maximumBy (comparing itemCost)
           $ filter (not . fight)
           $ gearOptions
main =
  do print $ minimumBy (comparing itemCost)
           $ filter fight
           $ gearOptions
     print $ maximumBy (comparing itemCost)
           $ filter (not . fight)
           $ gearOptions