Opaque rmaps.dependent_type_functor_rec.
(* Possible ?? *)

Lemma SEPx_super_non_expansive: forall A R ,
Forall (fun R0 => @super_non_expansive A (fun ts a _ => R0 ts a)) R ->
@super_non_expansive A (fun ts a rho => SEPx (map (fun R0 => R0 ts a) R) rho).