File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
834 |
NO PROCEDURE |
& convertFW2Salt, temp_EvPrRn, salt_EvPrRn, |
./model/inc/PARAMS.h |
965 |
NO PROCEDURE |
_RL convertFW2Salt |
./model/src/apply_forcing.F |
516 |
APPLY_FORCING_T |
& .OR. convertFW2Salt.EQ.-1. _d 0 ) THEN |
./model/src/apply_forcing.F |
881 |
APPLY_FORCING_S |
& .OR. convertFW2Salt.EQ.-1. _d 0 ) THEN |
./pkg/longstep/longstep_forcing_surf.F |
105 |
LONGSTEP_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./model/src/config_summary.F |
401 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( convertFW2Salt, INDEX_NONE, |
./pkg/ptracers/ptracers_forcing_surf.F |
151 |
PTRACERS_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./pkg/ptracers/ptracers_forcing_surf.F |
85 |
PTRACERS_FORCING_SURF |
& .OR.convertFW2Salt .EQ. -1. ) THEN |
./pkg/ptracers/ptracers_forcing_surf.F |
97 |
PTRACERS_FORCING_SURF |
add2EmP(i,j) = relaxForcingS(i,j)/convertFW2Salt |
./model/src/external_forcing.F |
388 |
EXTERNAL_FORCING_T |
& .OR. convertFW2Salt.EQ.-1. _d 0 ) THEN |
./model/src/external_forcing.F |
710 |
EXTERNAL_FORCING_S |
& .OR. convertFW2Salt.EQ.-1. _d 0 ) THEN |
./model/src/external_forcing_surf.F |
288 |
EXTERNAL_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./model/src/external_forcing_surf.F |
334 |
EXTERNAL_FORCING_SURF |
& *( convertFW2Salt - salt_EvPrRn ) |
./pkg/shelfice/shelfice_thermodynamics.F |
199 |
SHELFICE_THERMODYNAMICS |
convertFW2SaltLoc = convertFW2Salt |
./model/src/ini_parms.F |
235 |
INI_PARMS |
& selectAddFluid, useRealFreshWaterFlux, convertFW2Salt, |
./model/src/ini_parms.F |
600 |
INI_PARMS |
IF (convertFW2Salt.EQ.UNSET_RL) THEN |
./model/src/ini_parms.F |
601 |
INI_PARMS |
convertFW2Salt = 35. |
./model/src/ini_parms.F |
602 |
INI_PARMS |
IF (useRealFreshWaterFlux) convertFW2Salt=-1 |
./model/src/ini_parms.F |
603 |
INI_PARMS |
IF ( selectAddFluid.GE.1 ) convertFW2Salt=-1 |
./verification/rotating_tank/code/apply_forcing.F |
518 |
APPLY_FORCING_T |
& .OR. convertFW2Salt.EQ.-1. _d 0 ) THEN |
./verification/rotating_tank/code/apply_forcing.F |
938 |
APPLY_FORCING_S |
& .OR. convertFW2Salt.EQ.-1. _d 0 ) THEN |
./model/src/set_defaults.F |
113 |
SET_DEFAULTS |
convertFW2Salt = UNSET_RL |
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
100 |
PTRACERS_FORCING_SURF |
add2EmP(i,j) = relaxForcingS(i,j)/convertFW2Salt |
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
154 |
PTRACERS_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
88 |
PTRACERS_FORCING_SURF |
& .OR.convertFW2Salt .EQ. -1. ) THEN |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
291 |
EXTERNAL_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
337 |
EXTERNAL_FORCING_SURF |
& *( convertFW2Salt - salt_EvPrRn ) |
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
291 |
EXTERNAL_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
337 |
EXTERNAL_FORCING_SURF |
& *( convertFW2Salt - salt_EvPrRn ) |
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
148 |
PTRACERS_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
83 |
PTRACERS_FORCING_SURF |
& .OR.convertFW2Salt .EQ. -1. ) THEN |
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
95 |
PTRACERS_FORCING_SURF |
add2EmP(i,j) = relaxForcingS(i,j)/convertFW2Salt |
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
148 |
PTRACERS_FORCING_SURF |
IF (convertFW2Salt .EQ. -1.) THEN |
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
83 |
PTRACERS_FORCING_SURF |
& .OR.convertFW2Salt .EQ. -1. ) THEN |
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
95 |
PTRACERS_FORCING_SURF |
add2EmP(i,j) = relaxForcingS(i,j)/convertFW2Salt |
./pkg/atm2d/relax_add.F |
141 |
RELAX_ADD |
& (convertFW2Salt *recip_drF(1))*nearIce |