fun mul (foo: int) (bar: int) : int = foo * bar
fun map
    (fn: |int, int| -> int)
    (to: int)
    : int
= fn(to, 10)

fun main: void = do
    let foo : int = 69
    let bar : int = 10

    map(mul, foo)
    |> @write(_)
end