fold

inline fun <X> fold(fl: (L) -> X, fr: (R) -> X): X