#define TS_SVADVECTION
#define TS_U3HADVECTION
It seems to us that most likely the negativity is produced by the advection scheme for T and S are not updated in fennel.h/fasham.h at all.
Yet in trying to find out how NO3 negativity accumulates in time and expands in space, I'd like to know why folks chose to preserve negativity of bio-tracers in updating global tracers in fennel.h:
https://www.myroms.org/projects/src/bro ... r/fennel.h
Code: Select all
430 DO ibio=1,NBT
431 indx=idbio(ibio)
432 DO k=1,N(ng)
433 DO i=Istr,Iend
434 Bio(i,k,indx)=MAX(t(i,j,k,nstp,indx),0.0_r8)
435 END DO
436 END DO
437 END DO
...
...
1243 DO ibio=1,NBT
1244 indx=idbio(ibio)
1245 DO k=1,N(ng)
1246 DO i=Istr,Iend
1247 t(i,j,k,nnew,indx)=MIN(t(i,j,k,nnew,indx),0.0_r8)+ &
1248 & Hz(i,j,k)*Bio(i,k,indx)
1249 #ifdef TS_MPDATA
1250 t(i,j,k,3,indx)=t(i,j,k,nnew,indx)*Hz_inv(i,k)
1251 #endif
1252 END DO
1253 END DO
1254 END DO
1255 END DO J_LOOP
Many thanks,
Wen