_RL exf_outscal_vstress
& , exf_outscal_vstress
fv(i,j,bi,bj) = exf_outscal_vstress*
fv(i,j,bi,bj) = exf_outscal_vstress*vstress(i,j,bi,bj)
& exf_outscal_hflux, exf_outscal_ustress, exf_outscal_vstress,
exf_outscal_vstress = 1. _d 0