proposition: Lemma field_compatible_int_or_ptr_integer_iff: forall p, field_compatible int_or_ptr_type [] p <-> field_compatible (if Archi.ptr64 then tulong else tuint) [] p.
proof: Proof. intros. unfold field_compatible. simpl. intuition; unfold align_compatible in *; destruct p; try constructor; inv H2; inv H3; apply align_compatible_rec_by_value with (ch := (if Archi.ptr64 then Mint64 else Mint32)); try reflexivity; simpl in *; assumption. Qed.
imports: VST.veric.compcert_rmaps VST.msl.shares VST.msl.wand_frame VST.concurrency.conclib CertiGraph.lib.List_ext CertiGraph.msl_ext.log_normalize CertiGraph.msl_ext.ramification_lemmas CertiGraph.graph.graph_model CertiGraph.CertiGC.GCGraph CertiGraph.CertiGC.env_graph_gc CertiGraph.msl_ext.iter_sepcon Coq.Lists.List