Inductive Parameter_types_in_funspec_different_from_call_statement : Prop := .
Inductive Result_type_in_funspec_different_from_call_statement : Prop := .
Definition check_retty t :=
match t with Tvoid => Result_type_in_funspec_different_from_call_statement
|  Tarray _ _ _ => Result_type_in_funspec_different_from_call_statement
| _ => True
end.

Lemma PROP_LOCAL_SEP_f:
forall P Q R f, `(PROPx P (LOCALx Q (SEPx R))) f =
local (fold_right `(and) `(True) (map (fun q : environ -> Prop => `q f) (map locald_denote Q)))
&& PROPx P (LOCALx nil (SEPx R)).