Distinct power numbers: Difference between revisions

Content added Content deleted
Line 384:
main =
(print . S.elems . S.fromList) $
(\xs -> xs >>= \x -(<$> fmapxs) (x. (^) xs)
[2 .. 5]</lang>
{{Out}}