2 calls from
MO_CONSTANTS

PHYSCONST  1
SHR_KIND_MOD  1