| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
1048 |
NO PROCEDURE |
LOGICAL useAIM |
|
./model/inc/PARAMS.h |
1069 |
NO PROCEDURE |
& useATM2D, useAIM, useAtm_Phys, useFizhi, useGridAlt, |
|
./pkg/generic_advdiff/gad_advection.F |
918 |
GAD_ADVECTION |
& (useAIM .AND. trIdentity.EQ.GAD_SALINITY .AND. k.EQ.Nr) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
492 |
GAD_CALC_RHS |
& (.NOT.useAIM .OR. trIdentity.NE.GAD_SALINITY .OR. k.LT.Nr) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
185 |
GAD_DIAGNOSTICS_INIT |
IF ( useAIM ) THEN |
|
./pkg/generic_advdiff/gad_implicit_r.F |
208 |
GAD_IMPLICIT_R |
& (.NOT.useAIM .OR.tracerIdentity.NE.GAD_SALINITY .OR.k.LT.Nr) |
|
./model/src/apply_forcing.F |
109 |
APPLY_FORCING_U |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U( |
|
./model/src/apply_forcing.F |
299 |
APPLY_FORCING_V |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V( |
|
./model/src/apply_forcing.F |
493 |
APPLY_FORCING_T |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T( |
|
./model/src/apply_forcing.F |
858 |
APPLY_FORCING_S |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S( |
|
./pkg/land/land_check.F |
188 |
LAND_CHECK |
IF ( .NOT.useAIM ) THEN |
|
./pkg/monitor/mon_surfcor.F |
104 |
MON_SURFCOR |
IF ( useAIM ) THEN |
|
./model/src/do_atmospheric_phys.F |
141 |
DO_ATMOSPHERIC_PHYS |
IF ( useAIM ) THEN |
|
./model/src/do_the_model_io.F |
144 |
DO_THE_MODEL_IO |
IF ( useAIM ) |
|
./model/src/external_forcing.F |
212 |
EXTERNAL_FORCING_V |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V( |
|
./model/src/external_forcing.F |
365 |
EXTERNAL_FORCING_T |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T( |
|
./model/src/external_forcing.F |
687 |
EXTERNAL_FORCING_S |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S( |
|
./model/src/external_forcing.F |
72 |
EXTERNAL_FORCING_U |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U( |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
68 |
SHAP_FILT_DIAGNOSTICS_INIT |
IF ( fluidIsWater .OR. useAIM ) trUnits = 'g/kg' |
|
./pkg/thsice/thsice_check.F |
115 |
THSICE_CHECK |
IF ( useAIM .AND. .NOT.( stepFwd_oceMxL .OR. useCoupler ) |
|
./pkg/thsice/thsice_check.F |
48 |
THSICE_CHECK |
& .OR. useAIM .OR. useCheapAML .OR. useATM2d ) ) THEN |
|
./pkg/thsice/thsice_ini_vars.F |
94 |
THSICE_INI_VARS |
IF ( useAIM ) THEN |
|
./model/src/load_fields_driver.F |
196 |
LOAD_FIELDS_DRIVER |
IF ( useAIM ) THEN |
|
./model/src/packages_boot.F |
153 |
PACKAGES_BOOT |
useAIM =.FALSE. |
|
./model/src/packages_boot.F |
378 |
PACKAGES_BOOT |
CALL PACKAGES_PRINT_MSG( useAIM, 'aim_v23', 'useAIM' ) |
|
./model/src/packages_boot.F |
89 |
PACKAGES_BOOT |
& useAIM, |
|
./model/src/packages_check.F |
375 |
PACKAGES_CHECK |
IF (useAIM) CALL PACKAGES_ERROR_MSG('AIM',' ',myThid) |
|
./model/src/packages_init_fixed.F |
518 |
PACKAGES_INIT_FIXED |
IF (useAIM) THEN |
|
./verification/rotating_tank/code/apply_forcing.F |
100 |
APPLY_FORCING_U |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_U( |
|
./verification/rotating_tank/code/apply_forcing.F |
269 |
APPLY_FORCING_V |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_V( |
|
./verification/rotating_tank/code/apply_forcing.F |
495 |
APPLY_FORCING_T |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_T( |
|
./verification/rotating_tank/code/apply_forcing.F |
915 |
APPLY_FORCING_S |
IF ( useAIM ) CALL AIM_TENDENCY_APPLY_S( |
|
./pkg/atm_compon_interf/atm_get_atmconfig.F |
62 |
ATM_GET_ATMCONFIG |
IF ( useAIM ) THEN |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
52 |
ATM_STORE_MY_DATA |
IF ( useAIM ) THEN |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
55 |
ATM_STORE_MY_DATA |
IF ( useAIM .AND. atm_cplExch_DIC ) THEN |
|
./pkg/diagnostics/diagnostics_main_init.F |
108 |
DIAGNOSTICS_MAIN_INIT |
IF (useAIM) sUnit5c= 'g/kg ' |