2 calls from
WRAP_PUT_VARA_REAL

HANDLE_ERROR  1
SHR_KIND_MOD  1