Symbol Description Uses
cunit 420


File Line number Procedure Code
./pkg/profiles/cost_profiles.F 343 COST_PROFILES 
         call MDSFINDUNIT( cunit, mythid )
./pkg/profiles/cost_profiles.F 344 COST_PROFILES 
         open( cunit, file   = cfile,
./pkg/profiles/cost_profiles.F 352 COST_PROFILES 
          write(cunit,rec=ikzz) tmp99
./pkg/profiles/cost_profiles.F 354 COST_PROFILES 
         close ( cunit )
./pkg/profiles/cost_profiles.F 358 COST_PROFILES 
         call MDSFINDUNIT( cunit, mythid )
./pkg/profiles/cost_profiles.F 359 COST_PROFILES 
         open( cunit, file   = cfile,
./pkg/profiles/cost_profiles.F 369 COST_PROFILES 
          write(cunit,rec=ikzz) tmp99
./pkg/profiles/cost_profiles.F 371 COST_PROFILES 
         close ( cunit )
./pkg/profiles/cost_profiles.F 375 COST_PROFILES 
         call MDSFINDUNIT( cunit, mythid )
./pkg/profiles/cost_profiles.F 376 COST_PROFILES 
         open( cunit, file   = cfile,
./pkg/profiles/cost_profiles.F 384 COST_PROFILES 
          write(cunit,rec=ikzz) tmp99
./pkg/profiles/cost_profiles.F 386 COST_PROFILES 
         close ( cunit )
./pkg/profiles/cost_profiles.F 390 COST_PROFILES 
         call MDSFINDUNIT( cunit, mythid )
./pkg/profiles/cost_profiles.F 391 COST_PROFILES 
         open( cunit, file   = cfile,
./pkg/profiles/cost_profiles.F 399 COST_PROFILES 
          write(cunit,rec=ikzz) tmp99
./pkg/profiles/cost_profiles.F 401 COST_PROFILES 
         close ( cunit )
./pkg/profiles/cost_profiles.F 65 COST_PROFILES 
      integer cunit
./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 106 CTRL_PACK 
      integer cunit
./pkg/ctrl/ctrl_pack.F 216 CTRL_PACK 
       call MDSFINDUNIT( cunit, mythid )
./pkg/ctrl/ctrl_pack.F 217 CTRL_PACK 
       open( cunit, file   = cfile,
./pkg/ctrl/ctrl_pack.F 223 CTRL_PACK 
          write(cunit) nvartype
./pkg/ctrl/ctrl_pack.F 224 CTRL_PACK 
          write(cunit) nvarlength
./pkg/ctrl/ctrl_pack.F 225 CTRL_PACK 
          write(cunit) yctrlid
./pkg/ctrl/ctrl_pack.F 226 CTRL_PACK 
          write(cunit) optimCycle
./pkg/ctrl/ctrl_pack.F 228 CTRL_PACK 
          write(cunit) fc
./pkg/ctrl/ctrl_pack.F 230 CTRL_PACK 
          write(cunit) zeroRL
./pkg/ctrl/ctrl_pack.F 233 CTRL_PACK 
          write(cunit) 1
./pkg/ctrl/ctrl_pack.F 235 CTRL_PACK 
          write(cunit) 1
./pkg/ctrl/ctrl_pack.F 236 CTRL_PACK 
          write(cunit) nsx
./pkg/ctrl/ctrl_pack.F 237 CTRL_PACK 
          write(cunit) nsy
./pkg/ctrl/ctrl_pack.F 238 CTRL_PACK 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 239 CTRL_PACK 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 240 CTRL_PACK 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 242 CTRL_PACK 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 245 CTRL_PACK 
          write(cunit) (nWetiGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 251 CTRL_PACK 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 254 CTRL_PACK 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 257 CTRL_PACK 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 260 CTRL_PACK 
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 264 CTRL_PACK 
          write(cunit) (ncvarindex(i), i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 265 CTRL_PACK 
          write(cunit) (ncvarrecs(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 266 CTRL_PACK 
          write(cunit) (ncvarxmax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 267 CTRL_PACK 
          write(cunit) (ncvarymax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 268 CTRL_PACK 
          write(cunit) (ncvarnrmax(i), i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 269 CTRL_PACK 
          write(cunit) (ncvargrd(i),   i=1,maxcvars)
./pkg/ctrl/ctrl_pack.F 270 CTRL_PACK 
          write(cunit)
./pkg/ctrl/ctrl_pack.F 284 CTRL_PACK 
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/ctrl/ctrl_pack.F 292 CTRL_PACK 
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/ctrl/ctrl_pack.F 300 CTRL_PACK 
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/ctrl/ctrl_pack.F 308 CTRL_PACK 
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/ctrl/ctrl_pack.F 320 CTRL_PACK 
     &         cunit, ivartype, fname_theta(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 329 CTRL_PACK 
     &         cunit, ivartype, fname_salt(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 338 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 348 CTRL_PACK 
     &         cunit, ivartype,  forcingPrecond,
./pkg/ctrl/ctrl_pack.F 362 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 365 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 383 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 386 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 400 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 410 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 423 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 439 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 452 CTRL_PACK 
     &         cunit, ivartype, fname_diffkr(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 461 CTRL_PACK 
     &         cunit, ivartype, fname_kapgm(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 470 CTRL_PACK 
     &         cunit, ivartype, fname_tr1(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 479 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 489 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 499 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 509 CTRL_PACK 
     &         cunit, ivartype, fname_efluxy(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 518 CTRL_PACK 
     &         cunit, ivartype, fname_efluxp(ictrlgrad), "maskhFacV",
./pkg/ctrl/ctrl_pack.F 527 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 537 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 547 CTRL_PACK 
     &         cunit, ivartype, fname_edtaux(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 554 CTRL_PACK 
     &         cunit, ivartype, fname_edtauy(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 563 CTRL_PACK 
     &         cunit, ivartype, fname_uvel(ictrlgrad), "maskCtrlW",
./pkg/ctrl/ctrl_pack.F 572 CTRL_PACK 
     &         cunit, ivartype, fname_vvel(ictrlgrad), "maskCtrlS",
./pkg/ctrl/ctrl_pack.F 581 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 591 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 601 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 611 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 621 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 631 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 641 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 651 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 661 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 671 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 681 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 691 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 701 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 711 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 721 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 731 CTRL_PACK 
     &         cunit, ivartype, fname_kapredi(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 740 CTRL_PACK 
     &         cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_pack.F 756 CTRL_PACK 
     &         cunit, ivartype, genarr2dPrecond(iarr),
./pkg/ctrl/ctrl_pack.F 773 CTRL_PACK 
     &         cunit, ivartype, fname_local(ictrlgrad), "maskCtrlC",
./pkg/ctrl/ctrl_pack.F 789 CTRL_PACK 
     &         cunit, ivartype, gentim2dPrecond(iarr),
./pkg/ctrl/ctrl_pack.F 802 CTRL_PACK 
       close ( cunit )
./pkg/ctrl/ctrl_set_pack_xy.F 184 CTRL_SET_PACK_XY 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 185 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 186 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 253 CTRL_SET_PACK_XY 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 254 CTRL_SET_PACK_XY 
               write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 256 CTRL_SET_PACK_XY 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 276 CTRL_SET_PACK_XY 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 277 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 278 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 347 CTRL_SET_PACK_XY 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 348 CTRL_SET_PACK_XY 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xy.F 34 CTRL_SET_PACK_XY 
      integer cunit
./pkg/ctrl/ctrl_set_pack_xy.F 350 CTRL_SET_PACK_XY 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xy.F 512 CTRL_SET_PACK_XY 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xy.F 513 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 514 CTRL_SET_PACK_XY 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xy.F 555 CTRL_SET_PACK_XY 
          write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xy.F 556 CTRL_SET_PACK_XY 
          write(cunit) k
./pkg/ctrl/ctrl_set_pack_xy.F 557 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 194 CTRL_SET_PACK_XYZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xyz.F 195 CTRL_SET_PACK_XYZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 196 CTRL_SET_PACK_XYZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 260 CTRL_SET_PACK_XYZ 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xyz.F 261 CTRL_SET_PACK_XYZ 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xyz.F 263 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 431 CTRL_SET_PACK_XYZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xyz.F 432 CTRL_SET_PACK_XYZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 433 CTRL_SET_PACK_XYZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xyz.F 474 CTRL_SET_PACK_XYZ 
          write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xyz.F 475 CTRL_SET_PACK_XYZ 
          write(cunit) k
./pkg/ctrl/ctrl_set_pack_xyz.F 476 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 191 CTRL_SET_PACK_XZ 
            write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xz.F 192 CTRL_SET_PACK_XZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 193 CTRL_SET_PACK_XZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 242 CTRL_SET_PACK_XZ 
                write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xz.F 243 CTRL_SET_PACK_XZ 
                write(cunit) k
./pkg/ctrl/ctrl_set_pack_xz.F 244 CTRL_SET_PACK_XZ 
                write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xz.F 266 CTRL_SET_PACK_XZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_xz.F 267 CTRL_SET_PACK_XZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 268 CTRL_SET_PACK_XZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_xz.F 315 CTRL_SET_PACK_XZ 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_xz.F 316 CTRL_SET_PACK_XZ 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_xz.F 317 CTRL_SET_PACK_XZ 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_xz.F 42 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 194 CTRL_SET_PACK_YZ 
            write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_yz.F 195 CTRL_SET_PACK_YZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 196 CTRL_SET_PACK_YZ 
            write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 246 CTRL_SET_PACK_YZ 
                write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_yz.F 247 CTRL_SET_PACK_YZ 
                write(cunit) k
./pkg/ctrl/ctrl_set_pack_yz.F 248 CTRL_SET_PACK_YZ 
                write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_yz.F 270 CTRL_SET_PACK_YZ 
         write(cunit) ncvarindex(ivartype)
./pkg/ctrl/ctrl_set_pack_yz.F 271 CTRL_SET_PACK_YZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 272 CTRL_SET_PACK_YZ 
         write(cunit) 1
./pkg/ctrl/ctrl_set_pack_yz.F 319 CTRL_SET_PACK_YZ 
               write(cunit) cbuffindex
./pkg/ctrl/ctrl_set_pack_yz.F 320 CTRL_SET_PACK_YZ 
               write(cunit) k
./pkg/ctrl/ctrl_set_pack_yz.F 321 CTRL_SET_PACK_YZ 
               write(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_pack_yz.F 42 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 182 CTRL_SET_UNPACK_XY 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 189 CTRL_SET_UNPACK_XY 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 190 CTRL_SET_UNPACK_XY 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 195 CTRL_SET_UNPACK_XY 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 201 CTRL_SET_UNPACK_XY 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 208 CTRL_SET_UNPACK_XY 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xy.F 290 CTRL_SET_UNPACK_XY 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 297 CTRL_SET_UNPACK_XY 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 298 CTRL_SET_UNPACK_XY 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 305 CTRL_SET_UNPACK_XY 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 311 CTRL_SET_UNPACK_XY 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 318 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 490 CTRL_SET_UNPACK_XY 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xy.F 497 CTRL_SET_UNPACK_XY 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xy.F 498 CTRL_SET_UNPACK_XY 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xy.F 519 CTRL_SET_UNPACK_XY 
          read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xy.F 520 CTRL_SET_UNPACK_XY 
          read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xy.F 531 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 199 CTRL_SET_UNPACK_XYZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xyz.F 206 CTRL_SET_UNPACK_XYZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xyz.F 207 CTRL_SET_UNPACK_XYZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xyz.F 219 CTRL_SET_UNPACK_XYZ 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xyz.F 225 CTRL_SET_UNPACK_XYZ 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xyz.F 232 CTRL_SET_UNPACK_XYZ 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xyz.F 38 CTRL_SET_UNPACK_XYZ 
      integer cunit
./pkg/ctrl/ctrl_set_unpack_xyz.F 400 CTRL_SET_UNPACK_XYZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xyz.F 407 CTRL_SET_UNPACK_XYZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xyz.F 408 CTRL_SET_UNPACK_XYZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xyz.F 429 CTRL_SET_UNPACK_XYZ 
          read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xyz.F 430 CTRL_SET_UNPACK_XYZ 
          read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xyz.F 441 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 195 CTRL_SET_UNPACK_XZ 
            read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xz.F 202 CTRL_SET_UNPACK_XZ 
            read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xz.F 203 CTRL_SET_UNPACK_XZ 
            read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xz.F 208 CTRL_SET_UNPACK_XZ 
                  read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xz.F 214 CTRL_SET_UNPACK_XZ 
                  read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xz.F 220 CTRL_SET_UNPACK_XZ 
                  read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xz.F 282 CTRL_SET_UNPACK_XZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_xz.F 289 CTRL_SET_UNPACK_XZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_xz.F 290 CTRL_SET_UNPACK_XZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_xz.F 295 CTRL_SET_UNPACK_XZ 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_xz.F 301 CTRL_SET_UNPACK_XZ 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_xz.F 307 CTRL_SET_UNPACK_XZ 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_xz.F 41 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 195 CTRL_SET_UNPACK_YZ 
            read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_yz.F 202 CTRL_SET_UNPACK_YZ 
            read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_yz.F 203 CTRL_SET_UNPACK_YZ 
            read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_yz.F 208 CTRL_SET_UNPACK_YZ 
                  read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_yz.F 214 CTRL_SET_UNPACK_YZ 
                  read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_yz.F 220 CTRL_SET_UNPACK_YZ 
                  read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_yz.F 282 CTRL_SET_UNPACK_YZ 
         read(cunit) filencvarindex(ivartype)
./pkg/ctrl/ctrl_set_unpack_yz.F 289 CTRL_SET_UNPACK_YZ 
         read(cunit) filej
./pkg/ctrl/ctrl_set_unpack_yz.F 290 CTRL_SET_UNPACK_YZ 
         read(cunit) filei
./pkg/ctrl/ctrl_set_unpack_yz.F 295 CTRL_SET_UNPACK_YZ 
               read(cunit) filencbuffindex
./pkg/ctrl/ctrl_set_unpack_yz.F 301 CTRL_SET_UNPACK_YZ 
               read(cunit) filek
./pkg/ctrl/ctrl_set_unpack_yz.F 307 CTRL_SET_UNPACK_YZ 
               read(cunit) (cbuff(ii), ii=1,cbuffindex)
./pkg/ctrl/ctrl_set_unpack_yz.F 41 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 102 CTRL_UNPACK 
      integer cunit
./pkg/ctrl/ctrl_unpack.F 219 CTRL_UNPACK 
          call MDSFINDUNIT( cunit, mythid )
./pkg/ctrl/ctrl_unpack.F 223 CTRL_UNPACK 
          open( cunit, file   = cfile,
./pkg/ctrl/ctrl_unpack.F 229 CTRL_UNPACK 
          read(cunit) filenvartype
./pkg/ctrl/ctrl_unpack.F 230 CTRL_UNPACK 
          read(cunit) filenvarlength
./pkg/ctrl/ctrl_unpack.F 231 CTRL_UNPACK 
          read(cunit) fileYctrlid
./pkg/ctrl/ctrl_unpack.F 232 CTRL_UNPACK 
          read(cunit) fileOptimCycle
./pkg/ctrl/ctrl_unpack.F 233 CTRL_UNPACK 
          read(cunit) filefc
./pkg/ctrl/ctrl_unpack.F 234 CTRL_UNPACK 
          read(cunit) fileIg
./pkg/ctrl/ctrl_unpack.F 235 CTRL_UNPACK 
          read(cunit) fileJg
./pkg/ctrl/ctrl_unpack.F 236 CTRL_UNPACK 
          read(cunit) filensx
./pkg/ctrl/ctrl_unpack.F 237 CTRL_UNPACK 
          read(cunit) filensy
./pkg/ctrl/ctrl_unpack.F 238 CTRL_UNPACK 
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 239 CTRL_UNPACK 
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 240 CTRL_UNPACK 
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 242 CTRL_UNPACK 
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 245 CTRL_UNPACK 
          read(cunit) (filenWetiGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 252 CTRL_UNPACK 
          read(cunit) ((filenWetobcsnGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 256 CTRL_UNPACK 
          read(cunit) ((filenWetobcssGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 260 CTRL_UNPACK 
          read(cunit) ((filenWetobcswGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 264 CTRL_UNPACK 
          read(cunit) ((filenWetobcseGlo(k,iobcs),
./pkg/ctrl/ctrl_unpack.F 270 CTRL_UNPACK 
          read(cunit) (filencvarindex(i), i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 271 CTRL_UNPACK 
          read(cunit) (filencvarrecs(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 272 CTRL_UNPACK 
          read(cunit) (filencvarxmax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 273 CTRL_UNPACK 
          read(cunit) (filencvarymax(i),  i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 274 CTRL_UNPACK 
          read(cunit) (filencvarnrmax(i), i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 275 CTRL_UNPACK 
          read(cunit) (filencvargrd(i),   i=1,maxcvars)
./pkg/ctrl/ctrl_unpack.F 276 CTRL_UNPACK 
          read(cunit)
./pkg/ctrl/ctrl_unpack.F 372 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcsn(ictrlgrad), "maskobcsn",
./pkg/ctrl/ctrl_unpack.F 380 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcss(ictrlgrad), "maskobcss",
./pkg/ctrl/ctrl_unpack.F 388 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcsw(ictrlgrad), "maskobcsw",
./pkg/ctrl/ctrl_unpack.F 396 CTRL_UNPACK 
     &         cunit, ivartype, fname_obcse(ictrlgrad), "maskobcse",
./pkg/ctrl/ctrl_unpack.F 407 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 416 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 426 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 436 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 449 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 470 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 488 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 498 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 511 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 527 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 539 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 548 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 557 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 567 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 577 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 587 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 596 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 605 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 615 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 625 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 634 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 641 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 650 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 659 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 669 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 679 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 689 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 699 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 709 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 719 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 729 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 739 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 749 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 759 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 769 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 779 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 789 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 799 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 809 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 818 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 828 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, forcingPrecond,
./pkg/ctrl/ctrl_unpack.F 844 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, genarr2dPrecond(iarr),
./pkg/ctrl/ctrl_unpack.F 860 CTRL_UNPACK 
          call CTRL_SET_UNPACK_XYZ( lxxadxx, cunit, ivartype,
./pkg/ctrl/ctrl_unpack.F 877 CTRL_UNPACK 
     &         lxxadxx, cunit, ivartype, gentim2dPrecond(iarr),
./pkg/ctrl/ctrl_unpack.F 890 CTRL_UNPACK 
      close ( cunit )