Revision as of 07:21, 18 August 2021 (view source) Hout (talk \| contribs) m (→‎{{header\|Haskell}}) ← Older edit		Revision as of 07:38, 18 August 2021 (view source) Hout (talk \| contribs) m (→‎{{header\|Haskell}}) Newer edit →
Line 378: (\xs -> [x ^ y \| x <- xs, y <- xs]) [2 .. 5]</lang> or ~~equivalent~~liftA2 expression: <lang haskell>import ~~qualified Data~~Control.~~Set as~~Applicative S(liftA2) import Control.Monad (join) import qualified Data.Set as S main :: IO () main = (print . S.elems . S.fromList) $ join ~~(\xs -> xs >>= (<$> xs) . (^))~~ (liftA2 (^)) [2 .. 5]</lang> {{Out}}

Distinct power numbers: Difference between revisions

Distinct power numbers (view source)