Function monohook 

pub fn monohook<B, C, D, Duo, Mono>(d: Duo, m: Mono) -> impl Fn(B) -> D
where
    Duo: Fn(B, C) -> D,
    Mono: Fn(B) -> C,
    B: Clone,