Function shifted_in 

pub fn shifted_in<M, K: Ord, V: Shift<M> + Clone>(
    map: BTreeMap<K, V>,
    key: K,
    fresh: V,
    by: V::By,
) -> BTreeMap<K, V>