Rosetta Code

Multiplication tables: Difference between revisions

Page Discussion

Multiplication tables (view source)

Revision as of 16:29, 18 December 2016

12 bytes removed ,  7 years ago
m
→‎{{header|Haskell}}: (spacing)
(→‎{{header|Haskell}}: map -> fmap)
Line 2,257:
table n = concat <$> xs
where
xs = (\x -> fmt x : drop 2 pad : (
(\y -> if y < x then pad else fmt $ x * y)
<$> range))
<$> range
where
fmt e = drop (length s) (pad ++ s)
Hout
9,659

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/134028"