Symbol Description Uses
pickupSuff force to start from pickup files (even if nIter0=0) 63


File Line number Procedure Code
./model/inc/PARAMS.h 105 NO PROCEDURE 
      CHARACTER*(10) pickupSuff
./model/inc/PARAMS.h 86 NO PROCEDURE 
     &                pickupSuff, mdsioLocalDir, adTapeDir,
./pkg/generic_advdiff/gad_init_varia.F 63 GAD_INIT_VARIA 
     &                      .AND. pickupSuff.EQ.' ' ) THEN
./pkg/generic_advdiff/gad_read_pickup.F 119 GAD_READ_PICKUP 
        IF (pickupSuff .EQ. ' ') THEN
./pkg/generic_advdiff/gad_read_pickup.F 122 GAD_READ_PICKUP 
          WRITE(fn,'(A,A10)') 'pickup_somS.', pickupSuff
./pkg/generic_advdiff/gad_read_pickup.F 73 GAD_READ_PICKUP 
        IF (pickupSuff .EQ. ' ') THEN
./pkg/generic_advdiff/gad_read_pickup.F 76 GAD_READ_PICKUP 
          WRITE(fn,'(A,A10)') 'pickup_somT.', pickupSuff
./pkg/ggl90/ggl90_checkpoint.F 30 GGL90_READ_PICKUP 
      IF (pickupSuff.EQ.' ') THEN
./pkg/ggl90/ggl90_checkpoint.F 33 GGL90_READ_PICKUP 
         WRITE(suff,'(A10)') pickupSuff
./pkg/ggl90/ggl90_init_varia.F 61 GGL90_INIT_VARIA 
      IF ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) THEN
./pkg/gmredi/gmredi_init_varia.F 112 GMREDI_INIT_VARIA 
     &     .AND. pickupSuff.EQ.' ' )) THEN
./pkg/gmredi/gmredi_read_pickup.F 57 GMREDI_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/gmredi/gmredi_read_pickup.F 60 GMREDI_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_gmredi.',pickupSuff
./pkg/mypackage/mypackage_init_varia.F 74 MYPACKAGE_INIT_VARIA 
     &                           .AND. pickupSuff.EQ.' ' ) THEN
./pkg/mypackage/mypackage_read_pickup.F 56 MYPACKAGE_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/mypackage/mypackage_read_pickup.F 59 MYPACKAGE_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_mypackage.',pickupSuff
./model/src/config_summary.F 647 CONFIG_SUMMARY 
      i = ILNBLNK(pickupSuff)
./model/src/config_summary.F 649 CONFIG_SUMMARY 
        CALL WRITE_0D_C( pickupSuff, 0, INDEX_NONE,
./pkg/obcs/obcs_init_variables.F 416 OBCS_INIT_VARIABLES 
      IF ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) THEN
./pkg/obcs/obcs_init_variables.F 422 OBCS_INIT_VARIABLES 
      IF ( nIter0.EQ.0 .AND. pickupSuff.EQ.' ' ) THEN
./pkg/obcs/obcs_read_pickup.F 43 OBCS_READ_PICKUP 
      IF ( pickupSuff.EQ.' ' ) THEN
./pkg/obcs/obcs_read_pickup.F 46 OBCS_READ_PICKUP 
        suff = pickupSuff
./pkg/ocn_compon_interf/cpl_ini_vars.F 81 CPL_INI_VARS 
     &                   .OR. pickupSuff .NE. ' ' ) THEN
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F 51 OCN_CPL_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F 54 OCN_CPL_READ_PICKUP 
         WRITE(fn,'(A,A10)') 'pickup_cpl.', pickupSuff
./pkg/ptracers/ptracers_init_varia.F 128 PTRACERS_INIT_VARIA 
     &    (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ')
./pkg/ptracers/ptracers_read_pickup.F 106 PTRACERS_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/ptracers/ptracers_read_pickup.F 109 PTRACERS_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_ptracers.',pickupSuff
./pkg/ptracers/ptracers_read_pickup.F 278 PTRACERS_READ_PICKUP 
         IF (pickupSuff .EQ. ' ') THEN
./pkg/ptracers/ptracers_read_pickup.F 283 PTRACERS_READ_PICKUP 
     &                     PTRACERS_ioLabel(iTracer),'.', pickupSuff
./pkg/seaice/seaice_init_varia.F 459 SEAICE_INIT_VARIA 
     &     .AND. pickupSuff .EQ. ' ') ) THEN
./pkg/seaice/seaice_read_pickup.F 66 SEAICE_READ_PICKUP 
      IF (pickupSuff .EQ. ' ') THEN
./pkg/seaice/seaice_read_pickup.F 69 SEAICE_READ_PICKUP 
        WRITE(fn,'(A,A10)') 'pickup_seaice.',pickupSuff
./model/src/ini_fields.F 31 INI_FIELDS 
     &     .AND. pickupSuff .EQ. ' ' ) THEN
./pkg/streamice/streamice_init_varia.F 318 STREAMICE_INIT_VARIA 
     &     .AND. pickupSuff .EQ. ' ') ) THEN
./pkg/streamice/streamice_read_pickup.F 54 STREAMICE_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/streamice/streamice_read_pickup.F 57 STREAMICE_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_streamice.',pickupSuff
./pkg/thsice/thsice_ini_vars.F 113 THSICE_INI_VARS 
     &     ( nIter0.NE.0  .OR. pickupSuff.NE.' ' )
./pkg/thsice/thsice_read_pickup.F 42 THSICE_READ_PICKUP 
        IF (pickupSuff .EQ. ' ') THEN
./pkg/thsice/thsice_read_pickup.F 45 THSICE_READ_PICKUP 
          WRITE(fn,'(A,A10)')    'pickup_ic.',pickupSuff
./model/src/ini_nh_fields.F 53 INI_NH_FIELDS 
     &     .AND. pickupSuff .EQ. ' ' ) THEN
./model/src/ini_parms.F 250 INI_PARMS 
     & chkPtFreq, pChkPtFreq, pickupSuff, pickupStrictlyMatch,
./model/src/read_pickup.F 92 READ_PICKUP 
      IF (pickupSuff .EQ. ' ') THEN
./model/src/read_pickup.F 95 READ_PICKUP 
        WRITE(suff,'(A10)') pickupSuff
./model/src/set_defaults.F 295 SET_DEFAULTS 
      pickupSuff        = ' '
./pkg/atm_phys/atm_phys_init_varia.F 64 ATM_PHYS_INIT_VARIA 
     &                           .AND. pickupSuff.EQ.' ' ) THEN
./pkg/atm_phys/atm_phys_read_pickup.F 56 ATM_PHYS_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/atm_phys/atm_phys_read_pickup.F 59 ATM_PHYS_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_atmPhys.',pickupSuff
./pkg/bbl/bbl_init_varia.F 53 BBL_INIT_VARIA 
     &                           .AND. pickupSuff.EQ.' ' ) THEN
./pkg/bbl/bbl_read_pickup.F 55 BBL_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/bbl/bbl_read_pickup.F 58 BBL_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_bbl.',pickupSuff
./pkg/cd_code/cd_code_ini_vars.F 55 CD_CODE_INI_VARS 
      IF ( nIter0.NE.0 .OR. pickupSuff.NE.' ' ) THEN
./pkg/cd_code/cd_code_read_pickup.F 39 CD_CODE_READ_PICKUP 
      IF (pickupSuff.EQ.' ') THEN
./pkg/cd_code/cd_code_read_pickup.F 42 CD_CODE_READ_PICKUP 
         WRITE(suff,'(A10)') pickupSuff
./pkg/cheapaml/cheapaml_init_varia.F 92 CHEAPAML_INIT_VARIA 
     &                           .AND. pickupSuff.EQ.' ' ) THEN
./pkg/cheapaml/cheapaml_read_pickup.F 58 CHEAPAML_READ_PICKUP 
       IF ( pickupSuff.EQ.' ' ) THEN
./pkg/cheapaml/cheapaml_read_pickup.F 61 CHEAPAML_READ_PICKUP 
        WRITE(fn,'(A,A10)')    'pickup_cheapaml.',pickupSuff
./pkg/dic/dic_ini_atmos.F 153 DIC_INI_ATMOS 
     &       (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ')
./pkg/dic/dic_read_co2_pickup.F 46 DIC_READ_CO2_PICKUP 
        IF (pickupSuff.EQ.' ') THEN
./pkg/dic/dic_read_co2_pickup.F 49 DIC_READ_CO2_PICKUP 
          WRITE(fn,'(A,A10)') 'pickup_dic_co2atm.', pickupSuff
./pkg/dic/dic_read_pickup.F 40 DIC_READ_PICKUP 
      IF (pickupSuff.EQ.' ') THEN
./pkg/dic/dic_read_pickup.F 43 DIC_READ_PICKUP 
        WRITE(fn,'(A,A10)') 'pickup_dic.', pickupSuff
./pkg/dic/dic_surfforcing_init.F 157 DIC_SURFFORCING_INIT 
     &    (nIter0.EQ.PTRACERS_Iter0 .AND. pickupSuff.NE.' ')