Symbol Description Uses
sRef reference vertical profile for salinity/specific humidity 28



File Line number Procedure Code
./model/src/config_summary.F 95 CONFIG_SUMMARY
      CALL WRITE_1D_R8( sRef, Nr, INDEX_K,'sRef =',
./verification/internal_wave/code/obcs_calc.F 160 OBCS_CALC
            OBNs(I,K,bi,bj)=sRef(K)
./verification/internal_wave/code/obcs_calc.F 180 OBCS_CALC
            OBSs(I,K,bi,bj)=sRef(K)
./verification/internal_wave/code/obcs_calc.F 87 OBCS_CALC
            OBEs(J,K,bi,bj)=sRef(K)
./verification/dome/code/obcs_calc.F 111 OBCS_CALC
            OBEs(J,K,bi,bj)=sRef(K)
./verification/dome/code/obcs_calc.F 192 OBCS_CALC
            OBNs(I,K,bi,bj)=sRef(K) + 1.0*(1.0 - Fz)
./verification/dome/code/obcs_calc.F 212 OBCS_CALC
            OBSs(I,K,bi,bj)=sRef(K)
./verification/exp4/code/obcs_calc.F 116 OBCS_CALC
            OBNs(I,K,bi,bj)=sRef(K)
./verification/exp4/code/obcs_calc.F 143 OBCS_CALC
            OBSs(I,K,bi,bj)=sRef(K)
./verification/exp4/code/obcs_calc.F 62 OBCS_CALC
            OBEs(J,K,bi,bj)=sRef(K)
./verification/exp4/code/obcs_calc.F 89 OBCS_CALC
            OBWs(J,K,bi,bj)=sRef(K)
./verification/advect_xy/code/ini_salt.F 51 INI_SALT
           salt(I,J,K,bi,bj) = sRef(K)
./verification/advect_xy/code/ini_salt.F 52 INI_SALT
           IF (rD.LE.60.E3) salt(I,J,K,bi,bj) = sRef(K)+1.
./verification/advect_xy/code/ini_salt.F 75 INI_SALT
     &      .AND. sRef(k).NE.0.) THEN
./verification/fizhi-cs-aqualev10/code/ini_salt.F 130 INI_SALT
     &      .AND. sRef(k).NE.0.) THEN
./verification/fizhi-cs-aqualev10/code/ini_salt.F 89 INI_SALT
           salt(I,J,K,bi,bj) = sRef(K)
./model/src/find_rho.F 84 FIND_RHO
       refSalt=sRef(kRef)
./model/src/ini_parms.F 150 INI_PARMS
     & tRef, sRef, eosType, integr_GeoPot, selectFindRoSurf,
./model/inc/PARAMS.h 592 NO PROCEDURE
     & rhoConstFresh, convertEmP2rUnit, tRef, sRef,
./model/inc/PARAMS.h 684 NO PROCEDURE
      _RL sRef(Nr)
./model/src/ini_salt.F 56 INI_SALT
           salt(I,J,K,bi,bj) = sRef(K)
./model/src/ini_salt.F 80 INI_SALT
         IF ( sRef(k).NE.0. ) THEN