(* LKSIZE should match sizeof(semax_conc.tlock).  *)
Definition LKSIZE:= (2 * size_chunk Mptr)%Z.
Definition LKSIZE_nat:= Z.to_nat LKSIZE.

(* Specifications: *)
Lemma LKSIZE_pos : (0 < LKSIZE)%Z.
Lemma LKSIZE_int : (size_chunk Mint32 < LKSIZE)%Z.
Ltac lkomega := pose proof LKSIZE_pos; pose proof LKSIZE_int; simpl in *; try omega.
Lemma LKSIZE_pos : (0 < LKSIZE)%Z.
Lemma LKSIZE_int : (size_chunk Mint32 < LKSIZE)%Z.
Ltac lkomega := pose proof LKSIZE_pos; pose proof LKSIZE_int; simpl in *; try omega.