2 calls from
WRAP_PUT_VAR1_REALX

HANDLE_ERROR  1
SHR_KIND_MOD  1