Haskell Fun : reverse a list

myreverse xs = reverseHelper xs []
where reverseHelper (x:xs) ys = reverseHelper xs (x:ys)
reverseHelper [] ys = ys

–sample
myreverse [1,2,3]
[3,2,1]

myreverse “hello”
“olleh”
another way with (++) infixr
reverse x:xs = reverse xs ++ [x]
reverse [x] = [x]
reverse [] = []

Advertisements
This entry was posted in Uncategorized. Bookmark the permalink.

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s