Skip to main content

ChatGPT First Glance

· One min read
unknowntpo
unknowntpo

This is my first glance of ChatGPT, and I ask her to generate a peice of code in Haskell, which can map a function to a list.

The result she generated is totally correct, and can be run in playground.

addOneToEach :: [Int] -> [Int]
addOneToEach xs = map (+1) xs

myMap :: (a -> b) -> [a] -> [b]
myMap _ [] = []
myMap f (x:xs) = f x : myMap f xs

main = do
   let myList = [1, 2, 3, 4]
   let doubledList = myMap (*2) myList
   print doubledList
   -- Output: [2,4,6,8]

Here's the link to our chat: https://sharegpt.com/c/yedzb1N