Ocean Modeling Discussion

Dear all,
I want to add the sediment in riverplume.So I modified the test case which is called riverplume1.
At first I modified the ana_psource.h file just like this
# ifdef SEDIMENT

DO k=1,N(ng)
DO is=1,Nsrc(ng)
DO ised=1,NST
SOURCES(ng)%Tsrc(is,k,idsed(ised))=5.0_r8
END DO
END DO
END DO ...

I see!Thank you so much john.Mua~！
It is working now.

xiaom

I'm running the Sed_test1 test case, I got this error:


so please tell me how to solve this error


thanking you in advance.