| File |
Line number |
Procedure |
Code |
|
./pkg/sbo/sbo_calc.F |
220 |
SBO_CALC |
s = salt(I,J,1,bi,bj) |
|
./pkg/sbo/sbo_calc.F |
233 |
SBO_CALC |
s = salt(I,J,K,bi,bj) |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
50 |
OCN_STORE_MY_DATA |
SSSocn2cpl(i,j,bi,bj) = salt (i,j,1,bi,bj) |
|
./pkg/fizhi/step_fizhi_corr.F |
185 |
STEP_FIZHI_CORR |
sdyntemp(i,j,L,bi,bj)=salt(i,j,L,bi,bj)-sdyntemp(i,j,L,bi,bj) |
|
./pkg/fizhi/fizhi_init_vars.F |
172 |
FIZHI_INIT_VARS |
call DYN2PHYS(salt,pedyn,im1,im2,jm1,jm2,Nr,Nsx,Nsy, |
|
./pkg/cost/cost_state_final.F |
35 |
COST_STATE_FINAL |
objf_state_final(i,j,bi,bj,2) = salt(i,j,1,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini.F |
143 |
CTRL_MAP_INI |
salt(i,j,k,bi,bj) = salt(i,j,k,bi,bj) + |
|
./pkg/ctrl/ctrl_map_ini.F |
212 |
CTRL_MAP_INI |
salt(i,j,1,bi,bj) = salt(i,j,1,bi,bj) |
|
./pkg/ctrl/ctrl_map_ini.F |
495 |
CTRL_MAP_INI |
_EXCH_XYZ_R8( salt, mythid ) |
|
./model/src/checkpoint.F |
119 |
READ_CHECKPOINT |
CALL READ_REC_XYZ_RL( 'salt', salt, 1,myIter,myThid) |
|
./model/src/checkpoint.F |
153 |
READ_CHECKPOINT |
CALL MDSREADFIELD(fn,prec,'RL',Nr,salt, 10,myThid) |
|
./model/src/checkpoint.F |
186 |
READ_CHECKPOINT |
CALL MDSREADFIELD(fn,prec,'RL',Nr,salt, nj+1,myThid) |
|
./model/src/checkpoint.F |
199 |
READ_CHECKPOINT |
CALL MDSREADFIELD(fn,prec,'RL',Nr,salt, 7,myThid) |
|
./model/src/checkpoint.F |
240 |
READ_CHECKPOINT |
CALL MNC_CW_RL_R('D',fn,0,0,'S',salt, myThid) |
|
./model/src/checkpoint.F |
278 |
READ_CHECKPOINT |
_EXCH_XYZ_R8(salt , myThid ) |
|
./model/src/checkpoint.F |
506 |
WRITE_CHECKPOINT_NOW |
CALL WRITE_REC_XYZ_RL( 'salt', salt, 1,myIter,myThid) |
|
./model/src/checkpoint.F |
543 |
WRITE_CHECKPOINT_NOW |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nr,salt, 10,myIter,myThid) |
|
./model/src/checkpoint.F |
556 |
WRITE_CHECKPOINT_NOW |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nr,salt, 7,myIter,myThid) |
|
./model/src/checkpoint.F |
608 |
WRITE_CHECKPOINT_NOW |
CALL MNC_CW_RL_W('D',fn,0,0,'S', salt, myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
213 |
CTRL_MAP_INI_ECCO |
salt(i,j,k,bi,bj) = salt(i,j,k,bi,bj) + |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
378 |
CTRL_MAP_INI_ECCO |
_EXCH_XYZ_R8( salt, mythid ) |
|
./model/src/write_state.F |
104 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'S', salt,iRec,myIter,myThid) |
|
./model/src/write_state.F |
127 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'S.',suff,salt,myIter,myThid) |
|
./model/src/write_state.F |
165 |
WRITE_STATE |
CALL MNC_CW_RL_W('D','state',0,0,'S', salt, myThid) |
|
./model/src/the_correction_step.F |
106 |
THE_CORRECTION_STEP |
U salt,gS, |
|
./model/src/convect.F |
73 |
CONVECT |
sMix(i,j) = salt (i,j,k-1,bi,bj) |
|
./model/src/convect.F |
75 |
CONVECT |
& +salt (i,j,k,bi,bj) |
|
./model/src/convect.F |
90 |
CONVECT |
salt(i,j,k-1,bi,bj) = sMix(i,j)/dSum(i,j) |
|
./model/src/convect.F |
91 |
CONVECT |
salt(i,j,k ,bi,bj) = sMix(i,j)/dSum(i,j) |
|
./pkg/offline/offline_fields_load.F |
353 |
OFFLINE_FIELDS_LOAD |
salt(i,j,k,bi,bj) = bWght*save0(i,j,k,bi,bj) |
|
./model/src/diags_oceanic_surf_flux.F |
121 |
DIAGS_OCEANIC_SURF_FLUX |
& *salt(i,j,ks,bi,bj) |
|
./pkg/gchem/gchem_forcing_sep.F |
60 |
GCHEM_FORCING_SEP |
call TRACER_MEANAREA(myThid,salt, 1,gsm_s) |
|
./model/src/convective_adjustment.F |
120 |
CONVECTIVE_ADJUSTMENT |
I theta,salt, |
|
./model/src/convective_adjustment.F |
131 |
CONVECTIVE_ADJUSTMENT |
I theta,salt, |
|
./model/src/convective_adjustment.F |
160 |
CONVECTIVE_ADJUSTMENT |
U salt, |
|
./pkg/pp81/pp81_ri_number.F |
102 |
PP81_RI_NUMBER |
I theta, salt, |
|
./pkg/pp81/pp81_ri_number.F |
97 |
PP81_RI_NUMBER |
I theta, salt, |
|
./pkg/monitor/monitor.F |
120 |
MONITOR |
CALL MON_PRINTSTATS_RL(Nr,salt,'_salt', |
|
./pkg/monitor/mon_surfcor.F |
101 |
MON_SURFCOR |
tmpVal = salt(i,j,ks,bi,bj) |
|
./pkg/monitor/mon_surfcor.F |
102 |
MON_SURFCOR |
& + salt(i,j,Nr,bi,bj)*drF(Nr)*recip_drF(ks) |
|
./pkg/monitor/mon_surfcor.F |
147 |
MON_SURFCOR |
& +tmpVol*rStarDhCDt(i,j,bi,bj)*salt(i,j,k,bi,bj) |
|
./pkg/monitor/mon_surfcor.F |
85 |
MON_SURFCOR |
& + rA(i,j,bi,bj)*wVel(i,j,ks,bi,bj)* salt(i,j,ks,bi,bj) |
|
./model/src/ini_salt.F |
101 |
INI_SALT |
CALL PLOT_FIELD_XYZRL( salt, 'Initial Salinity' , Nr, 1, myThid ) |
|
./model/src/ini_salt.F |
56 |
INI_SALT |
salt(I,J,K,bi,bj) = sRef(K) |
|
./model/src/ini_salt.F |
65 |
INI_SALT |
CALL READ_FLD_XYZ_RL( hydrogSaltFile, ' ', salt, 0, myThid ) |
|
./model/src/ini_salt.F |
67 |
INI_SALT |
_EXCH_XYZ_R8(salt , myThid ) |
|
./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 |
84 |
INI_SALT |
& .AND. salt(I,J,K,bi,bj).EQ.0. ) THEN |