File |
Line number |
Procedure |
Code |
./pkg/exf/EXF_PARAM.h |
482 |
NO PROCEDURE |
& useAtmWind, useRelativeWind, noNegativeEvap, |
./pkg/exf/EXF_PARAM.h |
82 |
NO PROCEDURE |
LOGICAL useAtmWind |
./pkg/exf/exf_ad_dump.F |
121 |
EXF_AD_DUMP |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_adjoint_snapshots__g.F |
104 |
G_EXF_ADJOINT_SNAPSHOTS |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_adjoint_snapshots_ad.F |
132 |
ADEXF_ADJOINT_SNAPSHOTS |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_adjoint_snapshots_ad.F |
194 |
ADEXF_ADJOINT_SNAPSHOTS |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_adjoint_snapshots_ad.F |
269 |
ADEXF_ADJOINT_SNAPSHOTS |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_bulkformulae.F |
232 |
EXF_BULKFORMULAE |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_bulkformulae.F |
501 |
EXF_BULKFORMULAE |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_bulkformulae.F |
514 |
EXF_BULKFORMULAE |
IF ( useAtmWind ) ustress(i,j,bi,bj) = 0. _d 0 |
./pkg/exf/exf_bulkformulae.F |
515 |
EXF_BULKFORMULAE |
IF ( useAtmWind ) vstress(i,j,bi,bj) = 0. _d 0 |
./pkg/exf/exf_check.F |
109 |
EXF_CHECK |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_check.F |
126 |
EXF_CHECK |
IF ( .NOT.useAtmWind ) THEN |
./pkg/exf/exf_check.F |
136 |
EXF_CHECK |
IF ( wspeedfile.NE.' ' .AND. .NOT.useAtmWind ) THEN |
./pkg/exf/exf_check_range.F |
89 |
EXF_CHECK_RANGE |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_getffields.F |
124 |
EXF_GETFFIELDS |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_getffields.F |
585 |
EXF_GETFFIELDS |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_getffields.F |
76 |
EXF_GETFFIELDS |
IF ( .NOT.useAtmWind ) THEN |
./pkg/exf/exf_getforcing.F |
162 |
EXF_GETFORCING |
IF ( .NOT.useAtmWind ) THEN |
./pkg/exf/exf_getsurfacefluxes.F |
153 |
EXF_GETSURFACEFLUXES |
IF ( .NOT.useAtmWind ) THEN |
./pkg/exf/exf_getsurfacefluxes.F |
196 |
EXF_GETSURFACEFLUXES |
IF ( (useCTRL).AND.(.NOT.useAtmWind) ) THEN |
./pkg/exf/exf_init_fixed.F |
125 |
EXF_INIT_FIXED |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_init_fixed.F |
159 |
EXF_INIT_FIXED |
IF ( .NOT.useAtmWind ) THEN |
./pkg/exf/exf_init_varia.F |
103 |
EXF_INIT_VARIA |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_init_varia.F |
62 |
EXF_INIT_VARIA |
IF ( .NOT.useAtmWind ) THEN |
./pkg/exf/exf_monitor.F |
131 |
EXF_MONITOR |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_monitor_ad.F |
134 |
ADEXF_MONITOR |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_readparms.F |
1062 |
EXF_READPARMS |
IF ( useAtmWind ) stressIsOnCgrid = .FALSE. |
./pkg/exf/exf_readparms.F |
328 |
EXF_READPARMS |
useAtmWind = .TRUE. |
./pkg/exf/exf_readparms.F |
330 |
EXF_READPARMS |
useAtmWind = .FALSE. |
./pkg/exf/exf_readparms.F |
89 |
EXF_READPARMS |
& rotateStressOnAgrid, useAtmWind, useRelativeWind, noNegativeEvap, |
./pkg/exf/exf_summary.F |
241 |
EXF_SUMMARY |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_summary.F |
285 |
EXF_SUMMARY |
IF ( .NOT.useAtmWind .AND. ustressfile.NE.' ' ) THEN |
./pkg/exf/exf_summary.F |
298 |
EXF_SUMMARY |
IF ( .NOT.useAtmWind .AND. vstressfile.NE.' ' ) THEN |
./pkg/exf/exf_summary.F |
356 |
EXF_SUMMARY |
IF ( useAtmWind .AND. uwindfile.NE.' ' ) THEN |
./pkg/exf/exf_summary.F |
369 |
EXF_SUMMARY |
IF ( useAtmWind .AND. vwindfile.NE.' ' ) THEN |
./pkg/exf/exf_wind.F |
111 |
EXF_WIND |
IF ( useAtmWind ) THEN |
./pkg/exf/exf_wind.F |
255 |
EXF_WIND |
IF ( useAtmWind ) THEN |
./pkg/seaice/seaice_check.F |
649 |
SEAICE_CHECK |
IF ( .NOT.useAtmWind ) THEN |
./pkg/seaice/seaice_get_dynforcing.F |
139 |
SEAICE_GET_DYNFORCING |
IF ( useEXF .AND. useAtmWind ) THEN |
./pkg/seaice/seaice_growth.F |
756 |
SEAICE_GROWTH |
IF (useRelativeWind.AND.useAtmWind) THEN |
./pkg/autodiff/autodiff_ini_model_io.F |
324 |
AUTODIFF_INI_MODEL_IO |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_check.F |
164 |
CTRL_CHECK |
IF ( .NOT.useEXF .OR. .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_check.F |
178 |
CTRL_CHECK |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_check.F |
204 |
CTRL_CHECK |
if ( useAtmWind ) then |
./pkg/ctrl/ctrl_init.F |
252 |
CTRL_INIT |
IF ( .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_init.F |
281 |
CTRL_INIT |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_init.F |
299 |
CTRL_INIT |
IF ( .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_init.F |
328 |
CTRL_INIT |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_pack.F |
355 |
CTRL_PACK |
IF ( .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_pack.F |
376 |
CTRL_PACK |
IF ( .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_pack.F |
417 |
CTRL_PACK |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_pack.F |
433 |
CTRL_PACK |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_unpack.F |
443 |
CTRL_UNPACK |
IF ( .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_unpack.F |
464 |
CTRL_UNPACK |
IF ( .NOT.useAtmWind ) THEN |
./pkg/ctrl/ctrl_unpack.F |
505 |
CTRL_UNPACK |
IF ( useAtmWind ) THEN |
./pkg/ctrl/ctrl_unpack.F |
521 |
CTRL_UNPACK |
IF ( useAtmWind ) THEN |
./pkg/ecco/cost_forcing.F |
156 |
COST_FORCING |
IF ( (.NOT.useAtmWind).AND.(.NOT.ctrlUseGen) ) THEN |
./pkg/ecco/cost_forcing.F |
177 |
COST_FORCING |
IF ( useAtmWind ) THEN |
./pkg/ecco/cost_forcing.F |
198 |
COST_FORCING |
IF ( (.NOT.useAtmWind).AND.(.NOT.ctrlUseGen) ) THEN |
./pkg/ecco/cost_forcing.F |
219 |
COST_FORCING |
IF ( useAtmWind ) THEN |
./pkg/ecco/cost_forcing.F |
66 |
COST_FORCING |
LOGICAL useAtmWind |
./pkg/ecco/cost_forcing.F |
67 |
COST_FORCING |
PARAMETER ( useAtmWind = .TRUE. ) |