Intersecting number wheels: Difference between revisions
m
→{{header|Haskell}}
m (→{{header|Haskell}}: Tidied, pruned out one import, preferring a guard to bool.) |
|||
Line 905:
clockWorkTick = flip click 'A'
where
click wheels name
( click . flip
(fromMaybe ['?'] (M.lookup name wheels))
leftRotate :: [a] -> [a]
| |||