Haskell

Slide:

Redefine the function "positions" (from slide 15 of chapter 5) using the function "find". Note that "find" is just: find :: Eq a=>>[(a,b)]>[b] find kt=[v(k,v)positions0[1,0,0,1,0,1,1,0][1,2,4,7]