question.hs (207B)
1 temps = [50, 68, 95, 86] 2 3 fu a = (a - 32) * 5 / 9 4 5 fv b = map fu b 6 7 fw [] = 0 8 fw (x:xs) = 1 + fw (xs) 9 10 fx [] = 0 11 fx (x:xs) = x + fx (xs) 12 13 fy c = fx(c) / fw(c) 14 15 fz d = fy(fv(d)) 16 17 main = do 18 print (fz temps)