Symbol Description Uses
wrFldList list of written fields 107



File Line number Procedure Code
./pkg/gmredi/gmredi_write_pickup.F 114 GMREDI_WRITE_PICKUP
       IF (m.LE.listDim) wrFldList(m) = fieldname
./pkg/gmredi/gmredi_write_pickup.F 134 GMREDI_WRITE_PICKUP
       IF (m.LE.listDim) wrFldList(m) = fieldname
./pkg/gmredi/gmredi_write_pickup.F 147 GMREDI_WRITE_PICKUP
      IF (m.LE.listDim) wrFldList(m) = fieldname
./pkg/gmredi/gmredi_write_pickup.F 172 GMREDI_WRITE_PICKUP
     &     nWrFlds, wrFldList,
./pkg/gmredi/gmredi_write_pickup.F 60 GMREDI_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/gmredi/gmredi_write_pickup.F 95 GMREDI_WRITE_PICKUP
      IF (m.LE.listDim) wrFldList(m) = fieldname
./pkg/mypackage/mypackage_write_pickup.F 106 MYPACKAGE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'myPaSur1'
./pkg/mypackage/mypackage_write_pickup.F 112 MYPACKAGE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'myPaSur2'
./pkg/mypackage/mypackage_write_pickup.F 139 MYPACKAGE_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/mypackage/mypackage_write_pickup.F 61 MYPACKAGE_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/mypackage/mypackage_write_pickup.F 81 MYPACKAGE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'myPaSta1'
./pkg/mypackage/mypackage_write_pickup.F 86 MYPACKAGE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'myPaSta2'
./pkg/mypackage/mypackage_write_pickup.F 91 MYPACKAGE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'myPaStaU'
./pkg/mypackage/mypackage_write_pickup.F 95 MYPACKAGE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'myPaStaV'
./pkg/ptracers/ptracers_write_pickup.F 140 PTRACERS_WRITE_PICKUP
     &      wrFldList(j) = 'pTr'//PTRACERS_ioLabel(iTracer)//'   '
./pkg/ptracers/ptracers_write_pickup.F 152 PTRACERS_WRITE_PICKUP
     &      wrFldList(j) = 'gPtr'//PTRACERS_ioLabel(iTracer)//'m1'
./pkg/ptracers/ptracers_write_pickup.F 154 PTRACERS_WRITE_PICKUP
     &      wrFldList(j) = 'pTr'//PTRACERS_ioLabel(iTracer)//'Nm1'
./pkg/ptracers/ptracers_write_pickup.F 176 PTRACERS_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/ptracers/ptracers_write_pickup.F 65 PTRACERS_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/seaice/seaice_write_pickup.F 106 SEAICE_WRITE_PICKUP
         IF (j.LE.listDim) wrFldList(j) = 'siTICES '
./pkg/seaice/seaice_write_pickup.F 113 SEAICE_WRITE_PICKUP
         IF (j.LE.listDim) wrFldList(j) = 'siTICE  '
./pkg/seaice/seaice_write_pickup.F 120 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siAREA  '
./pkg/seaice/seaice_write_pickup.F 124 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siHEFF  '
./pkg/seaice/seaice_write_pickup.F 128 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siHSNOW '
./pkg/seaice/seaice_write_pickup.F 136 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siHSALT '
./pkg/seaice/seaice_write_pickup.F 146 SEAICE_WRITE_PICKUP
          IF (j.LE.listDim) wrFldList(j) = fldName
./pkg/seaice/seaice_write_pickup.F 155 SEAICE_WRITE_PICKUP
       IF (j.LE.listDim)  wrFldList(j) = 'siUICE  '
./pkg/seaice/seaice_write_pickup.F 160 SEAICE_WRITE_PICKUP
       IF (j.LE.listDim)  wrFldList(j) = 'siVICE  '
./pkg/seaice/seaice_write_pickup.F 166 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim)  wrFldList(j) = 'siUicNm1'
./pkg/seaice/seaice_write_pickup.F 171 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim)  wrFldList(j) = 'siVicNm1'
./pkg/seaice/seaice_write_pickup.F 179 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siSigm1 '
./pkg/seaice/seaice_write_pickup.F 185 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siSigm2 '
./pkg/seaice/seaice_write_pickup.F 191 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siSigm12'
./pkg/seaice/seaice_write_pickup.F 213 SEAICE_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/seaice/seaice_write_pickup.F 61 SEAICE_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/seaice/seaice_write_pickup.F 87 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siTICES '
./pkg/seaice/seaice_write_pickup.F 90 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siAREAn '
./pkg/seaice/seaice_write_pickup.F 93 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siHEFFn '
./pkg/seaice/seaice_write_pickup.F 96 SEAICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'siHSNOWn'
./pkg/streamice/streamice_write_pickup.F 101 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_uvel '
./pkg/streamice/streamice_write_pickup.F 107 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_vvel '
./pkg/streamice/streamice_write_pickup.F 113 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_thick'
./pkg/streamice/streamice_write_pickup.F 119 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_betaF'
./pkg/streamice/streamice_write_pickup.F 125 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_visc '
./pkg/streamice/streamice_write_pickup.F 132 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_taubx'
./pkg/streamice/streamice_write_pickup.F 138 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_tauby'
./pkg/streamice/streamice_write_pickup.F 171 STREAMICE_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/streamice/streamice_write_pickup.F 59 STREAMICE_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/streamice/streamice_write_pickup.F 79 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'visc3d  '
./pkg/streamice/streamice_write_pickup.F 89 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_area '
./pkg/streamice/streamice_write_pickup.F 95 STREAMICE_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'SI_hmask'
./model/src/write_pickup.F 120 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Uvel    '
./model/src/write_pickup.F 123 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Vvel    '
./model/src/write_pickup.F 129 WRITE_PICKUP
          IF (j.LE.listDim) wrFldList(j) = 'Umean   '
./model/src/write_pickup.F 132 WRITE_PICKUP
          IF (j.LE.listDim) wrFldList(j) = 'Vmean   '
./model/src/write_pickup.F 138 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Theta   '
./model/src/write_pickup.F 141 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Salt    '
./model/src/write_pickup.F 152 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GuNm1   '
./model/src/write_pickup.F 158 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GuNm2   '
./model/src/write_pickup.F 165 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GvNm1   '
./model/src/write_pickup.F 171 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GvNm2   '
./model/src/write_pickup.F 181 WRITE_PICKUP
         IF ( AdamsBashforthGt ) wrFldList(j) = 'GtNm1   '
./model/src/write_pickup.F 182 WRITE_PICKUP
         IF ( AdamsBashforth_T ) wrFldList(j) = 'TempNm1 '
./model/src/write_pickup.F 190 WRITE_PICKUP
         IF ( AdamsBashforthGt ) wrFldList(j) = 'GtNm2   '
./model/src/write_pickup.F 191 WRITE_PICKUP
         IF ( AdamsBashforth_T ) wrFldList(j) = 'TempNm2 '
./model/src/write_pickup.F 202 WRITE_PICKUP
         IF ( AdamsBashforthGs ) wrFldList(j) = 'GsNm1   '
./model/src/write_pickup.F 203 WRITE_PICKUP
         IF ( AdamsBashforth_S ) wrFldList(j) = 'SaltNm1 '
./model/src/write_pickup.F 211 WRITE_PICKUP
         IF ( AdamsBashforthGs ) wrFldList(j) = 'GsNm2   '
./model/src/write_pickup.F 212 WRITE_PICKUP
         IF ( AdamsBashforth_S ) wrFldList(j) = 'SaltNm2 '
./model/src/write_pickup.F 223 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GwNm1   '
./model/src/write_pickup.F 229 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GwNm2   '
./model/src/write_pickup.F 237 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GuNm1   '
./model/src/write_pickup.F 240 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GvNm1   '
./model/src/write_pickup.F 246 WRITE_PICKUP
         IF ( AdamsBashforthGt ) wrFldList(j) = 'GtNm1   '
./model/src/write_pickup.F 247 WRITE_PICKUP
         IF ( AdamsBashforth_T ) wrFldList(j) = 'TempNm1 '
./model/src/write_pickup.F 254 WRITE_PICKUP
         IF ( AdamsBashforthGs ) wrFldList(j) = 'GsNm1   '
./model/src/write_pickup.F 255 WRITE_PICKUP
         IF ( AdamsBashforth_S ) wrFldList(j) = 'SaltNm1 '
./model/src/write_pickup.F 262 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'GwNm1   '
./model/src/write_pickup.F 271 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'PhiHyd  '
./model/src/write_pickup.F 277 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Phi_NHyd'
./model/src/write_pickup.F 285 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'AddMass '
./model/src/write_pickup.F 294 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'EtaN    '
./model/src/write_pickup.F 300 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'dPhiNH  '
./model/src/write_pickup.F 308 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'dEtaHdt '
./model/src/write_pickup.F 316 WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'EtaH    '
./model/src/write_pickup.F 339 WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./model/src/write_pickup.F 75 WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./model/src/write_pickup.F 94 WRITE_PICKUP
        wrFldList(j) = ' '
./pkg/atm_phys/atm_phys_write_pickup.F 109 ATM_PHYS_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/atm_phys/atm_phys_write_pickup.F 61 ATM_PHYS_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/atm_phys/atm_phys_write_pickup.F 83 ATM_PHYS_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'AtPh_SST'
./pkg/bbl/bbl_write_pickup.F 107 BBL_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/bbl/bbl_write_pickup.F 59 BBL_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/bbl/bbl_write_pickup.F 78 BBL_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'bblTheta'
./pkg/bbl/bbl_write_pickup.F 83 BBL_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'bblSalt '
./pkg/bbl/bbl_write_pickup.F 88 BBL_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'bblEta  '
./pkg/cheapaml/cheapaml_write_pickup.F 102 CHEAPAML_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'gQairNm1'
./pkg/cheapaml/cheapaml_write_pickup.F 110 CHEAPAML_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'cTracer '
./pkg/cheapaml/cheapaml_write_pickup.F 115 CHEAPAML_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'gTracNm1'
./pkg/cheapaml/cheapaml_write_pickup.F 141 CHEAPAML_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/cheapaml/cheapaml_write_pickup.F 61 CHEAPAML_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/cheapaml/cheapaml_write_pickup.F 85 CHEAPAML_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Tair    '
./pkg/cheapaml/cheapaml_write_pickup.F 90 CHEAPAML_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'gTairNm1'
./pkg/cheapaml/cheapaml_write_pickup.F 97 CHEAPAML_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'Qair    '
./pkg/dic/dic_write_pickup.F 123 DIC_WRITE_PICKUP
     &                         nWrFlds, wrFldList,
./pkg/dic/dic_write_pickup.F 55 DIC_WRITE_PICKUP
      CHARACTER*(8) wrFldList(listDim)
./pkg/dic/dic_write_pickup.F 96 DIC_WRITE_PICKUP
        IF (j.LE.listDim) wrFldList(j) = 'DIC_pH2d'