File |
Line number |
Procedure |
Code |
./pkg/obcs/obcs_init_variables.F |
394 |
OBCS_INIT_VARIABLES |
IF ( nIter0.EQ.PTRACERS_Iter0 ) THEN |
./pkg/obcs/obcs_init_variables.F |
413 |
OBCS_INIT_VARIABLES |
IF ( nIter0.EQ.PTRACERS_Iter0 .AND. useOBCSprescribe ) THEN |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
76 |
OCN_CPL_READ_PICKUP |
IF (nIter0.GT.PTRACERS_Iter0) THEN |
./pkg/ptracers/PTRACERS_PARAMS.h |
53 |
NO PROCEDURE |
INTEGER PTRACERS_Iter0 |
./pkg/ptracers/PTRACERS_PARAMS.h |
57 |
NO PROCEDURE |
& PTRACERS_Iter0, |
./pkg/ptracers/ptracers_init_fixed.F |
47 |
PTRACERS_INIT_FIXED |
PTRACERS_startAB(iTracer) = nIter0 - PTRACERS_Iter0 |
./pkg/ptracers/ptracers_init_varia.F |
116 |
PTRACERS_INIT_VARIA |
IF ( nIter0.GT.PTRACERS_Iter0 .OR. |
./pkg/ptracers/ptracers_init_varia.F |
117 |
PTRACERS_INIT_VARIA |
& (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ') |
./pkg/ptracers/ptracers_init_varia.F |
89 |
PTRACERS_INIT_VARIA |
IF (nIter0.EQ.PTRACERS_Iter0) THEN |
./pkg/ptracers/ptracers_readparms.F |
102 |
PTRACERS_READPARMS |
PTRACERS_Iter0 = 0 |
./pkg/ptracers/ptracers_readparms.F |
302 |
PTRACERS_READPARMS |
CALL WRITE_0D_I( PTRACERS_Iter0, INDEX_NONE, |
./pkg/ptracers/ptracers_readparms.F |
71 |
PTRACERS_READPARMS |
& PTRACERS_Iter0, |
./pkg/cfc/cfc11_forcing.F |
67 |
CFC11_FORCING |
myYear=float(myIter-PTRACERS_Iter0)*deltaTclock |
./pkg/cfc/cfc12_forcing.F |
67 |
CFC12_FORCING |
myYear=float(myIter-PTRACERS_Iter0)*deltaTclock |
./pkg/dic/dic_atmos.F |
173 |
DIC_ATMOS |
IF ( nIter0.GT.PTRACERS_Iter0 .OR. |
./pkg/dic/dic_atmos.F |
174 |
DIC_ATMOS |
& (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ') |
./pkg/dic/dic_surfforcing_init.F |
163 |
DIC_SURFFORCING_INIT |
IF ( nIter0.GT.PTRACERS_Iter0 .OR. |
./pkg/dic/dic_surfforcing_init.F |
164 |
DIC_SURFFORCING_INIT |
& (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ') |