Symbol Description Uses
cunit 218


File Line number Procedure Code
./pkg/ctrl/ctrl_set_pack_yz.F 191 CTRL_SET_PACK_YZ 
            write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_yz.F 192 CTRL_SET_PACK_YZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 193 CTRL_SET_PACK_YZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 235 CTRL_SET_PACK_YZ 
                write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_yz.F 236 CTRL_SET_PACK_YZ 
                write(cunit) k
./pkg/ctrl/ctrl_set_pack_yz.F 237 CTRL_SET_PACK_YZ 
                write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_yz.F 279 CTRL_SET_PACK_YZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_yz.F 280 CTRL_SET_PACK_YZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 281 CTRL_SET_PACK_YZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 320 CTRL_SET_PACK_YZ 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_yz.F 321 CTRL_SET_PACK_YZ 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_yz.F 322 CTRL_SET_PACK_YZ 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_yz.F 39 CTRL_SET_PACK_YZ 
      integer cunit
./pkg/ctrl/ctrl_set_pack_yz.F 5 CTRL_SET_PACK_YZ 
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xy.F 160 CTRL_SET_UNPACK_XY 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 167 CTRL_SET_UNPACK_XY 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 168 CTRL_SET_UNPACK_XY 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 171 CTRL_SET_UNPACK_XY 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 177 CTRL_SET_UNPACK_XY 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 183 CTRL_SET_UNPACK_XY 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xy.F 238 CTRL_SET_UNPACK_XY 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 245 CTRL_SET_UNPACK_XY 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 246 CTRL_SET_UNPACK_XY 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 253 CTRL_SET_UNPACK_XY 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 259 CTRL_SET_UNPACK_XY 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 265 CTRL_SET_UNPACK_XY 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xy.F 37 CTRL_SET_UNPACK_XY 
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xy.F 5 CTRL_SET_UNPACK_XY 
     &     lxxadxx, cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_pack_xy.F 161 CTRL_SET_PACK_XY 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 162 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 163 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 202 CTRL_SET_PACK_XY 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 203 CTRL_SET_PACK_XY 
               write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 204 CTRL_SET_PACK_XY 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 222 CTRL_SET_PACK_XY 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 223 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 224 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 268 CTRL_SET_PACK_XY 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 269 CTRL_SET_PACK_XY 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xy.F 270 CTRL_SET_PACK_XY 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 36 CTRL_SET_PACK_XY 
      integer cunit
./pkg/ctrl/ctrl_set_pack_xy.F 5 CTRL_SET_PACK_XY 
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xz.F 166 CTRL_SET_UNPACK_XZ 
            read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xz.F 173 CTRL_SET_UNPACK_XZ 
            read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xz.F 174 CTRL_SET_UNPACK_XZ 
            read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xz.F 178 CTRL_SET_UNPACK_XZ 
                  read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xz.F 184 CTRL_SET_UNPACK_XZ 
                  read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xz.F 190 CTRL_SET_UNPACK_XZ 
                  read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xz.F 241 CTRL_SET_UNPACK_XZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xz.F 248 CTRL_SET_UNPACK_XZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xz.F 249 CTRL_SET_UNPACK_XZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xz.F 253 CTRL_SET_UNPACK_XZ 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xz.F 259 CTRL_SET_UNPACK_XZ 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xz.F 265 CTRL_SET_UNPACK_XZ 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xz.F 38 CTRL_SET_UNPACK_XZ 
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xz.F 5 CTRL_SET_UNPACK_XZ 
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_pack.F 161 CTRL_PACK 
       call MDSFINDUNIT( cunit, mythid )
./pkg/ctrl/ctrl_pack.F 162 CTRL_PACK 
       open( cunit, file   = cfile,
./pkg/ctrl/ctrl_pack.F 168 CTRL_PACK 
          write(cunit) nvartype
./pkg/ctrl/ctrl_pack.F 169 CTRL_PACK 
          write(cunit) nvarlength
./pkg/ctrl/ctrl_pack.F 170 CTRL_PACK 
          write(cunit) yctrlid
./pkg/ctrl/ctrl_pack.F 171 CTRL_PACK 
          write(cunit) optimCycle
./pkg/ctrl/ctrl_pack.F 172 CTRL_PACK 
          write(cunit) fc
./pkg/ctrl/ctrl_pack.F 174 CTRL_PACK 
          write(cunit) 1
./pkg/ctrl/ctrl_pack.F 176 CTRL_PACK 
          write(cunit) 1
./pkg/ctrl/ctrl_pack.F 177 CTRL_PACK 
          write(cunit) nsx
./pkg/ctrl/ctrl_pack.F 178 CTRL_PACK 
          write(cunit) nsy
./pkg/ctrl/ctrl_pack.F 179 CTRL_PACK 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 180 CTRL_PACK 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 181 CTRL_PACK 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 183 CTRL_PACK 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 187 CTRL_PACK 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 190 CTRL_PACK 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 193 CTRL_PACK 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 196 CTRL_PACK 
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 198 CTRL_PACK 
          write(cunit) (ncvarindex(i), i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 199 CTRL_PACK 
          write(cunit) (ncvarrecs(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 200 CTRL_PACK 
          write(cunit) (ncvarxmax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 201 CTRL_PACK 
          write(cunit) (ncvarymax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 202 CTRL_PACK 
          write(cunit) (ncvarnrmax(i), i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 203 CTRL_PACK 
          write(cunit) (ncvargrd(i),   i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 204 CTRL_PACK 
          write(cunit)
./pkg/ctrl/ctrl_pack.F 211 CTRL_PACK 
     &         cunit, ivartype, fname_theta(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 220 CTRL_PACK 
     &         cunit, ivartype, fname_salt(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 230 CTRL_PACK 
     &         cunit, ivartype, fname_hflux(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 240 CTRL_PACK 
     &         cunit, ivartype, fname_sflux(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 250 CTRL_PACK 
     &         cunit, ivartype, fname_tauu(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 260 CTRL_PACK 
     &         cunit, ivartype, fname_tauv(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 269 CTRL_PACK 
     &         cunit, ivartype, fname_atemp(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 278 CTRL_PACK 
     &         cunit, ivartype, fname_aqh(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 287 CTRL_PACK 
     &         cunit, ivartype, fname_uwind(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 296 CTRL_PACK 
     &         cunit, ivartype, fname_vwind(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 305 CTRL_PACK 
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/ctrl/ctrl_pack.F 314 CTRL_PACK 
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/ctrl/ctrl_pack.F 323 CTRL_PACK 
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/ctrl/ctrl_pack.F 332 CTRL_PACK 
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/ctrl/ctrl_pack.F 341 CTRL_PACK 
     &         cunit, ivartype, fname_diffkr(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 350 CTRL_PACK 
     &         cunit, ivartype, fname_kapgm(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 359 CTRL_PACK 
     &         cunit, ivartype, fname_tr1(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 368 CTRL_PACK 
     &         cunit, ivartype, fname_sst(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 377 CTRL_PACK 
     &         cunit, ivartype, fname_sss(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 387 CTRL_PACK 
     &         cunit, ivartype, fname_hfacc(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 391 CTRL_PACK 
     &         cunit, ivartype, fname_hfacc(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 401 CTRL_PACK 
     &         cunit, ivartype, fname_efluxy(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 410 CTRL_PACK 
     &         cunit, ivartype, fname_efluxp(ictrlgrad), "maskhFacV",
./pkg/ctrl/ctrl_pack.F 419 CTRL_PACK 
     &      cunit, ivartype, fname_bottomdrag(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 428 CTRL_PACK 
     &         cunit, ivartype, fname_edtaux(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 437 CTRL_PACK 
     &         cunit, ivartype, fname_edtauy(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 446 CTRL_PACK 
     &         cunit, ivartype, fname_uvel(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 455 CTRL_PACK 
     &         cunit, ivartype, fname_vvel(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 464 CTRL_PACK 
     &         cunit, ivartype, fname_etan(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 473 CTRL_PACK 
     &         cunit, ivartype, fname_relaxsst(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 482 CTRL_PACK 
     &         cunit, ivartype, fname_relaxsss(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 486 CTRL_PACK 
          close ( cunit )
./pkg/ctrl/ctrl_pack.F 79 CTRL_PACK 
      integer cunit
./pkg/ctrl/ctrl_set_unpack_yz.F 166 CTRL_SET_UNPACK_YZ 
            read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_yz.F 173 CTRL_SET_UNPACK_YZ 
            read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_yz.F 174 CTRL_SET_UNPACK_YZ 
            read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_yz.F 178 CTRL_SET_UNPACK_YZ 
                  read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_yz.F 184 CTRL_SET_UNPACK_YZ 
                  read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_yz.F 190 CTRL_SET_UNPACK_YZ 
                  read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_yz.F 240 CTRL_SET_UNPACK_YZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_yz.F 247 CTRL_SET_UNPACK_YZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_yz.F 248 CTRL_SET_UNPACK_YZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_yz.F 252 CTRL_SET_UNPACK_YZ 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_yz.F 258 CTRL_SET_UNPACK_YZ 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_yz.F 264 CTRL_SET_UNPACK_YZ 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_yz.F 38 CTRL_SET_UNPACK_YZ 
      integer cunit
./pkg/ctrl/ctrl_set_unpack_yz.F 5 CTRL_SET_UNPACK_YZ 
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xyz.F 173 CTRL_SET_UNPACK_XYZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xyz.F 180 CTRL_SET_UNPACK_XYZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xyz.F 181 CTRL_SET_UNPACK_XYZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xyz.F 192 CTRL_SET_UNPACK_XYZ 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xyz.F 198 CTRL_SET_UNPACK_XYZ 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xyz.F 204 CTRL_SET_UNPACK_XYZ 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xyz.F 36 CTRL_SET_UNPACK_XYZ 
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xyz.F 5 CTRL_SET_UNPACK_XYZ 
     &     lxxadxx, cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_pack_xyz.F 169 CTRL_SET_PACK_XYZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xyz.F 170 CTRL_SET_PACK_XYZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 171 CTRL_SET_PACK_XYZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 226 CTRL_SET_PACK_XYZ 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xyz.F 227 CTRL_SET_PACK_XYZ 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xyz.F 228 CTRL_SET_PACK_XYZ 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xyz.F 36 CTRL_SET_PACK_XYZ 
      integer cunit
./pkg/ctrl/ctrl_set_pack_xyz.F 5 CTRL_SET_PACK_XYZ 
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_pack_xz.F 188 CTRL_SET_PACK_XZ 
            write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xz.F 189 CTRL_SET_PACK_XZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 190 CTRL_SET_PACK_XZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 231 CTRL_SET_PACK_XZ 
                write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xz.F 232 CTRL_SET_PACK_XZ 
                write(cunit) k
./pkg/ctrl/ctrl_set_pack_xz.F 233 CTRL_SET_PACK_XZ 
                write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xz.F 272 CTRL_SET_PACK_XZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xz.F 273 CTRL_SET_PACK_XZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 274 CTRL_SET_PACK_XZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 313 CTRL_SET_PACK_XZ 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xz.F 314 CTRL_SET_PACK_XZ 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xz.F 315 CTRL_SET_PACK_XZ 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xz.F 39 CTRL_SET_PACK_XZ 
      integer cunit
./pkg/ctrl/ctrl_set_pack_xz.F 5 CTRL_SET_PACK_XZ 
     &     cunit, ivartype, fname, masktype,weighttype,
./pkg/ctrl/ctrl_unpack.F 170 CTRL_UNPACK 
          call MDSFINDUNIT( cunit, mythid )
./pkg/ctrl/ctrl_unpack.F 174 CTRL_UNPACK 
          open( cunit, file   = cfile,
./pkg/ctrl/ctrl_unpack.F 180 CTRL_UNPACK 
          read(cunit) filenvartype
./pkg/ctrl/ctrl_unpack.F 181 CTRL_UNPACK 
          read(cunit) filenvarlength
./pkg/ctrl/ctrl_unpack.F 182 CTRL_UNPACK 
          read(cunit) fileYctrlid
./pkg/ctrl/ctrl_unpack.F 183 CTRL_UNPACK 
          read(cunit) fileOptimCycle
./pkg/ctrl/ctrl_unpack.F 184 CTRL_UNPACK 
          read(cunit) filefc
./pkg/ctrl/ctrl_unpack.F 185 CTRL_UNPACK 
          read(cunit) fileIg
./pkg/ctrl/ctrl_unpack.F 186 CTRL_UNPACK 
          read(cunit) fileJg
./pkg/ctrl/ctrl_unpack.F 187 CTRL_UNPACK 
          read(cunit) filensx
./pkg/ctrl/ctrl_unpack.F 188 CTRL_UNPACK 
          read(cunit) filensy
./pkg/ctrl/ctrl_unpack.F 189 CTRL_UNPACK 
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 190 CTRL_UNPACK 
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 191 CTRL_UNPACK 
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 193 CTRL_UNPACK 
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 198 CTRL_UNPACK 
          read(cunit) ((filenWetobcsnGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 202 CTRL_UNPACK 
          read(cunit) ((filenWetobcssGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 206 CTRL_UNPACK 
          read(cunit) ((filenWetobcswGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 210 CTRL_UNPACK 
          read(cunit) ((filenWetobcseGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 214 CTRL_UNPACK 
          read(cunit) (filencvarindex(i), i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 215 CTRL_UNPACK 
          read(cunit) (filencvarrecs(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 216 CTRL_UNPACK 
          read(cunit) (filencvarxmax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 217 CTRL_UNPACK 
          read(cunit) (filencvarymax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 218 CTRL_UNPACK 
          read(cunit) (filencvarnrmax(i), i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 219 CTRL_UNPACK 
          read(cunit) (filencvargrd(i),   i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 220 CTRL_UNPACK 
          read(cunit)
./pkg/ctrl/ctrl_unpack.F 302 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 311 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 321 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 331 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 341 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 351 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 360 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 369 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 378 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 387 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 397 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/ctrl/ctrl_unpack.F 406 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/ctrl/ctrl_unpack.F 415 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/ctrl/ctrl_unpack.F 424 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/ctrl/ctrl_unpack.F 432 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 441 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 450 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 459 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 468 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 478 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 482 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 492 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 501 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 510 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 519 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 528 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 537 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 546 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 555 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 564 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 573 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 578 CTRL_UNPACK 
         close ( cunit )
./pkg/ctrl/ctrl_unpack.F 77 CTRL_UNPACK 
      integer cunit