instance : monad list := { .. }