Is it a bug in ana_nudgcoef.h?

Discussions, suggestions and corrections to ROMS/TOMS documentation currently under developement.

Moderators: arango, robertson

Post Reply
Message
Author
yourgod_mwt_cn
Posts: 6
Joined: Wed Jun 18, 2014 12:50 pm
Location: Second Institute of Oceanography, NMR, China

Is it a bug in ana_nudgcoef.h?

#1 Unread post by yourgod_mwt_cn »

In the script designed to configure the nudging coefficients, the loop iterates from 1 to NTCLM. However, the array Tnudg contains NT elements. I think there is a mismatch of the indices

Code: Select all

      IF (ANY(LnudgeTCLM(:,ng))) THEN
        DO itrc=1,NTCLM(ng)
          DO k=1,N(ng)
            DO j=JstrT,JendT
              DO i=IstrT,IendT
                CLIMA(ng)%Tnudgcof(i,j,k,itrc)=Tnudg(itrc,ng)
              END DO
            END DO
          END DO
        END DO
      END IF

Post Reply