&' CTD clim temperature: ',mult_ctdtclim
_RL mult_ctdtclim
& mult_ctdtclim,
& mult_ctdtclim, mult_ctdsclim,
mult_ctdtclim = 0. _d 0
& + mult_ctdtclim* objf_ctdtclim(bi,bj)