ChatGPT First Glance

2023-01-21 115 words One minute

Contents

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.

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12


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