Largest int from concatenated ints: Difference between revisions

Line 69:
 
=={{header|Haskell}}==
===Compare repeated string method===
<lang Haskell>import Data.List (sortBy)
import Data.Ord (comparing)
Line 79 ⟶ 80:
 
<pre>[998764543431,6054854654]</pre>
 
===Sort on comparison of concatenated ints method===
<lang Haskell>import Data.List (sortBy)
import Data.Ord (comparing)
 
main = print (map maxcat [[1,34,3,98,9,76,45,4], [54,546,548,60]] :: [Integer])
where sorted = sortBy (\a b -> compare (b++a) (a++b))
maxcat = read . concat . sorted . map show</lang>
 
{{out}}
 
;Output as above.
 
=={{header|J}}==
Anonymous user