cppxor2arr/seq_dif.hs

Last active June 19, 2018 12:01

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/cppxor2arr/9d9cb3228a6104f757aed30aa079b7ec.js"></script>
Save cppxor2arr/9d9cb3228a6104f757aed30aa079b7ec to your computer and use it in GitHub Desktop.

Download ZIP

sequence difference

Raw

	f :: Num a => [a] -> [a]
	f [] = []
	f [x] = []
	f [x1,x2] = [x2-x1]
	f (x1:x2:xs) = x2-x1:f (x2:xs)

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