View source for Unix tools/yes

== yes ==

A simple utility to repeatedly print <code>"y"</code> to standard output.

Here are some various ways this small program can be written:

{|
|<haskell>
main = let y = putStrLn "y" >> y in y
</haskell>
|}

{|
|<haskell>
main = putStrLn $ concat $ repeat "y\n"
</haskell>
|}

{|
|<haskell>
main = let y = 'y' : '\n' : y in putStrLn y
</haskell>
|}

{|
|<haskell>
main = putStrLn "y" >> main
</haskell>
|}

{|
|<haskell>
main = putStrLn $ cycle "y\n"
</haskell>
|}