&' ARGO Salt: ',mult_argos
_RL mult_argos
& mult_argos,
& mult_argot, mult_argos,
mult_argos = 0. _d 0
& nnzobs, argosfile, salterrfile, mult_argos,
& + mult_argos * objf_argos(bi,bj)