ex1 4

← Back

Basic Info

• Type: sml
• Size: 229 B

• Origin

• Download

Functional Programming
└── Lab ML
    └── 0​429
        └── ex1 4.sml

---

Preview

(*
Write a function that takes a list of reals $[a_0, . . . , a_{n−1}]$ and produces a function that takes an argument b and computes

\sum_{i = 0}^{n - 1} a_i b^i
*)

fun f aList b = foldr (fn (y, z) => y + z * b) (0.0) aList;