I would create a Cocktail data structure and an instance of Monad for it. sazerac = do add ice add ryeWhisky add bitters ad

I would create a Cocktail data structure and an instance of Monad for it. sazerac = do add ice add ryeWhisky add bitters add absinthe shake strainInto glass add lemonGarnish main = serve $ makeCocktail sazerac