Saya memiliki fungsi yang mengubah [a, b, c, d, . . . ] ke [(a,b), (c, d), . . .]. Sekarang ini berfungsi dan ini kode untuk itu: makeTuple :: [a] -> [(a,a)] makeTuple [] = [] makeTuple [a] = [] makeTuple (x:y:xs) = (x,y): (makeTuple xs)...