| File |
Line number |
Procedure |
Code |
|
./model/src/do_oceanic_phys.F |
481 |
DO_OCEANIC_PHYS |
IF ( useCoupler ) THEN |
|
./eesupp/src/all_proc_die.F |
74 |
ALL_PROC_DIE |
IF ( .NOT.( useCoupler |
|
./model/src/do_the_model_io.F |
202 |
DO_THE_MODEL_IO |
IF ( useCoupler ) |
|
./model/src/forward_step.F |
414 |
FORWARD_STEP |
IF ( useCoupler ) THEN |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
384 |
AIM_SURF_BC |
IF ( useCoupler ) THEN |
|
./model/src/initialise_fixed.F |
277 |
INITIALISE_FIXED |
IF ( useCoupler ) THEN |
|
./model/src/packages_boot.F |
396 |
PACKAGES_BOOT |
CALL PACKAGES_PRINT_MSG( useCoupler, 'COMPON_COMMUNIC', |
|
./model/src/packages_boot.F |
400 |
PACKAGES_BOOT |
CALL PACKAGES_PRINT_MSG( useCoupler, 'ATM_COMPON_INTERF', |
|
./model/src/packages_boot.F |
404 |
PACKAGES_BOOT |
CALL PACKAGES_PRINT_MSG( useCoupler, 'OCN_COMPON_INTERF', |
|
./model/src/packages_init_fixed.F |
592 |
PACKAGES_INIT_FIXED |
IF ( useCoupler ) THEN |
|
./model/src/packages_init_variables.F |
468 |
PACKAGES_INIT_VARIABLES |
IF (useCoupler) THEN |
|
./model/src/packages_readparms.F |
385 |
PACKAGES_READPARMS |
IF ( useCoupler ) CALL CPL_READPARMS( myThid ) |
|
./model/src/packages_write_pickup.F |
185 |
PACKAGES_WRITE_PICKUP |
IF (useCoupler) THEN |
|
./eesupp/src/eeboot.F |
147 |
EEBOOT |
IF ( useCoupler ) CALL CPL_REGISTER |
|
./eesupp/src/eeboot_minimal.F |
130 |
EEBOOT_MINIMAL |
IF ( useCoupler) CALL CPL_INIT |
|
./eesupp/src/eedie.F |
91 |
EEDIE |
IF ( useCoupler) CALL MPI_BARRIER( MPI_COMM_WORLD, mpiRC ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
93 |
AIM_AIM2DYN |
IF ( useCoupler ) THEN |
|
./eesupp/src/eeset_parms.F |
110 |
EESET_PARMS |
useCoupler = .FALSE. |
|
./eesupp/src/eeset_parms.F |
68 |
EESET_PARMS |
& useCoupler, useNEST_PARENT, useNEST_CHILD, useOASIS, |
|
./pkg/aim_v23/aim_do_co2.F |
63 |
AIM_DO_CO2 |
IF ( useCoupler .AND. useImportFlxCO2 ) THEN |
|
./pkg/aim_v23/aim_do_physics.F |
237 |
AIM_DO_PHYSICS |
IF ( useCoupler ) THEN |
|
./eesupp/src/eewrite_eeenv.F |
157 |
EEWRITE_EEENV |
WRITE(msgBuf,'(A,L5,A)') 'useCoupler=', useCoupler, |
|
./pkg/aim_v23/aim_sice2aim.F |
134 |
AIM_SICE2AIM |
& .AND. .NOT.useCoupler ) |
|
./pkg/aim_v23/aim_surf_bc.F |
353 |
AIM_SURF_BC |
IF ( useCoupler ) THEN |
|
./pkg/atm_phys/atm_phys_driver.F |
146 |
ATM_PHYS_DRIVER |
IF ( useCoupler ) THEN |
|
./pkg/atm_phys/atm_phys_driver.F |
527 |
ATM_PHYS_DRIVER |
IF ( useCoupler ) THEN |
|
./eesupp/inc/EEPARAMS.h |
184 |
NO PROCEDURE |
& useCubedSphereExchange, useCoupler, |
|
./eesupp/inc/EEPARAMS.h |
195 |
NO PROCEDURE |
LOGICAL useCoupler |