Hint Rewrite @sublist_nil' using list_solve: sublist.
Hint Rewrite @app_nil_l : sublist.
Hint Rewrite @Zlength_rev : sublist.
Hint Rewrite @sublist_rejoin' using list_solve : sublist.

Lemma sublist_upd_Znth_r: forall {A} (l: list A) i lo hi v,
0 <= i < lo ->
lo <= hi <= Zlength l ->
sublist lo hi (upd_Znth i l v) = sublist lo hi l.