module T2534 where

foo = foldr (>>=) [] []