Partition an integer x into n primes: Difference between revisions

Content deleted Content added
Hout (talk | contribs)
Hout (talk | contribs)
Line 624:
[ x
| x `elem` ps_ ]
go ps_ x n = ((flip bool [] . head) <*> null) (foldMapps_ found>>= ps_found)
where
found p =