In dwarf.lem there are some "missing pervasives" called natural_nat_shift_left and natural_nat_shift_right with no definition but with OCaml bindings. Are these equivalent to multiplication and division by a power of 2? If so, could they be defined that way, at least for the HOL backend?