Symbol Description Uses
wrFldList list of written fields 132


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/shelfice/shelfice_write_pickup.F 116 SHELFICE_WRITE_PICKUP 
     &                         nWrFlds, wrFldList,
./pkg/shelfice/shelfice_write_pickup.F 59 SHELFICE_WRITE_PICKUP 
      CHARACTER*(8) wrFldList(listDim)
./pkg/shelfice/shelfice_write_pickup.F 83 SHELFICE_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'SHI_mass'
./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 113 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'Uvel    '
./model/src/write_pickup.F 116 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'Vvel    '
./model/src/write_pickup.F 123 WRITE_PICKUP 
          IF (j.LE.listDim) wrFldList(j) = 'UEulerM '
./model/src/write_pickup.F 127 WRITE_PICKUP 
          IF (j.LE.listDim) wrFldList(j) = 'VEulerM '
./model/src/write_pickup.F 133 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'Theta   '
./model/src/write_pickup.F 136 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'Salt    '
./model/src/write_pickup.F 147 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GuNm1   '
./model/src/write_pickup.F 153 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GuNm2   '
./model/src/write_pickup.F 160 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GvNm1   '
./model/src/write_pickup.F 166 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GvNm2   '
./model/src/write_pickup.F 176 WRITE_PICKUP 
         IF ( AdamsBashforthGt ) wrFldList(j) = 'GtNm1   '
./model/src/write_pickup.F 177 WRITE_PICKUP 
         IF ( AdamsBashforth_T ) wrFldList(j) = 'TempNm1 '
./model/src/write_pickup.F 185 WRITE_PICKUP 
         IF ( AdamsBashforthGt ) wrFldList(j) = 'GtNm2   '
./model/src/write_pickup.F 186 WRITE_PICKUP 
         IF ( AdamsBashforth_T ) wrFldList(j) = 'TempNm2 '
./model/src/write_pickup.F 197 WRITE_PICKUP 
         IF ( AdamsBashforthGs ) wrFldList(j) = 'GsNm1   '
./model/src/write_pickup.F 198 WRITE_PICKUP 
         IF ( AdamsBashforth_S ) wrFldList(j) = 'SaltNm1 '
./model/src/write_pickup.F 206 WRITE_PICKUP 
         IF ( AdamsBashforthGs ) wrFldList(j) = 'GsNm2   '
./model/src/write_pickup.F 207 WRITE_PICKUP 
         IF ( AdamsBashforth_S ) wrFldList(j) = 'SaltNm2 '
./model/src/write_pickup.F 218 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GwNm1   '
./model/src/write_pickup.F 224 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GwNm2   '
./model/src/write_pickup.F 232 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GuNm1   '
./model/src/write_pickup.F 235 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GvNm1   '
./model/src/write_pickup.F 241 WRITE_PICKUP 
         IF ( AdamsBashforthGt ) wrFldList(j) = 'GtNm1   '
./model/src/write_pickup.F 242 WRITE_PICKUP 
         IF ( AdamsBashforth_T ) wrFldList(j) = 'TempNm1 '
./model/src/write_pickup.F 249 WRITE_PICKUP 
         IF ( AdamsBashforthGs ) wrFldList(j) = 'GsNm1   '
./model/src/write_pickup.F 250 WRITE_PICKUP 
         IF ( AdamsBashforth_S ) wrFldList(j) = 'SaltNm1 '
./model/src/write_pickup.F 257 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'GwNm1   '
./model/src/write_pickup.F 266 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'PhiHyd  '
./model/src/write_pickup.F 272 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'Phi_NHyd'
./model/src/write_pickup.F 280 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'AddMass '
./model/src/write_pickup.F 289 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'FricHeat'
./model/src/write_pickup.F 298 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'EtaN    '
./model/src/write_pickup.F 304 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'dPhiNH  '
./model/src/write_pickup.F 312 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'dEtaHdt '
./model/src/write_pickup.F 320 WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'EtaH    '
./model/src/write_pickup.F 343 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_compon_interf/cpl_write_pickup.F 104 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'Evp-Prec'
./pkg/atm_compon_interf/cpl_write_pickup.F 111 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'RunOffFx'
./pkg/atm_compon_interf/cpl_write_pickup.F 115 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'RnOfEnFx'
./pkg/atm_compon_interf/cpl_write_pickup.F 123 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'saltFlux'
./pkg/atm_compon_interf/cpl_write_pickup.F 129 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'sltPlmFx'
./pkg/atm_compon_interf/cpl_write_pickup.F 137 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'atm-CO2 '
./pkg/atm_compon_interf/cpl_write_pickup.F 141 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'wndSpeed'
./pkg/atm_compon_interf/cpl_write_pickup.F 171 CPL_WRITE_PICKUP 
     &                         nWrFlds, wrFldList,
./pkg/atm_compon_interf/cpl_write_pickup.F 63 CPL_WRITE_PICKUP 
      CHARACTER*(8) wrFldList(listDim)
./pkg/atm_compon_interf/cpl_write_pickup.F 84 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'qHeatFlx'
./pkg/atm_compon_interf/cpl_write_pickup.F 89 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'qShortW '
./pkg/atm_compon_interf/cpl_write_pickup.F 94 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'surfTauX'
./pkg/atm_compon_interf/cpl_write_pickup.F 99 CPL_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'surfTauY'
./pkg/atm_phys/atm_phys_write_pickup.F 112 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 86 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/bling/bling_write_pickup.F 110 BLING_WRITE_PICKUP 
     &                         nWrFlds, wrFldList,
./pkg/bling/bling_write_pickup.F 51 BLING_WRITE_PICKUP 
      CHARACTER*(8) wrFldList(listDim)
./pkg/bling/bling_write_pickup.F 64 BLING_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'BLG_pH3d'
./pkg/bling/bling_write_pickup.F 69 BLING_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'BLG_irrm'
./pkg/bling/bling_write_pickup.F 73 BLING_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'BLG_chl '
./pkg/bling/bling_write_pickup.F 78 BLING_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'BLG_Psm '
./pkg/bling/bling_write_pickup.F 83 BLING_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'BLG_Plg '
./pkg/bling/bling_write_pickup.F 88 BLING_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'BLG_Pdia'
./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 118 DIC_WRITE_PICKUP 
     &                         nWrFlds, wrFldList,
./pkg/dic/dic_write_pickup.F 53 DIC_WRITE_PICKUP 
      CHARACTER*(8) wrFldList(listDim)
./pkg/dic/dic_write_pickup.F 91 DIC_WRITE_PICKUP 
        IF (j.LE.listDim) wrFldList(j) = 'DIC_pH2d'