Symbol | Description | Uses |
J | Loop counters | 6962 |
File | Line number | Procedure | Code |
./model/src/ini_salt.F | 46 | INI_SALT |
INTEGER I, J, K, localWarnings |
./model/src/ini_salt.F | 54 | INI_SALT |
DO J=1-Oly,sNy+Oly |
./model/src/ini_salt.F | 56 | INI_SALT |
salt(I,J,K,bi,bj) = sRef(K) |
./model/src/ini_salt.F | 75 | INI_SALT |
DO J=1-Oly,sNy+Oly |
./model/src/ini_salt.F | 77 | INI_SALT |
IF (maskC(I,J,K,bi,bj).EQ.0.) salt(I,J,K,bi,bj) = 0. |
./model/src/ini_salt.F | 81 | INI_SALT |
DO J=1,sNy |
./model/src/ini_salt.F | 83 | INI_SALT |
IF ( maskC(I,J,K,bi,bj).NE.0. |
./model/src/ini_salt.F | 84 | INI_SALT |
& .AND. salt(I,J,K,bi,bj).EQ.0. ) THEN |