proposition: Lemma eexists_add_stats_cons: forall s0 l g s (F0: SingleFrame' _ _ _) F F', add_stats s0 F F' -> add_stats s0 (RAM_FRAME.Build_SingleFrame l g s (SingleFrame'_inv F0) :: F) (RAM_FRAME.Build_SingleFrame l g (Ssequence s s0) F0 :: F').
proof: Proof. intros. destruct F0; unfold SingleFrame'_inv. constructor. auto. Qed.
imports: CertiGraph.lib.Ensembles_ext CertiGraph.lib.Relation_ext CertiGraph.lib.List_ext CertiGraph.veric_ext.SeparationLogic CertiGraph.floyd_ext.ramification VST.floyd.base VST.floyd.canon VST.floyd.assert_lemmas VST.floyd.client_lemmas VST.floyd.closed_lemmas