Symbol Description Uses
weighttype 523



File Line number Procedure Code
./pkg/admtlm/admtlm_dsvd2model.F 334 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 335 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wtheta"
./pkg/admtlm/admtlm_dsvd2model.F 338 ADMTLM_DSVD2MODEL
     &         weighttype, wtheta, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 343 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 344 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wsalt"
./pkg/admtlm/admtlm_dsvd2model.F 347 ADMTLM_DSVD2MODEL
     &         weighttype, wsalt, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 352 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 353 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "whflux"
./pkg/admtlm/admtlm_dsvd2model.F 356 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 361 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 362 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wsflux"
./pkg/admtlm/admtlm_dsvd2model.F 365 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 370 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 371 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wtauu"
./pkg/admtlm/admtlm_dsvd2model.F 374 ADMTLM_DSVD2MODEL
     &         weighttype, nwetwglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 379 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 380 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wtauv"
./pkg/admtlm/admtlm_dsvd2model.F 383 ADMTLM_DSVD2MODEL
     &         weighttype, nwetsglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 388 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 389 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "watemp"
./pkg/admtlm/admtlm_dsvd2model.F 392 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 397 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 398 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "waqh"
./pkg/admtlm/admtlm_dsvd2model.F 401 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 406 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 407 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wuwind"
./pkg/admtlm/admtlm_dsvd2model.F 410 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 415 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 416 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wvwind"
./pkg/admtlm/admtlm_dsvd2model.F 419 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 424 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 425 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wobcsn"
./pkg/admtlm/admtlm_dsvd2model.F 428 ADMTLM_DSVD2MODEL
     &         weighttype, wobcsn, nWetobcsnGlo, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 433 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 434 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wobcss"
./pkg/admtlm/admtlm_dsvd2model.F 437 ADMTLM_DSVD2MODEL
     &         weighttype, wobcss, nWetobcssGlo, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 442 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 443 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wobcsw"
./pkg/admtlm/admtlm_dsvd2model.F 446 ADMTLM_DSVD2MODEL
     &         weighttype, wobcsw, nWetobcswGlo, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 451 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 452 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wobcse"
./pkg/admtlm/admtlm_dsvd2model.F 455 ADMTLM_DSVD2MODEL
     &         weighttype, wobcse, nWetobcseGlo, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 460 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 461 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wdiffkr"
./pkg/admtlm/admtlm_dsvd2model.F 464 ADMTLM_DSVD2MODEL
     &         weighttype, wunit, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 469 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 470 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wkapgm"
./pkg/admtlm/admtlm_dsvd2model.F 473 ADMTLM_DSVD2MODEL
     &         weighttype, wunit, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 478 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 479 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wtr1"
./pkg/admtlm/admtlm_dsvd2model.F 482 ADMTLM_DSVD2MODEL
     &         weighttype, wunit, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 487 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 488 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wsst"
./pkg/admtlm/admtlm_dsvd2model.F 491 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 496 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 497 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wsss"
./pkg/admtlm/admtlm_dsvd2model.F 500 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 505 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 506 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wdepth"
./pkg/admtlm/admtlm_dsvd2model.F 509 ADMTLM_DSVD2MODEL
     &         weighttype, weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 514 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 515 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wefluxy0"
./pkg/admtlm/admtlm_dsvd2model.F 518 ADMTLM_DSVD2MODEL
     &         weighttype, wefluxy, nwetsglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 523 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 524 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wefluxp0"
./pkg/admtlm/admtlm_dsvd2model.F 527 ADMTLM_DSVD2MODEL
     &         weighttype, wefluxp, nwetvglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 532 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 533 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wbottomdrag"
./pkg/admtlm/admtlm_dsvd2model.F 536 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 541 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 542 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wedtaux"
./pkg/admtlm/admtlm_dsvd2model.F 545 ADMTLM_DSVD2MODEL
     &         weighttype, wunit, nwetwglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 548 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 549 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wedtauy"
./pkg/admtlm/admtlm_dsvd2model.F 552 ADMTLM_DSVD2MODEL
     &         weighttype, wunit, nwetsglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 557 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 558 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wuvvel"
./pkg/admtlm/admtlm_dsvd2model.F 561 ADMTLM_DSVD2MODEL
     &         weighttype, wuvvel, nwetwglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 566 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 567 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wuvvel"
./pkg/admtlm/admtlm_dsvd2model.F 570 ADMTLM_DSVD2MODEL
     &         weighttype, wuvvel, nwetsglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 575 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 576 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wetan"
./pkg/admtlm/admtlm_dsvd2model.F 579 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 584 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 585 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wrelaxsst"
./pkg/admtlm/admtlm_dsvd2model.F 588 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 593 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 594 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wrelaxsss"
./pkg/admtlm/admtlm_dsvd2model.F 597 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 602 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 603 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wprecip"
./pkg/admtlm/admtlm_dsvd2model.F 606 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 611 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 612 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wswflux"
./pkg/admtlm/admtlm_dsvd2model.F 615 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 620 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_dsvd2model.F 621 ADMTLM_DSVD2MODEL
          write(weighttype(1:80),'(a)') "wswdown"
./pkg/admtlm/admtlm_dsvd2model.F 624 ADMTLM_DSVD2MODEL
     &         weighttype, nwetcglobal, mythid)
./pkg/admtlm/admtlm_dsvd2model.F 83 ADMTLM_DSVD2MODEL
      character*( 80) weighttype
./pkg/admtlm/admtlm_model2dsvd.F 247 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 248 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wtheta"
./pkg/admtlm/admtlm_model2dsvd.F 251 ADMTLM_MODEL2DSVD
     &         weighttype, wtheta, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 256 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 257 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wsalt"
./pkg/admtlm/admtlm_model2dsvd.F 260 ADMTLM_MODEL2DSVD
     &         weighttype, wsalt, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 265 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 266 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "whflux"
./pkg/admtlm/admtlm_model2dsvd.F 269 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 274 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 275 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wsflux"
./pkg/admtlm/admtlm_model2dsvd.F 278 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 283 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 284 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wtauu"
./pkg/admtlm/admtlm_model2dsvd.F 287 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 292 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 293 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wtauv"
./pkg/admtlm/admtlm_model2dsvd.F 296 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 301 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 302 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "watemp"
./pkg/admtlm/admtlm_model2dsvd.F 305 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 310 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 311 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "waqh"
./pkg/admtlm/admtlm_model2dsvd.F 314 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 319 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 320 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wuwind"
./pkg/admtlm/admtlm_model2dsvd.F 323 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 328 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 329 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wvwind"
./pkg/admtlm/admtlm_model2dsvd.F 332 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 337 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 338 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wobcsn"
./pkg/admtlm/admtlm_model2dsvd.F 341 ADMTLM_MODEL2DSVD
     &         weighttype, wobcsn, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 346 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 347 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wobcss"
./pkg/admtlm/admtlm_model2dsvd.F 350 ADMTLM_MODEL2DSVD
     &         weighttype, wobcss, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 355 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 356 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wobcsw"
./pkg/admtlm/admtlm_model2dsvd.F 359 ADMTLM_MODEL2DSVD
     &         weighttype, wobcsw, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 364 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 365 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wobcse"
./pkg/admtlm/admtlm_model2dsvd.F 368 ADMTLM_MODEL2DSVD
     &         weighttype, wobcse, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 373 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 374 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wdiffkr"
./pkg/admtlm/admtlm_model2dsvd.F 377 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 382 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 383 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wkapgm"
./pkg/admtlm/admtlm_model2dsvd.F 386 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 391 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 392 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wtr1"
./pkg/admtlm/admtlm_model2dsvd.F 395 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 400 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 401 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wsst"
./pkg/admtlm/admtlm_model2dsvd.F 404 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 409 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 410 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wsss"
./pkg/admtlm/admtlm_model2dsvd.F 413 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 418 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 419 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wdepth"
./pkg/admtlm/admtlm_model2dsvd.F 422 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 427 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 428 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wefluxy0"
./pkg/admtlm/admtlm_model2dsvd.F 431 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 436 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 437 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wefluxp0"
./pkg/admtlm/admtlm_model2dsvd.F 440 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 445 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 446 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wbottomdrag"
./pkg/admtlm/admtlm_model2dsvd.F 449 ADMTLM_MODEL2DSVD
     &      weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 454 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 455 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wedtaux"
./pkg/admtlm/admtlm_model2dsvd.F 458 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 461 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 462 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wedtauy"
./pkg/admtlm/admtlm_model2dsvd.F 465 ADMTLM_MODEL2DSVD
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 470 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 471 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wuvvel"
./pkg/admtlm/admtlm_model2dsvd.F 474 ADMTLM_MODEL2DSVD
     &         weighttype, wuvvel, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 479 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 480 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wuvvel"
./pkg/admtlm/admtlm_model2dsvd.F 483 ADMTLM_MODEL2DSVD
     &         weighttype, wuvvel, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 488 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 489 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wetan"
./pkg/admtlm/admtlm_model2dsvd.F 492 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 497 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 498 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wrelaxsst"
./pkg/admtlm/admtlm_model2dsvd.F 501 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 506 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 507 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wrelaxsss"
./pkg/admtlm/admtlm_model2dsvd.F 510 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 515 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 516 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wprecip"
./pkg/admtlm/admtlm_model2dsvd.F 519 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 524 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 525 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wswflux"
./pkg/admtlm/admtlm_model2dsvd.F 528 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 533 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(80a)') ' '
./pkg/admtlm/admtlm_model2dsvd.F 534 ADMTLM_MODEL2DSVD
          write(weighttype(1:80),'(a)') "wswdown"
./pkg/admtlm/admtlm_model2dsvd.F 537 ADMTLM_MODEL2DSVD
     &         weighttype, lxxadxx, mythid)
./pkg/admtlm/admtlm_model2dsvd.F 87 ADMTLM_MODEL2DSVD
      character*( 80) weighttype
./pkg/ctrl/ctrl_pack.F 110 CTRL_PACK
      character*( 80) weighttype
./pkg/ctrl/ctrl_pack.F 281 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 282 CTRL_PACK
          write(weighttype(1:80),'(a)') "wobcsn"
./pkg/ctrl/ctrl_pack.F 285 CTRL_PACK
     &         weighttype, wobcsn, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 289 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 290 CTRL_PACK
          write(weighttype(1:80),'(a)') "wobcss"
./pkg/ctrl/ctrl_pack.F 293 CTRL_PACK
     &         weighttype, wobcss, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 297 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 298 CTRL_PACK
          write(weighttype(1:80),'(a)') "wobcsw"
./pkg/ctrl/ctrl_pack.F 301 CTRL_PACK
     &         weighttype, wobcsw, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 305 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 306 CTRL_PACK
          write(weighttype(1:80),'(a)') "wobcse"
./pkg/ctrl/ctrl_pack.F 309 CTRL_PACK
     &         weighttype, wobcse, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 317 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 318 CTRL_PACK
          write(weighttype(1:80),'(a)') "wthetaLev"
./pkg/ctrl/ctrl_pack.F 321 CTRL_PACK
     &         weighttype, wtheta, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 326 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 327 CTRL_PACK
          write(weighttype(1:80),'(a)') "wsaltLev"
./pkg/ctrl/ctrl_pack.F 330 CTRL_PACK
     &         weighttype, wsalt, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 335 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 336 CTRL_PACK
          write(weighttype(1:80),'(a)') "whflux"
./pkg/ctrl/ctrl_pack.F 340 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 345 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 346 CTRL_PACK
          write(weighttype(1:80),'(a)') "wsflux"
./pkg/ctrl/ctrl_pack.F 350 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 358 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 359 CTRL_PACK
          write(weighttype(1:80),'(a)') "wtauu"
./pkg/ctrl/ctrl_pack.F 368 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 379 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 380 CTRL_PACK
          write(weighttype(1:80),'(a)') "wtauv"
./pkg/ctrl/ctrl_pack.F 389 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 397 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 398 CTRL_PACK
          write(weighttype(1:80),'(a)') "watemp"
./pkg/ctrl/ctrl_pack.F 402 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 407 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 408 CTRL_PACK
          write(weighttype(1:80),'(a)') "waqh"
./pkg/ctrl/ctrl_pack.F 412 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 420 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 421 CTRL_PACK
          write(weighttype(1:80),'(a)') "wuwind"
./pkg/ctrl/ctrl_pack.F 425 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 436 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 437 CTRL_PACK
          write(weighttype(1:80),'(a)') "wvwind"
./pkg/ctrl/ctrl_pack.F 441 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 449 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 450 CTRL_PACK
          write(weighttype(1:80),'(a)') "wdiffkr"
./pkg/ctrl/ctrl_pack.F 453 CTRL_PACK
     &         weighttype, wdiffkr, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 458 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 459 CTRL_PACK
          write(weighttype(1:80),'(a)') "wkapgm"
./pkg/ctrl/ctrl_pack.F 462 CTRL_PACK
     &         weighttype, wkapgm, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 467 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 468 CTRL_PACK
          write(weighttype(1:80),'(a)') "wtr1"
./pkg/ctrl/ctrl_pack.F 471 CTRL_PACK
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 476 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 477 CTRL_PACK
          write(weighttype(1:80),'(a)') "wsst"
./pkg/ctrl/ctrl_pack.F 481 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 486 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 487 CTRL_PACK
          write(weighttype(1:80),'(a)') "wsss"
./pkg/ctrl/ctrl_pack.F 491 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 496 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 497 CTRL_PACK
          write(weighttype(1:80),'(a)') "wdepth"
./pkg/ctrl/ctrl_pack.F 501 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 506 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 507 CTRL_PACK
          write(weighttype(1:80),'(a)') "wefluxy0"
./pkg/ctrl/ctrl_pack.F 510 CTRL_PACK
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 515 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 516 CTRL_PACK
          write(weighttype(1:80),'(a)') "wefluxp0"
./pkg/ctrl/ctrl_pack.F 519 CTRL_PACK
     &         weighttype, wunit, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 524 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 525 CTRL_PACK
          write(weighttype(1:80),'(a)') "wbottomdrag"
./pkg/ctrl/ctrl_pack.F 529 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 534 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 535 CTRL_PACK
          write(weighttype(1:80),'(a)') "whfluxm"
./pkg/ctrl/ctrl_pack.F 539 CTRL_PACK
     &         weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 544 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 545 CTRL_PACK
          write(weighttype(1:80),'(a)') "wedtaux"
./pkg/ctrl/ctrl_pack.F 548 CTRL_PACK
     &         weighttype, wedtaux, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 551 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 552 CTRL_PACK
          write(weighttype(1:80),'(a)') "wedtauy"
./pkg/ctrl/ctrl_pack.F 555 CTRL_PACK
     &         weighttype, wedtauy, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 560 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 561 CTRL_PACK
          write(weighttype(1:80),'(a)') "wuvel"
./pkg/ctrl/ctrl_pack.F 564 CTRL_PACK
     &         weighttype, wuvel, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 569 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 570 CTRL_PACK
          write(weighttype(1:80),'(a)') "wvvel"
./pkg/ctrl/ctrl_pack.F 573 CTRL_PACK
     &         weighttype, wvvel, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 578 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 579 CTRL_PACK
          write(weighttype(1:80),'(a)') "wetan"
./pkg/ctrl/ctrl_pack.F 583 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 588 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 589 CTRL_PACK
          write(weighttype(1:80),'(a)') "wrelaxsst"
./pkg/ctrl/ctrl_pack.F 593 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 598 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 599 CTRL_PACK
          write(weighttype(1:80),'(a)') "wrelaxsss"
./pkg/ctrl/ctrl_pack.F 603 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 608 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 609 CTRL_PACK
          write(weighttype(1:80),'(a)') "wprecip"
./pkg/ctrl/ctrl_pack.F 613 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 618 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 619 CTRL_PACK
          write(weighttype(1:80),'(a)') "wswflux"
./pkg/ctrl/ctrl_pack.F 623 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 628 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 629 CTRL_PACK
          write(weighttype(1:80),'(a)') "wswdown"
./pkg/ctrl/ctrl_pack.F 633 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 638 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 639 CTRL_PACK
          write(weighttype(1:80),'(a)') "wlwflux"
./pkg/ctrl/ctrl_pack.F 643 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 648 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 649 CTRL_PACK
          write(weighttype(1:80),'(a)') "wlwdown"
./pkg/ctrl/ctrl_pack.F 653 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 658 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 659 CTRL_PACK
          write(weighttype(1:80),'(a)') "wevap"
./pkg/ctrl/ctrl_pack.F 663 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 668 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 669 CTRL_PACK
          write(weighttype(1:80),'(a)') "wsnowprecip"
./pkg/ctrl/ctrl_pack.F 673 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 678 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 679 CTRL_PACK
          write(weighttype(1:80),'(a)') "wapressure"
./pkg/ctrl/ctrl_pack.F 683 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 688 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 689 CTRL_PACK
          write(weighttype(1:80),'(a)') "wrunoff"
./pkg/ctrl/ctrl_pack.F 693 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 698 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 699 CTRL_PACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_pack.F 703 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 708 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 709 CTRL_PACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_pack.F 713 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 718 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 719 CTRL_PACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_pack.F 723 CTRL_PACK
     &         "maskCtrlC", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 728 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 729 CTRL_PACK
          write(weighttype(1:80),'(a)') "wkapredi"
./pkg/ctrl/ctrl_pack.F 732 CTRL_PACK
     &         weighttype, wkapredi, lxxadxx, mythid)
./pkg/ctrl/ctrl_pack.F 737 CTRL_PACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_pack.F 738 CTRL_PACK
          write(weighttype(1:80),'(a)') "wshifwflx"
./pkg/ctrl/ctrl_pack.F 742 CTRL_PACK
     &         "maskCtrlI", weighttype, lxxadxx, mythid)
./pkg/ctrl/ctrl_set_pack_xy.F 148 CTRL_SET_PACK_XY
      if (weighttype.NE.' ') then
./pkg/ctrl/ctrl_set_pack_xy.F 149 CTRL_SET_PACK_XY
       il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_pack_xy.F 151 CTRL_SET_PACK_XY
       write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_pack_xy.F 39 CTRL_SET_PACK_XY
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_pack_xy.F 420 CTRL_SET_PACK_XY
      call ACTIVE_READ_XY(weighttype, wei2d, 1,
./pkg/ctrl/ctrl_set_pack_xy.F 423 CTRL_SET_PACK_XY
      CALL READ_REC_XY_RL( weighttype, wei2d, 1, 1, myThid )
./pkg/ctrl/ctrl_set_pack_xy.F 8 CTRL_SET_PACK_XY
     &     fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_pack_xyz.F 158 CTRL_SET_PACK_XYZ
      if (weighttype.NE.' ') then
./pkg/ctrl/ctrl_set_pack_xyz.F 159 CTRL_SET_PACK_XYZ
       il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_pack_xyz.F 161 CTRL_SET_PACK_XYZ
       write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_pack_xyz.F 335 CTRL_SET_PACK_XYZ
      call ACTIVE_READ_XYZ(weighttype, wei3d, 1,
./pkg/ctrl/ctrl_set_pack_xyz.F 338 CTRL_SET_PACK_XYZ
      CALL READ_REC_XYZ_RL( weighttype, wei3d, 1, 1, myThid )
./pkg/ctrl/ctrl_set_pack_xyz.F 42 CTRL_SET_PACK_XYZ
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_pack_xyz.F 7 CTRL_SET_PACK_XYZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_pack_xz.F 169 CTRL_SET_PACK_XZ
         il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_pack_xz.F 171 CTRL_SET_PACK_XZ
         write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_pack_xz.F 46 CTRL_SET_PACK_XZ
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_pack_xz.F 7 CTRL_SET_PACK_XZ
     &     cunit, ivartype, fname, masktype,weighttype,
./pkg/ctrl/ctrl_set_pack_yz.F 169 CTRL_SET_PACK_YZ
         il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_pack_yz.F 171 CTRL_SET_PACK_YZ
         write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_pack_yz.F 46 CTRL_SET_PACK_YZ
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_pack_yz.F 7 CTRL_SET_PACK_YZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xy.F 149 CTRL_SET_UNPACK_XY
      if (weighttype.NE.' ') then
./pkg/ctrl/ctrl_set_unpack_xy.F 150 CTRL_SET_UNPACK_XY
       il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_unpack_xy.F 152 CTRL_SET_UNPACK_XY
       write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_unpack_xy.F 40 CTRL_SET_UNPACK_XY
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_unpack_xy.F 454 CTRL_SET_UNPACK_XY
      call ACTIVE_READ_XY(weighttype, wei2d, 1,
./pkg/ctrl/ctrl_set_unpack_xy.F 457 CTRL_SET_UNPACK_XY
      CALL READ_REC_XY_RL( weighttype, wei2d, 1, 1, myThid )
./pkg/ctrl/ctrl_set_unpack_xy.F 8 CTRL_SET_UNPACK_XY
     &     fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_xyz.F 167 CTRL_SET_UNPACK_XYZ
      if (weighttype.NE.' ') then
./pkg/ctrl/ctrl_set_unpack_xyz.F 168 CTRL_SET_UNPACK_XYZ
       il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_unpack_xyz.F 170 CTRL_SET_UNPACK_XYZ
       write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_unpack_xyz.F 364 CTRL_SET_UNPACK_XYZ
      call ACTIVE_READ_XYZ(weighttype, wei3d, 1,
./pkg/ctrl/ctrl_set_unpack_xyz.F 367 CTRL_SET_UNPACK_XYZ
      CALL READ_REC_XYZ_RL( weighttype, wei3d, 1, 1, myThid )
./pkg/ctrl/ctrl_set_unpack_xyz.F 42 CTRL_SET_UNPACK_XYZ
      character*( 80) weighttype
./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 174 CTRL_SET_UNPACK_XZ
         il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_unpack_xz.F 176 CTRL_SET_UNPACK_XZ
         write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_unpack_xz.F 45 CTRL_SET_UNPACK_XZ
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_unpack_xz.F 7 CTRL_SET_UNPACK_XZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_set_unpack_yz.F 174 CTRL_SET_UNPACK_YZ
         il=ilnblnk( weighttype)
./pkg/ctrl/ctrl_set_unpack_yz.F 176 CTRL_SET_UNPACK_YZ
         write(weightname(1:80),'(a)') weighttype(1:il)
./pkg/ctrl/ctrl_set_unpack_yz.F 45 CTRL_SET_UNPACK_YZ
      character*( 80) weighttype
./pkg/ctrl/ctrl_set_unpack_yz.F 7 CTRL_SET_UNPACK_YZ
     &     cunit, ivartype, fname, masktype, weighttype,
./pkg/ctrl/ctrl_unpack.F 105 CTRL_UNPACK
      character*( 80) weighttype
./pkg/ctrl/ctrl_unpack.F 369 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 370 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wobcsn"
./pkg/ctrl/ctrl_unpack.F 373 CTRL_UNPACK
     &         weighttype, wobcsn, nWetobcsnGlo, mythid)
./pkg/ctrl/ctrl_unpack.F 377 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 378 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wobcss"
./pkg/ctrl/ctrl_unpack.F 381 CTRL_UNPACK
     &         weighttype, wobcss, nWetobcssGlo, mythid)
./pkg/ctrl/ctrl_unpack.F 385 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 386 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wobcsw"
./pkg/ctrl/ctrl_unpack.F 389 CTRL_UNPACK
     &         weighttype, wobcsw, nWetobcswGlo, mythid)
./pkg/ctrl/ctrl_unpack.F 393 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 394 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wobcse"
./pkg/ctrl/ctrl_unpack.F 397 CTRL_UNPACK
     &         weighttype, wobcse, nWetobcseGlo, mythid)
./pkg/ctrl/ctrl_unpack.F 405 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 406 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wthetaLev"
./pkg/ctrl/ctrl_unpack.F 409 CTRL_UNPACK
     &         weighttype, wtheta, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 414 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 415 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wsaltLev"
./pkg/ctrl/ctrl_unpack.F 418 CTRL_UNPACK
     &         weighttype, wsalt, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 423 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 424 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "whflux"
./pkg/ctrl/ctrl_unpack.F 428 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 433 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 434 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wsflux"
./pkg/ctrl/ctrl_unpack.F 438 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 446 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 447 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wtauu"
./pkg/ctrl/ctrl_unpack.F 452 CTRL_UNPACK
     &         weighttype, nwetwglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 455 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 467 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 468 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wtauv"
./pkg/ctrl/ctrl_unpack.F 473 CTRL_UNPACK
     &         weighttype, nwetsglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 476 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 485 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 486 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "watemp"
./pkg/ctrl/ctrl_unpack.F 490 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 495 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 496 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "waqh"
./pkg/ctrl/ctrl_unpack.F 500 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 508 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 509 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wuwind"
./pkg/ctrl/ctrl_unpack.F 513 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 524 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 525 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wvwind"
./pkg/ctrl/ctrl_unpack.F 529 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 537 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 538 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wdiffkr"
./pkg/ctrl/ctrl_unpack.F 541 CTRL_UNPACK
     &         weighttype, wdiffkr, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 546 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 547 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wkapgm"
./pkg/ctrl/ctrl_unpack.F 550 CTRL_UNPACK
     &         weighttype, wkapgm, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 555 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 556 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wtr1"
./pkg/ctrl/ctrl_unpack.F 559 CTRL_UNPACK
     &         weighttype, wunit, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 564 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 565 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wsst"
./pkg/ctrl/ctrl_unpack.F 569 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 574 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 575 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wsss"
./pkg/ctrl/ctrl_unpack.F 579 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 584 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 585 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wdepth"
./pkg/ctrl/ctrl_unpack.F 589 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 594 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 595 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wefluxy0"
./pkg/ctrl/ctrl_unpack.F 598 CTRL_UNPACK
     &         weighttype, wefluxy, nwetsglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 603 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 604 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wefluxp0"
./pkg/ctrl/ctrl_unpack.F 607 CTRL_UNPACK
     &         weighttype, wefluxp, nwetvglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 612 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 613 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wbottomdrag"
./pkg/ctrl/ctrl_unpack.F 617 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 622 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 623 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "whfluxm"
./pkg/ctrl/ctrl_unpack.F 627 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 632 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 633 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wedtaux"
./pkg/ctrl/ctrl_unpack.F 636 CTRL_UNPACK
     &         weighttype, wedtaux, nwetwglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 639 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 640 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wedtauy"
./pkg/ctrl/ctrl_unpack.F 643 CTRL_UNPACK
     &         weighttype, wedtauy, nwetsglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 648 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 649 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wuvel"
./pkg/ctrl/ctrl_unpack.F 652 CTRL_UNPACK
     &         weighttype, wuvel, nwetwglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 657 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 658 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wvvel"
./pkg/ctrl/ctrl_unpack.F 661 CTRL_UNPACK
     &         weighttype, wvvel, nwetsglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 666 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 667 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wetan"
./pkg/ctrl/ctrl_unpack.F 671 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 676 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 677 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wrelaxsst"
./pkg/ctrl/ctrl_unpack.F 681 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 686 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 687 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wrelaxsss"
./pkg/ctrl/ctrl_unpack.F 691 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 696 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 697 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wprecip"
./pkg/ctrl/ctrl_unpack.F 701 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 706 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 707 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wswflux"
./pkg/ctrl/ctrl_unpack.F 711 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 716 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 717 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wswdown"
./pkg/ctrl/ctrl_unpack.F 721 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 726 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 727 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wlwflux"
./pkg/ctrl/ctrl_unpack.F 731 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 736 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 737 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wlwdown"
./pkg/ctrl/ctrl_unpack.F 741 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 746 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 747 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wevap"
./pkg/ctrl/ctrl_unpack.F 751 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 756 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 757 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wsnowprecip"
./pkg/ctrl/ctrl_unpack.F 761 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 766 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 767 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wapressure"
./pkg/ctrl/ctrl_unpack.F 771 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 776 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 777 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wrunoff"
./pkg/ctrl/ctrl_unpack.F 781 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 786 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 787 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_unpack.F 791 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 796 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 797 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_unpack.F 801 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 806 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 807 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_unpack.F 811 CTRL_UNPACK
     &         weighttype, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 816 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 817 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wkapredi"
./pkg/ctrl/ctrl_unpack.F 820 CTRL_UNPACK
     &         weighttype, wkapredi, nwetcglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 825 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 826 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wshifwflx"
./pkg/ctrl/ctrl_unpack.F 830 CTRL_UNPACK
     &         weighttype, nwetiglobal, mythid)
./pkg/ctrl/ctrl_unpack.F 858 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 859 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wunit"
./pkg/ctrl/ctrl_unpack.F 874 CTRL_UNPACK
          write(weighttype(1:80),'(80a)') ' '
./pkg/ctrl/ctrl_unpack.F 875 CTRL_UNPACK
          write(weighttype(1:80),'(a)') "wunit"