RosettaCodeData/Task/Wireworld/Haskell/wireworld-2.hs

7 lines
168 B
Haskell

oscillator= [" tH ",
". ....",
" .. "
]
example = mapM_ (mapM_ putStrLn) .map (borden ' ').take 9 $ runCircuit oscillator