File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
948 |
NO PROCEDURE |
LOGICAL useAIM |
./model/inc/PARAMS.h |
968 |
NO PROCEDURE |
& useATM2D, useAIM, useLand, useFizhi, useGridAlt, |
./pkg/generic_advdiff/gad_advection.F |
727 |
GAD_ADVECTION |
& (useAIM .AND. tracerIdentity.EQ.GAD_SALINITY .AND. k.EQ.Nr) |
./pkg/generic_advdiff/gad_calc_rhs.F |
444 |
GAD_CALC_RHS |
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.k.LT.Nr) |
./pkg/generic_advdiff/gad_implicit_r.F |
220 |
GAD_IMPLICIT_R |
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.K.LT.Nr) |
./pkg/land/land_initialise.F |
47 |
LAND_INITIALISE |
IF ( .NOT.useAIM ) THEN |
./pkg/monitor/mon_surfcor.F |
100 |
MON_SURFCOR |
IF ( useAIM ) THEN |
./model/src/do_atmospheric_phys.F |
60 |
DO_ATMOSPHERIC_PHYS |
IF ( useAIM ) THEN |
./model/src/do_the_model_io.F |
90 |
DO_THE_MODEL_IO |
IF ( useAIM ) |
./model/src/external_forcing.F |
167 |
EXTERNAL_FORCING_V |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V( |
./model/src/external_forcing.F |
279 |
EXTERNAL_FORCING_T |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T( |
./model/src/external_forcing.F |
463 |
EXTERNAL_FORCING_S |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S( |
./model/src/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U( |
./pkg/thsice/thsice_ini_vars.F |
96 |
THSICE_INI_VARS |
IF ( useAIM ) THEN |
./verification/OpenAD/code_oad_all/gad_implicit_r.F |
218 |
GAD_IMPLICIT_R |
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.K.LT.Nr) |
./model/src/load_fields_driver.F |
205 |
LOAD_FIELDS_DRIVER |
IF ( useAIM ) THEN |
./verification/rotating_tank/code/external_forcing.F |
161 |
EXTERNAL_FORCING_V |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V( |
./verification/rotating_tank/code/external_forcing.F |
309 |
EXTERNAL_FORCING_T |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T( |
./verification/rotating_tank/code/external_forcing.F |
493 |
EXTERNAL_FORCING_S |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S( |
./verification/rotating_tank/code/external_forcing.F |
63 |
EXTERNAL_FORCING_U |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U( |
./model/src/packages_boot.F |
137 |
PACKAGES_BOOT |
useAIM =.FALSE. |
./model/src/packages_boot.F |
79 |
PACKAGES_BOOT |
& useAIM, |
./verification/tidal_basin_2d/code/external_forcing.F |
192 |
EXTERNAL_FORCING_V |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V( |
./verification/tidal_basin_2d/code/external_forcing.F |
297 |
EXTERNAL_FORCING_T |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T( |
./verification/tidal_basin_2d/code/external_forcing.F |
414 |
EXTERNAL_FORCING_S |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S( |
./verification/tidal_basin_2d/code/external_forcing.F |
65 |
EXTERNAL_FORCING_U |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U( |
./model/src/packages_check.F |
203 |
PACKAGES_CHECK |
IF (useAIM) CALL PACKAGES_ERROR_MSG('AIM',' ',myThid) |
./model/src/packages_init_fixed.F |
221 |
PACKAGES_INIT_FIXED |
IF (useAIM) CALL AIM_INITIALISE( myThid ) |