(*Require Import VST.concurrency.cl_step_lemmas.*)
Set Bullet Behavior "Strict Subproofs".
(** Lemmas common to both parts of the progress/preservation simulation results *)

Lemma resource_decay_matchfunspecs e Gamma b Phi Phi' :
(level Phi' <= level Phi)%nat ->
resource_decay b Phi Phi' ->
matchfunspecs e Gamma Phi ->
matchfunspecs e Gamma Phi'.