fun toFun(f: A.() -> R): (A) -> R = f