Function appose 

pub fn appose<A, B, C, Duo, Mono>(d: Duo, m: Mono) -> impl Fn(A, A) -> C
where
    Duo: Fn(B, B) -> C,
    Mono: Fn(A) -> B,