Multiplication tables: Difference between revisions
→{{header|Haskell}}: map -> fmap
(→{{header|Haskell}}: map -> fmap) |
|||
Line 2,257:
table n = concat <$> xs
where
xs =
where
fmt e = drop (length s) (pad ++ s)
Line 2,268 ⟶ 2,267:
pad = " "
range = [1..n]
main :: IO ()
main = mapM_ putStrLn $ table 12</lang>
| |||