Symbol Description Uses
externForcingPeriod Is the period of which forcing varies (eg. 1 month) 27



File Line number Procedure Code
./pkg/dic/dic_surfforcing_init.F 66 DIC_SURFFORCING_INIT
     &  int(externForcingCycle/externForcingPeriod+0.5)
./pkg/dic/dic_surfforcing_init.F 69 DIC_SURFFORCING_INIT
       Ifprd=int(externForcingPeriod*rdt+0.5)
./pkg/dic/dic_fields_load.F 56 DIC_FIELDS_LOAD
     &  int(externForcingCycle/externForcingPeriod+0.5)
./pkg/dic/dic_fields_load.F 59 DIC_FIELDS_LOAD
       Ifprd=int(externForcingPeriod*rdt+0.5)
./pkg/dic/dic_aver.F 70 DIC_AVER
      nForcingPeriods=int(externForcingCycle/externForcingPeriod+0.5)
./pkg/dic/dic_aver.F 72 DIC_AVER
      Ifprd=int(externForcingPeriod*rdt+0.5)
./pkg/obcs/obcs_external_fields_load.F 77 OBCS_EXTERNAL_FIELDS_LOAD
      nForcingPeriods=int(externForcingCycle/externForcingPeriod+0.5)
./pkg/obcs/obcs_external_fields_load.F 79 OBCS_EXTERNAL_FIELDS_LOAD
      Ifprd=int(externForcingPeriod*rdt+0.5)
./pkg/bulk_force/bulkf_fields_load.F 179 BULKF_FIELDS_LOAD
     &  int(externForcingCycle/externForcingPeriod+0.5)
./pkg/bulk_force/bulkf_fields_load.F 181 BULKF_FIELDS_LOAD
      Ifprd=int(externForcingPeriod*rdt+0.5)
./model/src/external_fields_load.F 100 EXTERNAL_FIELDS_LOAD
      Ifprd = NINT(externForcingPeriod*rdt)
./model/src/external_fields_load.F 98 EXTERNAL_FIELDS_LOAD
      nForcingPeriods = NINT(externForcingCycle/externForcingPeriod)
./model/src/config_summary.F 439 CONFIG_SUMMARY
      CALL WRITE_0D_R8( externForcingPeriod, INDEX_NONE,
./verification/natl_box/code/external_fields_load.F 91 EXTERNAL_FIELDS_LOAD
      nForcingPeriods=int(externForcingCycle/externForcingPeriod)
./verification/natl_box/code/external_fields_load.F 93 EXTERNAL_FIELDS_LOAD
      Ifprd=int(externForcingPeriod*rdt)
./verification/natl_box/code/external_fields_load.F 99 EXTERNAL_FIELDS_LOAD
      aWght=mod(myTime/externForcingPeriod,1. _d 0)
./model/src/ini_parms.F 204 INI_PARMS
     & periodicExternalForcing, externForcingPeriod, externForcingCycle,
./model/src/ini_parms.F 745 INI_PARMS
       IF ( externForcingCycle*externForcingPeriod .EQ. 0. ) THEN
./model/src/ini_parms.F 751 INI_PARMS
       IF ( INT(externForcingCycle/externForcingPeriod) .NE.
./model/src/ini_parms.F 752 INI_PARMS
     &          externForcingCycle/externForcingPeriod ) THEN
./model/src/ini_parms.F 758 INI_PARMS
       IF ( externForcingCycle.lt.externForcingPeriod ) THEN
./model/src/ini_parms.F 764 INI_PARMS
       IF ( externForcingPeriod.lt.deltaTclock ) THEN
./model/inc/PARAMS.h 601 NO PROCEDURE
     & externForcingCycle, externForcingPeriod,
./model/inc/PARAMS.h 713 NO PROCEDURE
      _RL externForcingPeriod
./pkg/cfc/cfc_fields_load.F 67 CFC_FIELDS_LOAD
     &  int(externForcingCycle/externForcingPeriod+0.5)
./pkg/cfc/cfc_fields_load.F 70 CFC_FIELDS_LOAD
       Ifprd=int(externForcingPeriod*rdt+0.5)
./model/src/set_defaults.F 270 SET_DEFAULTS
      externForcingPeriod     = 0.