Partition an integer x into n primes: Difference between revisions
m
→{{header|Haskell}}
Line 624:
[ x
| x `elem` ps_ ]
go ps_ x n = ((flip bool [] . head) <*> null) (
where
found p =
|