let
toffset_of_field ?(mode=compute_int_mode) f =
Aint
.to_term (xoffset_of_field ~mode f)