Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Haskell --- average of a list.

Name: Anonymous 2015-07-08 17:53

Rules:

✡ must compute arithmetic average of a list
✡ only one pass is allowed
✡ constant memory

Name: Anonymous 2015-07-14 0:47

average list = loop 0 0 lst
 where loop sum len [] = sum / len
       loop sum len (car:cdr) = loop (car + sum) (len + 1) cdr

Newer Posts