Fixed bug with fail in list monad