/*
** Biological tracers point Source/Sinks (river runoff).
*/
CASE ('idRtrc(iNO3_)')
idRtrc(iNO3_)=varid
CASE ('idRtrc(iNH4_)')
idRtrc(iNH4_)=varid
CASE ('idRtrc(iDIC_)')
idRtrc(iDIC_)=varid
CASE ('idRtrc(iALK_)')
idRtrc(iALK_)=varid
CASE ('idRtrc(iLITH)')
idRtrc(iLITH)=varid
CASE ('idRtrc(iPO4_)')
idRtrc(iPO4_)=varid
CASE ('idRtrc(iFED_)')
idRtrc(iFED_)=varid
'river_FED' ! Input 'river runoff FED' 'mol/m3' ! [mol/m3] 'river_FED, scalar, series' 'rivertime' 'idRtrc(iFED)' 'nulvar' 1.0d0
LtracerSrc == F \ ! idbio( 1), SIO4 F \ ! idbio( 2), SILG F \ ! idbio( 3), SIDT F \ ! idbio( 4), SDOP F \ ! idbio( 5), SDON F \ ! idbio( 6), PSM T \ ! idbio( 7), PO4 . . . T \ !idbio(?), FED_ . . .