Non-decimal radices/Output: Difference between revisions

→‎{{header|Haskell}}: maximumBy -> maximum
(→‎{{header|Haskell}}: or, generalising and tabulating a little)
(→‎{{header|Haskell}}: maximumBy -> maximum)
Line 574:
<lang haskell>import Data.Monoid ((<>))
import Data.Ord (comparing)
import Data.List (unfoldr, transpose, maximumBymaximum, intercalate)
 
-- ARBITRARY RADICES ----------------------------------------------------------
Line 601:
transpose
((\col ->
let width = lengthmaximum (maximumBylength (comparing length)<$> col)
justifyRight n c s = drop (length s) (replicate n c ++ s)
in justifyRight width ' ' <$> col) <$>
9,655

edits