01.Answer

answerkey/localeffects/01.answer.md

latest140 B

scala

def fill(xs: Map[Int, A]): ST[S, Unit] =
  xs.foldRight(ST[S, Unit](())):
    case ((k, v), st) => st.flatMap(_ => write(k, v))