pub fn n_subset_of_n<'a, T: MonadFail<'a, ()>, A: 'a + Send + Clone, D: 'a + PartialEq>(
    comparator: &'a dyn Comparator<A>,
    n_subset: Arc<dyn TraversibleBinaryNode<'a, T, A, D>>,
    n_superset: Arc<dyn TraversibleBinaryNode<'a, T, A, D>>,
    k_l: Option<A>,
    k_r: Option<A>
) -> T::F<()>