Symbol Description Uses
cunit 402



File Line number Procedure Code
./pkg/admtlm/admtlm_dsvd2model.F 185 ADMTLM_DSVD2MODEL
       call MDSFINDUNIT( cunit, mythid )
./pkg/admtlm/admtlm_dsvd2model.F 208 ADMTLM_DSVD2MODEL
          open( cunit, file   = cfile,
./pkg/admtlm/admtlm_dsvd2model.F 214 ADMTLM_DSVD2MODEL
          read(cunit) filenvartype
./pkg/admtlm/admtlm_dsvd2model.F 215 ADMTLM_DSVD2MODEL
          read(cunit) filenvarlength
./pkg/admtlm/admtlm_dsvd2model.F 216 ADMTLM_DSVD2MODEL
          read(cunit) fileYctrlid
./pkg/admtlm/admtlm_dsvd2model.F 217 ADMTLM_DSVD2MODEL
          read(cunit) fileOptimCycle
./pkg/admtlm/admtlm_dsvd2model.F 218 ADMTLM_DSVD2MODEL
          read(cunit) filefc
./pkg/admtlm/admtlm_dsvd2model.F 219 ADMTLM_DSVD2MODEL
          read(cunit) fileIg
./pkg/admtlm/admtlm_dsvd2model.F 220 ADMTLM_DSVD2MODEL
          read(cunit) fileJg
./pkg/admtlm/admtlm_dsvd2model.F 221 ADMTLM_DSVD2MODEL
          read(cunit) filensx
./pkg/admtlm/admtlm_dsvd2model.F 222 ADMTLM_DSVD2MODEL
          read(cunit) filensy
./pkg/admtlm/admtlm_dsvd2model.F 223 ADMTLM_DSVD2MODEL
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 224 ADMTLM_DSVD2MODEL
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 225 ADMTLM_DSVD2MODEL
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 227 ADMTLM_DSVD2MODEL
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 232 ADMTLM_DSVD2MODEL
          read(cunit) ((filenWetobcsnGlo(k,iobcs),
./pkg/admtlm/admtlm_dsvd2model.F 236 ADMTLM_DSVD2MODEL
          read(cunit) ((filenWetobcssGlo(k,iobcs),
./pkg/admtlm/admtlm_dsvd2model.F 240 ADMTLM_DSVD2MODEL
          read(cunit) ((filenWetobcswGlo(k,iobcs),
./pkg/admtlm/admtlm_dsvd2model.F 244 ADMTLM_DSVD2MODEL
          read(cunit) ((filenWetobcseGlo(k,iobcs),
./pkg/admtlm/admtlm_dsvd2model.F 248 ADMTLM_DSVD2MODEL
          read(cunit) (filencvarindex(i), i=1,maxcvars)
./pkg/admtlm/admtlm_dsvd2model.F 249 ADMTLM_DSVD2MODEL
          read(cunit) (filencvarrecs(i),  i=1,maxcvars)
./pkg/admtlm/admtlm_dsvd2model.F 250 ADMTLM_DSVD2MODEL
          read(cunit) (filencvarxmax(i),  i=1,maxcvars)
./pkg/admtlm/admtlm_dsvd2model.F 251 ADMTLM_DSVD2MODEL
          read(cunit) (filencvarymax(i),  i=1,maxcvars)
./pkg/admtlm/admtlm_dsvd2model.F 252 ADMTLM_DSVD2MODEL
          read(cunit) (filencvarnrmax(i), i=1,maxcvars)
./pkg/admtlm/admtlm_dsvd2model.F 253 ADMTLM_DSVD2MODEL
          read(cunit) (filencvargrd(i),   i=1,maxcvars)
./pkg/admtlm/admtlm_dsvd2model.F 254 ADMTLM_DSVD2MODEL
          read(cunit)
./pkg/admtlm/admtlm_dsvd2model.F 336 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 345 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 354 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 363 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 372 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 381 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 390 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 399 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 408 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 417 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 427 ADMTLM_DSVD2MODEL
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/admtlm/admtlm_dsvd2model.F 436 ADMTLM_DSVD2MODEL
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/admtlm/admtlm_dsvd2model.F 445 ADMTLM_DSVD2MODEL
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/admtlm/admtlm_dsvd2model.F 454 ADMTLM_DSVD2MODEL
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/admtlm/admtlm_dsvd2model.F 462 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 471 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 480 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 489 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 498 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 507 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 516 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 525 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 534 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 543 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 550 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 559 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 568 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 577 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 586 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 595 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 604 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 613 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 622 ADMTLM_DSVD2MODEL
          call CTRL_SET_UNPACK_XY( lxxadxx, cunit, ivartype,
./pkg/admtlm/admtlm_dsvd2model.F 627 ADMTLM_DSVD2MODEL
         close ( cunit )
./pkg/admtlm/admtlm_dsvd2model.F 80 ADMTLM_DSVD2MODEL
      integer cunit
./pkg/admtlm/admtlm_model2dsvd.F 177 ADMTLM_MODEL2DSVD
       call MDSFINDUNIT( cunit, mythid )
./pkg/admtlm/admtlm_model2dsvd.F 199 ADMTLM_MODEL2DSVD
       open( cunit, file   = cfile,
./pkg/admtlm/admtlm_model2dsvd.F 205 ADMTLM_MODEL2DSVD
          write(cunit) nvartype
./pkg/admtlm/admtlm_model2dsvd.F 206 ADMTLM_MODEL2DSVD
          write(cunit) nvarlength
./pkg/admtlm/admtlm_model2dsvd.F 207 ADMTLM_MODEL2DSVD
          write(cunit) yctrlid
./pkg/admtlm/admtlm_model2dsvd.F 208 ADMTLM_MODEL2DSVD
          write(cunit) optimCycle
./pkg/admtlm/admtlm_model2dsvd.F 209 ADMTLM_MODEL2DSVD
          write(cunit) fc
./pkg/admtlm/admtlm_model2dsvd.F 211 ADMTLM_MODEL2DSVD
          write(cunit) 1
./pkg/admtlm/admtlm_model2dsvd.F 213 ADMTLM_MODEL2DSVD
          write(cunit) 1
./pkg/admtlm/admtlm_model2dsvd.F 214 ADMTLM_MODEL2DSVD
          write(cunit) nsx
./pkg/admtlm/admtlm_model2dsvd.F 215 ADMTLM_MODEL2DSVD
          write(cunit) nsy
./pkg/admtlm/admtlm_model2dsvd.F 216 ADMTLM_MODEL2DSVD
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 217 ADMTLM_MODEL2DSVD
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 218 ADMTLM_MODEL2DSVD
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 220 ADMTLM_MODEL2DSVD
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 224 ADMTLM_MODEL2DSVD
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 227 ADMTLM_MODEL2DSVD
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 230 ADMTLM_MODEL2DSVD
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 233 ADMTLM_MODEL2DSVD
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 235 ADMTLM_MODEL2DSVD
          write(cunit) (ncvarindex(i), i=1,maxcvars)
./pkg/admtlm/admtlm_model2dsvd.F 236 ADMTLM_MODEL2DSVD
          write(cunit) (ncvarrecs(i),  i=1,maxcvars)
./pkg/admtlm/admtlm_model2dsvd.F 237 ADMTLM_MODEL2DSVD
          write(cunit) (ncvarxmax(i),  i=1,maxcvars)
./pkg/admtlm/admtlm_model2dsvd.F 238 ADMTLM_MODEL2DSVD
          write(cunit) (ncvarymax(i),  i=1,maxcvars)
./pkg/admtlm/admtlm_model2dsvd.F 239 ADMTLM_MODEL2DSVD
          write(cunit) (ncvarnrmax(i), i=1,maxcvars)
./pkg/admtlm/admtlm_model2dsvd.F 240 ADMTLM_MODEL2DSVD
          write(cunit) (ncvargrd(i),   i=1,maxcvars)
./pkg/admtlm/admtlm_model2dsvd.F 241 ADMTLM_MODEL2DSVD
          write(cunit)
./pkg/admtlm/admtlm_model2dsvd.F 250 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_theta(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 259 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_salt(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 268 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_hflux(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 277 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_sflux(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 286 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_tauu(ictrlgrad), "maskCtrlW",
./pkg/admtlm/admtlm_model2dsvd.F 295 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_tauv(ictrlgrad), "maskCtrlS",
./pkg/admtlm/admtlm_model2dsvd.F 304 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_atemp(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 313 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_aqh(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 322 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_uwind(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 331 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_vwind(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 340 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/admtlm/admtlm_model2dsvd.F 349 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/admtlm/admtlm_model2dsvd.F 358 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/admtlm/admtlm_model2dsvd.F 367 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/admtlm/admtlm_model2dsvd.F 376 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_diffkr(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 385 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_kapgm(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 394 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_tr1(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 403 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_sst(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 412 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_sss(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 421 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_depth(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 430 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_efluxy(ictrlgrad), "maskCtrlS",
./pkg/admtlm/admtlm_model2dsvd.F 439 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_efluxp(ictrlgrad), "maskhFacV",
./pkg/admtlm/admtlm_model2dsvd.F 448 ADMTLM_MODEL2DSVD
     &      cunit, ivartype, fname_bottomdrag(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 457 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_edtaux(ictrlgrad), "maskCtrlW",
./pkg/admtlm/admtlm_model2dsvd.F 464 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_edtauy(ictrlgrad), "maskCtrlS",
./pkg/admtlm/admtlm_model2dsvd.F 473 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_uvel(ictrlgrad), "maskCtrlW",
./pkg/admtlm/admtlm_model2dsvd.F 482 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_vvel(ictrlgrad), "maskCtrlS",
./pkg/admtlm/admtlm_model2dsvd.F 491 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_etan(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 500 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_relaxsst(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 509 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_relaxsss(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 518 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_precip(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 527 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_swflux(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 536 ADMTLM_MODEL2DSVD
     &         cunit, ivartype, fname_swdown(ictrlgrad), "maskCtrlC",
./pkg/admtlm/admtlm_model2dsvd.F 540 ADMTLM_MODEL2DSVD
          close ( cunit )
./pkg/admtlm/admtlm_model2dsvd.F 83 ADMTLM_MODEL2DSVD
      integer cunit
./pkg/ctrl/ctrl_pack.F 200 CTRL_PACK
       call MDSFINDUNIT( cunit, mythid )
./pkg/ctrl/ctrl_pack.F 201 CTRL_PACK
       open( cunit, file   = cfile,
./pkg/ctrl/ctrl_pack.F 207 CTRL_PACK
          write(cunit) nvartype
./pkg/ctrl/ctrl_pack.F 208 CTRL_PACK
          write(cunit) nvarlength
./pkg/ctrl/ctrl_pack.F 209 CTRL_PACK
          write(cunit) yctrlid
./pkg/ctrl/ctrl_pack.F 210 CTRL_PACK
          write(cunit) optimCycle
./pkg/ctrl/ctrl_pack.F 211 CTRL_PACK
          write(cunit) fc
./pkg/ctrl/ctrl_pack.F 213 CTRL_PACK
          write(cunit) 1
./pkg/ctrl/ctrl_pack.F 215 CTRL_PACK
          write(cunit) 1
./pkg/ctrl/ctrl_pack.F 216 CTRL_PACK
          write(cunit) nsx
./pkg/ctrl/ctrl_pack.F 217 CTRL_PACK
          write(cunit) nsy
./pkg/ctrl/ctrl_pack.F 218 CTRL_PACK
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 219 CTRL_PACK
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 220 CTRL_PACK
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 222 CTRL_PACK
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 225 CTRL_PACK
          write(cunit) (nWetiGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 230 CTRL_PACK
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 233 CTRL_PACK
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 236 CTRL_PACK
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 239 CTRL_PACK
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 241 CTRL_PACK
          write(cunit) (ncvarindex(i), i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 242 CTRL_PACK
          write(cunit) (ncvarrecs(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 243 CTRL_PACK
          write(cunit) (ncvarxmax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 244 CTRL_PACK
          write(cunit) (ncvarymax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 245 CTRL_PACK
          write(cunit) (ncvarnrmax(i), i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 246 CTRL_PACK
          write(cunit) (ncvargrd(i),   i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 247 CTRL_PACK
          write(cunit)
./pkg/ctrl/ctrl_pack.F 260 CTRL_PACK
     &         cunit, ivartype, fname_theta(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 269 CTRL_PACK
     &         cunit, ivartype, fname_salt(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 278 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 288 CTRL_PACK
     &         cunit, ivartype,  forcingPrecond,
./pkg/ctrl/ctrl_pack.F 302 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 305 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 323 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 326 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 340 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 350 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 363 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 379 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 392 CTRL_PACK
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/ctrl/ctrl_pack.F 401 CTRL_PACK
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/ctrl/ctrl_pack.F 410 CTRL_PACK
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/ctrl/ctrl_pack.F 419 CTRL_PACK
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/ctrl/ctrl_pack.F 428 CTRL_PACK
     &         cunit, ivartype, fname_diffkr(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 437 CTRL_PACK
     &         cunit, ivartype, fname_kapgm(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 446 CTRL_PACK
     &         cunit, ivartype, fname_tr1(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 455 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 465 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 475 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 485 CTRL_PACK
     &         cunit, ivartype, fname_efluxy(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 494 CTRL_PACK
     &         cunit, ivartype, fname_efluxp(ictrlgrad), "maskhFacV",
./pkg/ctrl/ctrl_pack.F 503 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 513 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 523 CTRL_PACK
     &         cunit, ivartype, fname_edtaux(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 530 CTRL_PACK
     &         cunit, ivartype, fname_edtauy(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 539 CTRL_PACK
     &         cunit, ivartype, fname_uvel(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 548 CTRL_PACK
     &         cunit, ivartype, fname_vvel(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 557 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 567 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 577 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 587 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 597 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 607 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 617 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 627 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 637 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 647 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 657 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 667 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 677 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 687 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 697 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 707 CTRL_PACK
     &         cunit, ivartype, fname_kapredi(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 716 CTRL_PACK
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 729 CTRL_PACK
     &         cunit, ivartype, genarr2dPrecond(iarr),
./pkg/ctrl/ctrl_pack.F 744 CTRL_PACK
     &         cunit, ivartype, fname_local(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 758 CTRL_PACK
     &         cunit, ivartype, gentim2dPrecond(iarr),
./pkg/ctrl/ctrl_pack.F 770 CTRL_PACK
       close ( cunit )
./pkg/ctrl/ctrl_pack.F 99 CTRL_PACK
      integer cunit
./pkg/ctrl/ctrl_set_pack_xy.F 181 CTRL_SET_PACK_XY
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 182 CTRL_SET_PACK_XY
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 183 CTRL_SET_PACK_XY
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 250 CTRL_SET_PACK_XY
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 251 CTRL_SET_PACK_XY
               write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 253 CTRL_SET_PACK_XY
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 273 CTRL_SET_PACK_XY
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 274 CTRL_SET_PACK_XY
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 275 CTRL_SET_PACK_XY
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 344 CTRL_SET_PACK_XY
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 345 CTRL_SET_PACK_XY
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xy.F 347 CTRL_SET_PACK_XY
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 34 CTRL_SET_PACK_XY
      integer cunit
./pkg/ctrl/ctrl_set_pack_xy.F 497 CTRL_SET_PACK_XY
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 498 CTRL_SET_PACK_XY
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 499 CTRL_SET_PACK_XY
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 540 CTRL_SET_PACK_XY
          write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 541 CTRL_SET_PACK_XY
          write(cunit) k
./pkg/ctrl/ctrl_set_pack_xy.F 542 CTRL_SET_PACK_XY
          write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 7 CTRL_SET_PACK_XY
     &     cunit, ivartype, precondScalar,
./pkg/ctrl/ctrl_set_pack_xyz.F 190 CTRL_SET_PACK_XYZ
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xyz.F 191 CTRL_SET_PACK_XYZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 192 CTRL_SET_PACK_XYZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 256 CTRL_SET_PACK_XYZ
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xyz.F 257 CTRL_SET_PACK_XYZ
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xyz.F 259 CTRL_SET_PACK_XYZ
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xyz.F 38 CTRL_SET_PACK_XYZ
      integer cunit
./pkg/ctrl/ctrl_set_pack_xyz.F 415 CTRL_SET_PACK_XYZ
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xyz.F 416 CTRL_SET_PACK_XYZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 417 CTRL_SET_PACK_XYZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 458 CTRL_SET_PACK_XYZ
          write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xyz.F 459 CTRL_SET_PACK_XYZ
          write(cunit) k
./pkg/ctrl/ctrl_set_pack_xyz.F 460 CTRL_SET_PACK_XYZ
          write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xyz.F 7 CTRL_SET_PACK_XYZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_pack_xz.F 190 CTRL_SET_PACK_XZ
            write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xz.F 191 CTRL_SET_PACK_XZ
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 192 CTRL_SET_PACK_XZ
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 241 CTRL_SET_PACK_XZ
                write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xz.F 242 CTRL_SET_PACK_XZ
                write(cunit) k
./pkg/ctrl/ctrl_set_pack_xz.F 243 CTRL_SET_PACK_XZ
                write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xz.F 265 CTRL_SET_PACK_XZ
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xz.F 266 CTRL_SET_PACK_XZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 267 CTRL_SET_PACK_XZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 314 CTRL_SET_PACK_XZ
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xz.F 315 CTRL_SET_PACK_XZ
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xz.F 316 CTRL_SET_PACK_XZ
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xz.F 41 CTRL_SET_PACK_XZ
      integer cunit
./pkg/ctrl/ctrl_set_pack_xz.F 7 CTRL_SET_PACK_XZ
     &     cunit, ivartype, fname, masktype,weighttype,
./pkg/ctrl/ctrl_set_pack_yz.F 193 CTRL_SET_PACK_YZ
            write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_yz.F 194 CTRL_SET_PACK_YZ
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 195 CTRL_SET_PACK_YZ
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 245 CTRL_SET_PACK_YZ
                write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_yz.F 246 CTRL_SET_PACK_YZ
                write(cunit) k
./pkg/ctrl/ctrl_set_pack_yz.F 247 CTRL_SET_PACK_YZ
                write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_yz.F 269 CTRL_SET_PACK_YZ
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_yz.F 270 CTRL_SET_PACK_YZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 271 CTRL_SET_PACK_YZ
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 318 CTRL_SET_PACK_YZ
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_yz.F 319 CTRL_SET_PACK_YZ
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_yz.F 320 CTRL_SET_PACK_YZ
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_yz.F 41 CTRL_SET_PACK_YZ
      integer cunit
./pkg/ctrl/ctrl_set_pack_yz.F 7 CTRL_SET_PACK_YZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xy.F 179 CTRL_SET_UNPACK_XY
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 186 CTRL_SET_UNPACK_XY
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 187 CTRL_SET_UNPACK_XY
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 192 CTRL_SET_UNPACK_XY
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 198 CTRL_SET_UNPACK_XY
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 205 CTRL_SET_UNPACK_XY
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xy.F 287 CTRL_SET_UNPACK_XY
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 294 CTRL_SET_UNPACK_XY
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 295 CTRL_SET_UNPACK_XY
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 302 CTRL_SET_UNPACK_XY
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 308 CTRL_SET_UNPACK_XY
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 315 CTRL_SET_UNPACK_XY
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xy.F 35 CTRL_SET_UNPACK_XY
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xy.F 475 CTRL_SET_UNPACK_XY
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 482 CTRL_SET_UNPACK_XY
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 483 CTRL_SET_UNPACK_XY
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 504 CTRL_SET_UNPACK_XY
          read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 505 CTRL_SET_UNPACK_XY
          read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 516 CTRL_SET_UNPACK_XY
          read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xy.F 7 CTRL_SET_UNPACK_XY
     &     lxxadxx, cunit, ivartype, PrecondScalar,
./pkg/ctrl/ctrl_set_unpack_xyz.F 195 CTRL_SET_UNPACK_XYZ
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xyz.F 202 CTRL_SET_UNPACK_XYZ
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xyz.F 203 CTRL_SET_UNPACK_XYZ
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xyz.F 215 CTRL_SET_UNPACK_XYZ
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xyz.F 221 CTRL_SET_UNPACK_XYZ
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xyz.F 228 CTRL_SET_UNPACK_XYZ
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xyz.F 384 CTRL_SET_UNPACK_XYZ
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xyz.F 38 CTRL_SET_UNPACK_XYZ
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xyz.F 391 CTRL_SET_UNPACK_XYZ
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xyz.F 392 CTRL_SET_UNPACK_XYZ
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xyz.F 413 CTRL_SET_UNPACK_XYZ
          read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xyz.F 414 CTRL_SET_UNPACK_XYZ
          read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xyz.F 425 CTRL_SET_UNPACK_XYZ
          read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xyz.F 7 CTRL_SET_UNPACK_XYZ
     &     lxxadxx, cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xz.F 194 CTRL_SET_UNPACK_XZ
            read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xz.F 201 CTRL_SET_UNPACK_XZ
            read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xz.F 202 CTRL_SET_UNPACK_XZ
            read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xz.F 207 CTRL_SET_UNPACK_XZ
                  read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xz.F 213 CTRL_SET_UNPACK_XZ
                  read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xz.F 219 CTRL_SET_UNPACK_XZ
                  read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xz.F 281 CTRL_SET_UNPACK_XZ
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xz.F 288 CTRL_SET_UNPACK_XZ
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xz.F 289 CTRL_SET_UNPACK_XZ
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xz.F 294 CTRL_SET_UNPACK_XZ
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xz.F 300 CTRL_SET_UNPACK_XZ
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xz.F 306 CTRL_SET_UNPACK_XZ
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xz.F 40 CTRL_SET_UNPACK_XZ
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xz.F 7 CTRL_SET_UNPACK_XZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_yz.F 194 CTRL_SET_UNPACK_YZ
            read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_yz.F 201 CTRL_SET_UNPACK_YZ
            read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_yz.F 202 CTRL_SET_UNPACK_YZ
            read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_yz.F 207 CTRL_SET_UNPACK_YZ
                  read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_yz.F 213 CTRL_SET_UNPACK_YZ
                  read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_yz.F 219 CTRL_SET_UNPACK_YZ
                  read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_yz.F 281 CTRL_SET_UNPACK_YZ
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_yz.F 288 CTRL_SET_UNPACK_YZ
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_yz.F 289 CTRL_SET_UNPACK_YZ
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_yz.F 294 CTRL_SET_UNPACK_YZ
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_yz.F 300 CTRL_SET_UNPACK_YZ
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_yz.F 306 CTRL_SET_UNPACK_YZ
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_yz.F 40 CTRL_SET_UNPACK_YZ
      integer cunit
./pkg/ctrl/ctrl_set_unpack_yz.F 7 CTRL_SET_UNPACK_YZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_unpack.F 205 CTRL_UNPACK
          call MDSFINDUNIT( cunit, mythid )
./pkg/ctrl/ctrl_unpack.F 209 CTRL_UNPACK
          open( cunit, file   = cfile,
./pkg/ctrl/ctrl_unpack.F 215 CTRL_UNPACK
          read(cunit) filenvartype
./pkg/ctrl/ctrl_unpack.F 216 CTRL_UNPACK
          read(cunit) filenvarlength
./pkg/ctrl/ctrl_unpack.F 217 CTRL_UNPACK
          read(cunit) fileYctrlid
./pkg/ctrl/ctrl_unpack.F 218 CTRL_UNPACK
          read(cunit) fileOptimCycle
./pkg/ctrl/ctrl_unpack.F 219 CTRL_UNPACK
          read(cunit) filefc
./pkg/ctrl/ctrl_unpack.F 220 CTRL_UNPACK
          read(cunit) fileIg
./pkg/ctrl/ctrl_unpack.F 221 CTRL_UNPACK
          read(cunit) fileJg
./pkg/ctrl/ctrl_unpack.F 222 CTRL_UNPACK
          read(cunit) filensx
./pkg/ctrl/ctrl_unpack.F 223 CTRL_UNPACK
          read(cunit) filensy
./pkg/ctrl/ctrl_unpack.F 224 CTRL_UNPACK
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 225 CTRL_UNPACK
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 226 CTRL_UNPACK
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 228 CTRL_UNPACK
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 231 CTRL_UNPACK
          read(cunit) (filenWetiGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 237 CTRL_UNPACK
          read(cunit) ((filenWetobcsnGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 241 CTRL_UNPACK
          read(cunit) ((filenWetobcssGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 245 CTRL_UNPACK
          read(cunit) ((filenWetobcswGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 249 CTRL_UNPACK
          read(cunit) ((filenWetobcseGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 253 CTRL_UNPACK
          read(cunit) (filencvarindex(i), i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 254 CTRL_UNPACK
          read(cunit) (filencvarrecs(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 255 CTRL_UNPACK
          read(cunit) (filencvarxmax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 256 CTRL_UNPACK
          read(cunit) (filencvarymax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 257 CTRL_UNPACK
          read(cunit) (filencvarnrmax(i), i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 258 CTRL_UNPACK
          read(cunit) (filencvargrd(i),   i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 259 CTRL_UNPACK
          read(cunit)
./pkg/ctrl/ctrl_unpack.F 355 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 364 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 374 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 384 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 397 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 418 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 436 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 446 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 459 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 475 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 488 CTRL_UNPACK
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/ctrl/ctrl_unpack.F 497 CTRL_UNPACK
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/ctrl/ctrl_unpack.F 506 CTRL_UNPACK
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/ctrl/ctrl_unpack.F 515 CTRL_UNPACK
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/ctrl/ctrl_unpack.F 523 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 532 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 541 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 551 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 561 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 571 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 580 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 589 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 599 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 609 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 618 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 625 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 634 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 643 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 653 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 663 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 673 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 683 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 693 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 703 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 713 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 723 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 733 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 743 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 753 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 763 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 773 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 783 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 793 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 802 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 812 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 825 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, genarr2dPrecond(iarr),
./pkg/ctrl/ctrl_unpack.F 839 CTRL_UNPACK
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 854 CTRL_UNPACK
     &         lxxadxx, cunit, ivartype, gentim2dPrecond(iarr),
./pkg/ctrl/ctrl_unpack.F 866 CTRL_UNPACK
      close ( cunit )
./pkg/ctrl/ctrl_unpack.F 97 CTRL_UNPACK
      integer cunit