Section ALLOC_OK.
Variable nextb: positive.
Variable nextb': positive.
Variable LESS:  (nextb <= nextb')%positive.
End ALLOC_OK.

Lemma sem_add_ptr_long_ok:
forall nextb ty v1 v2 v,
val_ok nextb v1 ->
val_ok nextb v2 ->
Cop.sem_add_ptr_long (genv_cenv ge) ty v1 v2 = Some v ->
val_ok nextb v.