(* How to relate Gamma to funspecs in memory, once we are outside the semax proofs?  We define 'matchfunspecs' which will be satisfied by the initial memory, and preserved under resource_decay / pures_eq / aging. *)

(* Specifications: *)
Lemma cond_approx_eq_sym n A P1 P2 :
cond_approx_eq n A P1 P2 ->
cond_approx_eq n A P2 P1.
Lemma cond_approx_eq_trans n A P1 P2 P3 :
cond_approx_eq n A P1 P2 ->
cond_approx_eq n A P2 P3 ->
cond_approx_eq n A P1 P3.
Lemma cond_approx_eq_weakening n n' A P1 P2 :
(n' <= n)%nat ->
cond_approx_eq n A P1 P2 ->
cond_approx_eq n' A P1 P2.
Lemma level_initial_core {F} ge G n : level (@initial_core F ge G n) = n.
Definition func_at'' fsig cc A P Q :=
pureat (SomeP (SpecTT A) (packPQ P Q)) (FUN fsig cc).