Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/tests/conformance98/layout/do/Main.hs
f a b = do a == b main = print (f () ())