|
ztra = 1./ rhopn(1,jj,ji) * zse3t * tmask(1,jj,ji) * emp(jj,ji) * trn(1,jj,ji,jn) ! original emps(jj,ji) |
|
tra(1,jj,ji,jn) = tra(1,jj,ji,jn) + ztra |
here formula is
new_concentration = old_concentration + delta
delta=tracer_mass_in_the_evaporated / old_volume
I propose:
new_concentration = tracer_mass_total/new_volume
ogstm/src/PHYS/trcsbc.f90
Lines 27 to 28 in dc5b9ac
here formula is
new_concentration = old_concentration + delta
delta=tracer_mass_in_the_evaporated / old_volume
I propose:
new_concentration = tracer_mass_total/new_volume