Hint Resolve treebox_rep_saturate_local: saturate_local.

(* Lemma tree_rep_saturate_local: forall t p, tree_rep t p |-- !! is_pointer_or_null p.  Hint Resolve tree_rep_saturate_local: saturate_local.  Lemma tree_rep_valid_pointer: forall t p, tree_rep t p |-- valid_pointer p. Hint Resolve tree_rep_valid_pointer: valid_pointer.  *)
Lemma modus_ponens_wand' {A}{ND: NatDed A}{SL: SepLog A}:
forall P Q R: A, P |-- Q -> P * (Q -* R) |-- R.