File |
Line number |
Procedure |
Code |
./model/inc/PARAMS.h |
749 |
NO PROCEDURE |
& externForcingCycle, externForcingPeriod, |
./model/inc/PARAMS.h |
868 |
NO PROCEDURE |
_RL externForcingCycle |
./pkg/gchem/gchem_readparms.F |
90 |
GCHEM_READPARMS |
gchem_ForcingCycle=externForcingCycle |
./pkg/obcs/obcs_external_fields_load.F |
102 |
OBCS_EXTERNAL_FIELDS_LOAD |
nForcingPeriods = NINT(externForcingCycle/externForcingPeriod) |
./pkg/obcs/obcs_external_fields_load.F |
105 |
OBCS_EXTERNAL_FIELDS_LOAD |
Ifcyc = NINT(externForcingCycle*rdt) |
./model/src/config_summary.F |
582 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( externForcingCycle, INDEX_NONE, |
./model/src/external_fields_load.F |
73 |
EXTERNAL_FIELDS_LOAD |
nForcingPeriods = NINT(externForcingCycle/externForcingPeriod) |
./model/src/external_fields_load.F |
76 |
EXTERNAL_FIELDS_LOAD |
Ifcyc = NINT(externForcingCycle*rdt) |
./model/src/external_fields_load.F |
77 |
EXTERNAL_FIELDS_LOAD |
Imytm = Imytm + Ifcyc*( 1 - NINT(myTime/externForcingCycle) ) |
./model/src/ini_parms.F |
237 |
INI_PARMS |
& periodicExternalForcing, externForcingPeriod, externForcingCycle, |
./model/src/ini_parms.F |
824 |
INI_PARMS |
IF ( externForcingCycle*externForcingPeriod .EQ. 0. ) THEN |
./model/src/ini_parms.F |
830 |
INI_PARMS |
IF ( INT(externForcingCycle/externForcingPeriod) .NE. |
./model/src/ini_parms.F |
831 |
INI_PARMS |
& externForcingCycle/externForcingPeriod ) THEN |
./model/src/ini_parms.F |
837 |
INI_PARMS |
IF ( externForcingCycle.lt.externForcingPeriod ) THEN |
./model/src/set_defaults.F |
307 |
SET_DEFAULTS |
externForcingCycle = 0. |
./pkg/bulk_force/bulkf_fields_load.F |
171 |
BULKF_FIELDS_LOAD |
nForcingPeriods = NINT(externForcingCycle/externForcingPeriod) |
./pkg/bulk_force/bulkf_fields_load.F |
174 |
BULKF_FIELDS_LOAD |
Ifcyc = NINT(externForcingCycle*rdt) |
./pkg/cfc/cfc_readparms.F |
56 |
CFC_READPARMS |
CFC_forcingCycle = externForcingCycle |
./pkg/cheapaml/cheapaml_fields_load.F |
202 |
CHEAPAML_FIELDS_LOAD |
& int(externForcingCycle/externForcingPeriod+0.5) |
./pkg/cheapaml/cheapaml_fields_load.F |
205 |
CHEAPAML_FIELDS_LOAD |
Ifcyc=int(externForcingCycle*rdt+0.5) |
./pkg/dic/dic_atmos.F |
221 |
DIC_ATMOS |
& DIFFERENT_MULTIPLE(externForcingCycle,myTime,deltaTClock) |
./pkg/dic/dic_aver.F |
61 |
DIC_AVER |
nForcingPeriods=int(externForcingCycle/externForcingPeriod+0.5) |
./pkg/dic/dic_aver.F |
64 |
DIC_AVER |
Ifcyc=int(externForcingCycle*rdt+0.5) |
./pkg/dic/dic_readparms.F |
140 |
DIC_READPARMS |
DIC_forcingCycle = externForcingCycle |
./pkg/dic/dic_surfforcing_init.F |
68 |
DIC_SURFFORCING_INIT |
nForcingPeriods = NINT(externForcingCycle/externForcingPeriod) |
./pkg/dic/dic_surfforcing_init.F |
72 |
DIC_SURFFORCING_INIT |
Ifcyc = NINT(externForcingCycle*rdt) |