| File |
Line number |
Procedure |
Code |
|
./model/src/apply_forcing.F |
505 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/apply_forcing.F |
516 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/apply_forcing.F |
880 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/apply_forcing.F |
891 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/calc_div_ghat.F |
187 |
CALC_DIV_GHAT |
& - addMass(i,j,k,bi,bj)*mass2rUnit/deltaTMom |
|
./model/src/calc_div_ghat.F |
195 |
CALC_DIV_GHAT |
& - addMass(i,j,k,bi,bj)*mass2rUnit/deltaTMom |
|
./model/src/calc_gw.F |
578 |
CALC_GW |
& *( addMass(i,j,k,bi,bj) |
|
./model/src/calc_gw.F |
579 |
CALC_GW |
& +addMass(i,j,km1,bi,bj)*mskM1 ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
490 |
MOM_FLUXFORM |
& *( addMass(i-1,j,k,bi,bj) + addMass(i,j,k,bi,bj) ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
717 |
MOM_FLUXFORM |
& *( addMass(i,j-1,k,bi,bj) + addMass(i,j,k,bi,bj) ) |
|
./model/src/external_forcing.F |
392 |
EXTERNAL_FORCING_T |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing.F |
403 |
EXTERNAL_FORCING_T |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing.F |
715 |
EXTERNAL_FORCING_S |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/external_forcing.F |
726 |
EXTERNAL_FORCING_S |
& + addMass(i,j,kLev,bi,bj)*mass2rUnit |
|
./model/src/ini_forcing.F |
101 |
INI_FORCING |
addMass(i,j,k,bi,bj) = 0. _d 0 |
|
./model/src/ini_forcing.F |
210 |
INI_FORCING |
CALL READ_FLD_XYZ_RL( addMassFile, ' ', addMass, 0, myThid ) |
|
./model/src/ini_forcing.F |
211 |
INI_FORCING |
CALL EXCH_XYZ_RL( addMass, myThid ) |
|
./pkg/thsice/thsice_test_addfluid.h |
18 |
NO PROCEDURE |
addMass(i,j,1,bi,bj) = -EmPmR(i,j,bi,bj) |
|
./model/src/integr_continuity.F |
125 |
INTEGR_CONTINUITY |
& -facMass*addMass(i,j,k,bi,bj) |
|
./model/src/integr_continuity.F |
260 |
INTEGR_CONTINUITY |
I addMass, rStarDhDt, |
|
./model/src/integr_continuity.F |
69 |
INTEGR_CONTINUITY |
_RL addMass(1) |
|
./model/src/load_fields_driver.F |
98 |
LOAD_FIELDS_DRIVER |
addMass(i,j,k,bi,bj) = 0. _d 0 |
|
./verification/rotating_tank/code/apply_forcing.F |
522 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
533 |
APPLY_FORCING_T |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
942 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./verification/rotating_tank/code/apply_forcing.F |
953 |
APPLY_FORCING_S |
& + addMass(i,j,k,bi,bj)*mass2rUnit |
|
./model/src/read_pickup.F |
403 |
READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'AddMass ', addMass, |
|
./model/src/write_pickup.F |
284 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr,addMass,-j,myIter, myThid ) |
|
./model/inc/FFIELDS.h |
118 |
NO PROCEDURE |
COMMON /FFIELDS_ADD_FLUID/ addMass |
|
./model/inc/FFIELDS.h |
119 |
NO PROCEDURE |
_RL addMass(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |