Symbol Description Uses
nbFields number of fields in pickup file (read from meta file) 70



File Line number Procedure Code
./pkg/gmredi/gmredi_read_pickup.F 100 GMREDI_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./pkg/gmredi/gmredi_read_pickup.F 124 GMREDI_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/gmredi/gmredi_read_pickup.F 44 GMREDI_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/gmredi/gmredi_read_pickup.F 66 GMREDI_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/gmredi/gmredi_read_pickup.F 70 GMREDI_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/gmredi/gmredi_read_pickup.F 82 GMREDI_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/mypackage/mypackage_read_pickup.F 123 MYPACKAGE_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/mypackage/mypackage_read_pickup.F 45 MYPACKAGE_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/mypackage/mypackage_read_pickup.F 65 MYPACKAGE_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/mypackage/mypackage_read_pickup.F 69 MYPACKAGE_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/mypackage/mypackage_read_pickup.F 81 MYPACKAGE_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/mypackage/mypackage_read_pickup.F 99 MYPACKAGE_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./model/src/check_pickup.F 13 CHECK_PICKUP
     I                 nMissing, nbFields,
./model/src/check_pickup.F 39 CHECK_PICKUP
      INTEGER nbFields
./model/src/check_pickup.F 60 CHECK_PICKUP
       IF ( nbFields.GE.1 ) THEN
./model/src/check_pickup.F 70 CHECK_PICKUP
         IF ( nbFields.EQ.0 ) THEN
./pkg/ptracers/ptracers_check_pickup.F 12 PTRACERS_CHECK_PICKUP
     I                 nMissing, nbFields,
./pkg/ptracers/ptracers_check_pickup.F 37 PTRACERS_CHECK_PICKUP
      INTEGER nbFields
./pkg/ptracers/ptracers_read_pickup.F 115 PTRACERS_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/ptracers/ptracers_read_pickup.F 119 PTRACERS_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.prec ) THEN
./pkg/ptracers/ptracers_read_pickup.F 130 PTRACERS_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/ptracers/ptracers_read_pickup.F 147 PTRACERS_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./pkg/ptracers/ptracers_read_pickup.F 167 PTRACERS_READ_PICKUP
       IF ( nbFields.EQ.0 .AND. usePickupBeforeC54 ) THEN
./pkg/ptracers/ptracers_read_pickup.F 196 PTRACERS_READ_PICKUP
       ELSEIF ( nbFields.EQ.0 ) THEN
./pkg/ptracers/ptracers_read_pickup.F 262 PTRACERS_READ_PICKUP
     I                     nMissing, nbFields,
./pkg/ptracers/ptracers_read_pickup.F 52 PTRACERS_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/rw/read_mflds.F 121 READ_MFLDS_SET
      nbFields = 0
./pkg/rw/read_mflds.F 232 READ_MFLDS_SET
      nbFields = nFlds
./pkg/rw/read_mflds.F 64 READ_MFLDS_SET
     O                      nbFields, filePrec,
./pkg/rw/read_mflds.F 91 READ_MFLDS_SET
      INTEGER nbFields
./pkg/seaice/seaice_check_pickup.F 11 SEAICE_CHECK_PICKUP
     I                        nMissing, nbFields,
./pkg/seaice/seaice_check_pickup.F 39 SEAICE_CHECK_PICKUP
      INTEGER nbFields
./pkg/seaice/seaice_read_pickup.F 116 SEAICE_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./pkg/seaice/seaice_read_pickup.F 136 SEAICE_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/seaice/seaice_read_pickup.F 292 SEAICE_READ_PICKUP
     I                    nMissing, nbFields,
./pkg/seaice/seaice_read_pickup.F 51 SEAICE_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/seaice/seaice_read_pickup.F 82 SEAICE_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/seaice/seaice_read_pickup.F 86 SEAICE_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/seaice/seaice_read_pickup.F 99 SEAICE_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/streamice/streamice_read_pickup.F 121 STREAMICE_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/streamice/streamice_read_pickup.F 43 STREAMICE_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/streamice/streamice_read_pickup.F 63 STREAMICE_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/streamice/streamice_read_pickup.F 67 STREAMICE_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/streamice/streamice_read_pickup.F 79 STREAMICE_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/streamice/streamice_read_pickup.F 97 STREAMICE_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./model/src/read_pickup.F 110 READ_PICKUP
     O                      nbFields, filePrec,
./model/src/read_pickup.F 115 READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./model/src/read_pickup.F 128 READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./model/src/read_pickup.F 146 READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./model/src/read_pickup.F 166 READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./model/src/read_pickup.F 445 READ_PICKUP
     I                    nMissing, nbFields,
./model/src/read_pickup.F 68 READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/atm_phys/atm_phys_read_pickup.F 123 ATM_PHYS_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/atm_phys/atm_phys_read_pickup.F 45 ATM_PHYS_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/atm_phys/atm_phys_read_pickup.F 65 ATM_PHYS_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/atm_phys/atm_phys_read_pickup.F 69 ATM_PHYS_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/atm_phys/atm_phys_read_pickup.F 81 ATM_PHYS_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/atm_phys/atm_phys_read_pickup.F 99 ATM_PHYS_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./pkg/bbl/bbl_read_pickup.F 112 BBL_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/bbl/bbl_read_pickup.F 44 BBL_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/bbl/bbl_read_pickup.F 64 BBL_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/bbl/bbl_read_pickup.F 68 BBL_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/bbl/bbl_read_pickup.F 79 BBL_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/bbl/bbl_read_pickup.F 96 BBL_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN
./pkg/cheapaml/cheapaml_read_pickup.F 122 CHEAPAML_READ_PICKUP
       IF ( nbFields.EQ.0 ) THEN
./pkg/cheapaml/cheapaml_read_pickup.F 45 CHEAPAML_READ_PICKUP
      INTEGER filePrec, nbFields
./pkg/cheapaml/cheapaml_read_pickup.F 67 CHEAPAML_READ_PICKUP
     O                      nbFields, filePrec,
./pkg/cheapaml/cheapaml_read_pickup.F 71 CHEAPAML_READ_PICKUP
       IF ( nbFields.GE.0 .AND. filePrec.NE.fp ) THEN
./pkg/cheapaml/cheapaml_read_pickup.F 82 CHEAPAML_READ_PICKUP
       IF ( nbFields.LE.0 ) THEN
./pkg/cheapaml/cheapaml_read_pickup.F 99 CHEAPAML_READ_PICKUP
         IF ( nbFields.EQ.-1 ) THEN