Collect and sort square numbers in ascending order from three lists: Difference between revisions

m
(J)
Line 273:
 
squaresSorted :: Integral a => [[a]] -> [a]
squaresSorted = sort . concatMap (filter isPerfectSquare =<<)
 
isPerfectSquare :: Integral a => a -> Bool
9,655

edits