MaikKlein/test.hs

Created March 18, 2014 12:25

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/MaikKlein/9619079.js"></script>
Save MaikKlein/9619079 to your computer and use it in GitHub Desktop.

Download ZIP

Raw

test.hs

	main = undefined


	getAllSums x = [(l,r)\| l <- partial_nat, r <- partial_nat, l + r == x ]
	where partial_nat = [1..x]

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment