Definition external_call_well_typed ef := ec_well_typed (external_call_spec ef).Definition external_call_symbols_preserved ef := ec_symbols_preserved (external_call_spec ef).Definition external_call_valid_block ef := ec_valid_block (external_call_spec ef).Definition external_call_max_perm ef := ec_max_perm (external_call_spec ef).Definition external_call_readonly ef := ec_readonly (external_call_spec ef).Definition external_call_mem_extends ef := ec_mem_extends (external_call_spec ef).Definition external_call_mem_inject_gen ef := ec_mem_inject (external_call_spec ef).Definition external_call_mem_inject_gen' ef := ec_mem_inject' (external_call_spec ef).Definition external_call_trace_length ef := ec_trace_length (external_call_spec ef).Definition external_call_receptive ef := ec_receptive (external_call_spec ef).Definition external_call_determ ef := ec_determ (external_call_spec ef).

Lemma external_call_nextblock: forall ef ge vargs m1 t vres m2, external_call ef ge vargs m1 t vres m2 -> Ple (Mem.nextblock m1) (Mem.nextblock m2).