2 calls to
CALC_RCOUPLE_SCALES
NUDOB
NUDOB