File |
Line number |
Procedure |
Code |
./eesupp/src/all_proc_die.F |
61 |
ALL_PROC_DIE |
IF ( .NOT.( useCoupler |
./model/src/do_oceanic_phys.F |
318 |
DO_OCEANIC_PHYS |
IF ( useCoupler ) THEN |
./model/src/do_the_model_io.F |
197 |
DO_THE_MODEL_IO |
IF ( useCoupler ) |
./model/src/forward_step.F |
300 |
FORWARD_STEP |
IF ( useCoupler .AND. cpl_earlyExpImpCall ) THEN |
./model/src/forward_step.F |
574 |
FORWARD_STEP |
IF ( useCoupler .AND. .NOT.cpl_earlyExpImpCall ) THEN |
./verification/OpenAD/code_oad_all/initialise_fixed.F |
184 |
INITIALISE_FIXED |
IF ( useCoupler ) CALL CPL_EXCH_CONFIGS( myThid ) |
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
372 |
AIM_SURF_BC |
IF ( useCoupler ) THEN |
./model/src/initialise_fixed.F |
177 |
INITIALISE_FIXED |
IF ( useCoupler ) CALL CPL_EXCH_CONFIGS( myThid ) |
./model/src/packages_init_fixed.F |
328 |
PACKAGES_INIT_FIXED |
IF ( useCoupler ) CALL CPL_INIT_FIXED( myThid ) |
./model/src/packages_init_variables.F |
375 |
PACKAGES_INIT_VARIABLES |
IF (useCoupler) THEN |
./model/src/packages_readparms.F |
312 |
PACKAGES_READPARMS |
IF ( useCoupler ) CALL CPL_READPARMS( myThid ) |
./model/src/packages_write_pickup.F |
95 |
PACKAGES_WRITE_PICKUP |
IF (useCoupler) THEN |
./eesupp/src/eeboot.F |
153 |
EEBOOT |
IF ( useCoupler ) CALL CPL_REGISTER |
./eesupp/src/eeboot_minimal.F |
116 |
EEBOOT_MINIMAL |
IF ( useCoupler) CALL CPL_INIT |
./eesupp/src/eedie.F |
80 |
EEDIE |
IF ( useCoupler) CALL MPI_BARRIER( MPI_COMM_WORLD, mpiRC ) |
./eesupp/src/eeset_parms.F |
101 |
EESET_PARMS |
useCoupler = .FALSE. |
./eesupp/src/eeset_parms.F |
56 |
EESET_PARMS |
& useCoupler, useNEST_PARENT, useNEST_CHILD, useOASIS, |
./eesupp/src/eewrite_eeenv.F |
157 |
EEWRITE_EEENV |
WRITE(msgBuf,'(A,L5,A)') 'useCoupler=', useCoupler, |
./pkg/aim_v23/aim_aim2dyn_exchanges.F |
72 |
AIM_AIM2DYN_EXCHANGES |
IF ( useCoupler ) THEN |
./pkg/aim_v23/aim_do_physics.F |
192 |
AIM_DO_PHYSICS |
IF ( useCoupler ) THEN |
./pkg/aim_v23/aim_sice2aim.F |
141 |
AIM_SICE2AIM |
& .NOT.(useCoupler.AND.cpl_earlyExpImpCall) ) |
./pkg/aim_v23/aim_surf_bc.F |
353 |
AIM_SURF_BC |
IF ( useCoupler ) THEN |
./eesupp/inc/EEPARAMS.h |
169 |
NO PROCEDURE |
& useCubedSphereExchange, useCoupler, |
./eesupp/inc/EEPARAMS.h |
178 |
NO PROCEDURE |
LOGICAL useCoupler |