| File |
Line number |
Procedure |
Code |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
225 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
226 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wthetaLev" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
229 |
CTRL_PACK |
& weighttype, wtheta, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
234 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
235 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsaltLev" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
238 |
CTRL_PACK |
& weighttype, wsalt, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
243 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
244 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "whflux" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
247 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
252 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
253 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsflux" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
256 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
261 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
262 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtauu" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
265 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
270 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
271 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtauv" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
274 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
279 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
280 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "watemp" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
283 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
288 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
289 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "waqh" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
292 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
297 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
298 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wuwind" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
301 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
306 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
307 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wvwind" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
310 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
315 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
316 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcsn" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
319 |
CTRL_PACK |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
324 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
325 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcss" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
328 |
CTRL_PACK |
& weighttype, wobcss, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
333 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
334 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcsw" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
337 |
CTRL_PACK |
& weighttype, wobcsw, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
342 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
343 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcse" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
346 |
CTRL_PACK |
& weighttype, wobcse, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
351 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
352 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
355 |
CTRL_PACK |
& weighttype, wdiffkr, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
360 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
361 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
364 |
CTRL_PACK |
& weighttype, wkapgm, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
369 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
370 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtr1" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
373 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
378 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
379 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsst" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
382 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
387 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
388 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsss" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
391 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
396 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
397 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wdepth" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
400 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
405 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
406 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
409 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
414 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
415 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
418 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
423 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
424 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
427 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
432 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
433 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "whfluxm" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
436 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
441 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
442 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wedtaux" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
445 |
CTRL_PACK |
& weighttype, wedtaux, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
448 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
449 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
452 |
CTRL_PACK |
& weighttype, wedtauy, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
457 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
458 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wuvel" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
461 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
466 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
467 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wvvel" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
470 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
475 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
476 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wetan" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
479 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
484 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
485 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrelaxsst" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
488 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
493 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
494 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
497 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
502 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
503 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wprecip" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
506 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
511 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
512 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wswflux" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
515 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
520 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
521 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wswdown" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
524 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
529 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
530 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wlwflux" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
533 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
538 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
539 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wlwdown" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
542 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
547 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
548 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wevap" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
551 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
556 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
557 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsnowprecip" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
560 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
565 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
566 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wapressure" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
569 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
574 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
575 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrunoff" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
578 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
583 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
584 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
587 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
592 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
593 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
596 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
601 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
602 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
605 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
610 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
611 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wkapredi" |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
614 |
CTRL_PACK |
& weighttype, wkapredi, lxxadxx, mythid) |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
83 |
CTRL_PACK |
character*( 80) weighttype |
|
./pkg/admtlm/admtlm_dsvd2model.F |
333 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
334 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wtheta" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
337 |
ADMTLM_DSVD2MODEL |
& weighttype, wtheta, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
342 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
343 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wsalt" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
346 |
ADMTLM_DSVD2MODEL |
& weighttype, wsalt, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
351 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
352 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "whflux" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
355 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
360 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
361 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wsflux" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
364 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
369 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
370 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wtauu" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
373 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetwglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
378 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
379 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wtauv" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
382 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetsglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
387 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
388 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "watemp" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
391 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
396 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
397 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "waqh" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
400 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
405 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
406 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wuwind" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
409 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
414 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
415 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wvwind" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
418 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
423 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
424 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wobcsn" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
427 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
432 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
433 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wobcss" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
436 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcss, nWetobcssGlo, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
441 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
442 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wobcsw" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
445 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcsw, nWetobcswGlo, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
450 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
451 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wobcse" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
454 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcse, nWetobcseGlo, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
459 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
460 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
463 |
ADMTLM_DSVD2MODEL |
& weighttype, wunit, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
468 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
469 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
472 |
ADMTLM_DSVD2MODEL |
& weighttype, wunit, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
477 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
478 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wtr1" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
481 |
ADMTLM_DSVD2MODEL |
& weighttype, wunit, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
486 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
487 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wsst" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
490 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
495 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
496 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wsss" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
499 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
504 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
505 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wdepth" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
508 |
ADMTLM_DSVD2MODEL |
& weighttype, weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
513 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
514 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
517 |
ADMTLM_DSVD2MODEL |
& weighttype, wefluxy, nwetsglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
522 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
523 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
526 |
ADMTLM_DSVD2MODEL |
& weighttype, wefluxp, nwetvglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
531 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
532 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
535 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
540 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
541 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wedtaux" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
544 |
ADMTLM_DSVD2MODEL |
& weighttype, wunit, nwetwglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
547 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
548 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
551 |
ADMTLM_DSVD2MODEL |
& weighttype, wunit, nwetsglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
556 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
557 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wuvvel" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
560 |
ADMTLM_DSVD2MODEL |
& weighttype, wuvvel, nwetwglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
565 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
566 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wuvvel" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
569 |
ADMTLM_DSVD2MODEL |
& weighttype, wuvvel, nwetsglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
574 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
575 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wetan" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
578 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
583 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
584 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wrelaxsst" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
587 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
592 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
593 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
596 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
601 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
602 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wprecip" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
605 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
610 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
611 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wswflux" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
614 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
619 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_dsvd2model.F |
620 |
ADMTLM_DSVD2MODEL |
write(weighttype(1:80),'(a)') "wswdown" |
|
./pkg/admtlm/admtlm_dsvd2model.F |
623 |
ADMTLM_DSVD2MODEL |
& weighttype, nwetcglobal, mythid) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
82 |
ADMTLM_DSVD2MODEL |
character*( 80) weighttype |
|
./pkg/admtlm/admtlm_model2dsvd.F |
245 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
246 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wtheta" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
249 |
ADMTLM_MODEL2DSVD |
& weighttype, wtheta, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
254 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
255 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wsalt" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
258 |
ADMTLM_MODEL2DSVD |
& weighttype, wsalt, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
263 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
264 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "whflux" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
267 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
272 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
273 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wsflux" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
276 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
281 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
282 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wtauu" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
285 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
290 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
291 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wtauv" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
294 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
299 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
300 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "watemp" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
303 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
308 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
309 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "waqh" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
312 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
317 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
318 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wuwind" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
321 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
326 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
327 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wvwind" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
330 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
335 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
336 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wobcsn" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
339 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
344 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
345 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wobcss" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
348 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcss, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
353 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
354 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wobcsw" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
357 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcsw, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
362 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
363 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wobcse" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
366 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcse, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
371 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
372 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
375 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
380 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
381 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
384 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
389 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
390 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wtr1" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
393 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
398 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
399 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wsst" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
402 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
407 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
408 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wsss" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
411 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
416 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
417 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wdepth" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
420 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
425 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
426 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
429 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
434 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
435 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
438 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
443 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
444 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
447 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
452 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
453 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wedtaux" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
456 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
459 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
460 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
463 |
ADMTLM_MODEL2DSVD |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
468 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
469 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wuvvel" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
472 |
ADMTLM_MODEL2DSVD |
& weighttype, wuvvel, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
477 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
478 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wuvvel" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
481 |
ADMTLM_MODEL2DSVD |
& weighttype, wuvvel, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
486 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
487 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wetan" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
490 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
495 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
496 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wrelaxsst" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
499 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
504 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
505 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
508 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
513 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
514 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wprecip" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
517 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
522 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
523 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wswflux" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
526 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
531 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/admtlm/admtlm_model2dsvd.F |
532 |
ADMTLM_MODEL2DSVD |
write(weighttype(1:80),'(a)') "wswdown" |
|
./pkg/admtlm/admtlm_model2dsvd.F |
535 |
ADMTLM_MODEL2DSVD |
& weighttype, lxxadxx, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
85 |
ADMTLM_MODEL2DSVD |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_pack.F |
234 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
235 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wthetaLev" |
|
./pkg/ctrl/ctrl_pack.F |
238 |
CTRL_PACK |
& weighttype, wtheta, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
243 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
244 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsaltLev" |
|
./pkg/ctrl/ctrl_pack.F |
247 |
CTRL_PACK |
& weighttype, wsalt, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
252 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
253 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "whflux" |
|
./pkg/ctrl/ctrl_pack.F |
256 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
261 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
262 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsflux" |
|
./pkg/ctrl/ctrl_pack.F |
265 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
270 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
271 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtauu" |
|
./pkg/ctrl/ctrl_pack.F |
278 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
283 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
284 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtauv" |
|
./pkg/ctrl/ctrl_pack.F |
291 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
296 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
297 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "watemp" |
|
./pkg/ctrl/ctrl_pack.F |
300 |
CTRL_PACK |
& weighttype, 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)') "waqh" |
|
./pkg/ctrl/ctrl_pack.F |
309 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
314 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
315 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wuwind" |
|
./pkg/ctrl/ctrl_pack.F |
318 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
323 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
324 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wvwind" |
|
./pkg/ctrl/ctrl_pack.F |
327 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
332 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
333 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcsn" |
|
./pkg/ctrl/ctrl_pack.F |
336 |
CTRL_PACK |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
341 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
342 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcss" |
|
./pkg/ctrl/ctrl_pack.F |
345 |
CTRL_PACK |
& weighttype, wobcss, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
350 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
351 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcsw" |
|
./pkg/ctrl/ctrl_pack.F |
354 |
CTRL_PACK |
& weighttype, wobcsw, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
359 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
360 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcse" |
|
./pkg/ctrl/ctrl_pack.F |
363 |
CTRL_PACK |
& weighttype, wobcse, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
368 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
369 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./pkg/ctrl/ctrl_pack.F |
372 |
CTRL_PACK |
& weighttype, wdiffkr, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
377 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
378 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./pkg/ctrl/ctrl_pack.F |
381 |
CTRL_PACK |
& weighttype, wkapgm, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
386 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
387 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtr1" |
|
./pkg/ctrl/ctrl_pack.F |
390 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
395 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
396 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsst" |
|
./pkg/ctrl/ctrl_pack.F |
399 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
404 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
405 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsss" |
|
./pkg/ctrl/ctrl_pack.F |
408 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
413 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
414 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wdepth" |
|
./pkg/ctrl/ctrl_pack.F |
417 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
422 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
423 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./pkg/ctrl/ctrl_pack.F |
426 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
431 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
432 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./pkg/ctrl/ctrl_pack.F |
435 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
440 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
441 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./pkg/ctrl/ctrl_pack.F |
444 |
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)') "whfluxm" |
|
./pkg/ctrl/ctrl_pack.F |
453 |
CTRL_PACK |
& weighttype, 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)') "wedtaux" |
|
./pkg/ctrl/ctrl_pack.F |
462 |
CTRL_PACK |
& weighttype, wedtaux, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
465 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
466 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./pkg/ctrl/ctrl_pack.F |
469 |
CTRL_PACK |
& weighttype, wedtauy, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
474 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
475 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wuvel" |
|
./pkg/ctrl/ctrl_pack.F |
478 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
483 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
484 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wvvel" |
|
./pkg/ctrl/ctrl_pack.F |
487 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
492 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
493 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wetan" |
|
./pkg/ctrl/ctrl_pack.F |
496 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
501 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
502 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrelaxsst" |
|
./pkg/ctrl/ctrl_pack.F |
505 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
510 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
511 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./pkg/ctrl/ctrl_pack.F |
514 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
519 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
520 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wprecip" |
|
./pkg/ctrl/ctrl_pack.F |
523 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
528 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
529 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wswflux" |
|
./pkg/ctrl/ctrl_pack.F |
532 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
537 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
538 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wswdown" |
|
./pkg/ctrl/ctrl_pack.F |
541 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
546 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
547 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wlwflux" |
|
./pkg/ctrl/ctrl_pack.F |
550 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
555 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
556 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wlwdown" |
|
./pkg/ctrl/ctrl_pack.F |
559 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
564 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
565 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wevap" |
|
./pkg/ctrl/ctrl_pack.F |
568 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
573 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
574 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsnowprecip" |
|
./pkg/ctrl/ctrl_pack.F |
577 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
582 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
583 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wapressure" |
|
./pkg/ctrl/ctrl_pack.F |
586 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
591 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
592 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrunoff" |
|
./pkg/ctrl/ctrl_pack.F |
595 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
600 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
601 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_pack.F |
604 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
609 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
610 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./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)') "wunit" |
|
./pkg/ctrl/ctrl_pack.F |
622 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
627 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
628 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wkapredi" |
|
./pkg/ctrl/ctrl_pack.F |
631 |
CTRL_PACK |
& weighttype, wkapredi, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
83 |
CTRL_PACK |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
146 |
CTRL_SET_PACK_XY |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
148 |
CTRL_SET_PACK_XY |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
379 |
CTRL_SET_PACK_XY |
call ACTIVE_READ_XY(weighttype, wei2d, 1, |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
42 |
CTRL_SET_PACK_XY |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
7 |
CTRL_SET_PACK_XY |
& cunit, ivartype, fname, masktype, weighttype, |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
155 |
CTRL_SET_PACK_XYZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
157 |
CTRL_SET_PACK_XYZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
309 |
CTRL_SET_PACK_XYZ |
call ACTIVE_READ_XYZ(weighttype, wei3d, 1, |
|
./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 |
173 |
CTRL_SET_PACK_XZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
175 |
CTRL_SET_PACK_XZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
45 |
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 |
171 |
CTRL_SET_PACK_YZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
173 |
CTRL_SET_PACK_YZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
45 |
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 |
148 |
CTRL_SET_UNPACK_XY |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
150 |
CTRL_SET_UNPACK_XY |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
426 |
CTRL_SET_UNPACK_XY |
call ACTIVE_READ_XY(weighttype, wei2d, 1, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
43 |
CTRL_SET_UNPACK_XY |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
7 |
CTRL_SET_UNPACK_XY |
& lxxadxx, cunit, ivartype, fname, masktype, weighttype, |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
163 |
CTRL_SET_UNPACK_XYZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
165 |
CTRL_SET_UNPACK_XYZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
337 |
CTRL_SET_UNPACK_XYZ |
call ACTIVE_READ_XYZ(weighttype, wei3d, 1, |
|
./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 |
176 |
CTRL_SET_UNPACK_XZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
178 |
CTRL_SET_UNPACK_XZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
44 |
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 |
176 |
CTRL_SET_UNPACK_YZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
178 |
CTRL_SET_UNPACK_YZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
44 |
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 |
325 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
326 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wthetaLev" |
|
./pkg/ctrl/ctrl_unpack.F |
329 |
CTRL_UNPACK |
& weighttype, wtheta, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
334 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
335 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsaltLev" |
|
./pkg/ctrl/ctrl_unpack.F |
338 |
CTRL_UNPACK |
& weighttype, wsalt, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
343 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
344 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "whflux" |
|
./pkg/ctrl/ctrl_unpack.F |
347 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
352 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
353 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsflux" |
|
./pkg/ctrl/ctrl_unpack.F |
356 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
361 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
362 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wtauu" |
|
./pkg/ctrl/ctrl_unpack.F |
366 |
CTRL_UNPACK |
& weighttype, nwetwglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
369 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
375 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
376 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wtauv" |
|
./pkg/ctrl/ctrl_unpack.F |
380 |
CTRL_UNPACK |
& weighttype, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
383 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
389 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
390 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "watemp" |
|
./pkg/ctrl/ctrl_unpack.F |
393 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
398 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
399 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "waqh" |
|
./pkg/ctrl/ctrl_unpack.F |
402 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
407 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
408 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wuwind" |
|
./pkg/ctrl/ctrl_unpack.F |
411 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
416 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
417 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wvwind" |
|
./pkg/ctrl/ctrl_unpack.F |
420 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
425 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
426 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcsn" |
|
./pkg/ctrl/ctrl_unpack.F |
429 |
CTRL_UNPACK |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
434 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
435 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcss" |
|
./pkg/ctrl/ctrl_unpack.F |
438 |
CTRL_UNPACK |
& weighttype, wobcss, nWetobcssGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
443 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
444 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcsw" |
|
./pkg/ctrl/ctrl_unpack.F |
447 |
CTRL_UNPACK |
& weighttype, wobcsw, nWetobcswGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
452 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
453 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcse" |
|
./pkg/ctrl/ctrl_unpack.F |
456 |
CTRL_UNPACK |
& weighttype, wobcse, nWetobcseGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
461 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
462 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./pkg/ctrl/ctrl_unpack.F |
465 |
CTRL_UNPACK |
& weighttype, wdiffkr, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
470 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
471 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./pkg/ctrl/ctrl_unpack.F |
474 |
CTRL_UNPACK |
& weighttype, wkapgm, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
479 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
480 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wtr1" |
|
./pkg/ctrl/ctrl_unpack.F |
483 |
CTRL_UNPACK |
& weighttype, wunit, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
488 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
489 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsst" |
|
./pkg/ctrl/ctrl_unpack.F |
492 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
497 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
498 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsss" |
|
./pkg/ctrl/ctrl_unpack.F |
501 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
506 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
507 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wdepth" |
|
./pkg/ctrl/ctrl_unpack.F |
510 |
CTRL_UNPACK |
& weighttype, weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
516 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
517 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./pkg/ctrl/ctrl_unpack.F |
520 |
CTRL_UNPACK |
& weighttype, wefluxy, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
525 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
526 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./pkg/ctrl/ctrl_unpack.F |
529 |
CTRL_UNPACK |
& weighttype, wefluxp, nwetvglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
534 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
535 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./pkg/ctrl/ctrl_unpack.F |
538 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
543 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
544 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "whfluxm" |
|
./pkg/ctrl/ctrl_unpack.F |
547 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
552 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
553 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wedtaux" |
|
./pkg/ctrl/ctrl_unpack.F |
556 |
CTRL_UNPACK |
& weighttype, wedtaux, nwetwglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
559 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
560 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./pkg/ctrl/ctrl_unpack.F |
563 |
CTRL_UNPACK |
& weighttype, wedtauy, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
568 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
569 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wuvel" |
|
./pkg/ctrl/ctrl_unpack.F |
572 |
CTRL_UNPACK |
& weighttype, wunit, nwetwglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
577 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
578 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wvvel" |
|
./pkg/ctrl/ctrl_unpack.F |
581 |
CTRL_UNPACK |
& weighttype, wunit, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
586 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
587 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wetan" |
|
./pkg/ctrl/ctrl_unpack.F |
590 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
595 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
596 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wrelaxsst" |
|
./pkg/ctrl/ctrl_unpack.F |
599 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
604 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
605 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./pkg/ctrl/ctrl_unpack.F |
608 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
613 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
614 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wprecip" |
|
./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)') "wswflux" |
|
./pkg/ctrl/ctrl_unpack.F |
626 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
631 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
632 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wswdown" |
|
./pkg/ctrl/ctrl_unpack.F |
635 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
640 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
641 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wlwflux" |
|
./pkg/ctrl/ctrl_unpack.F |
644 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
649 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
650 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wlwdown" |
|
./pkg/ctrl/ctrl_unpack.F |
653 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
658 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
659 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wevap" |
|
./pkg/ctrl/ctrl_unpack.F |
662 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
667 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
668 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsnowprecip" |
|
./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)') "wapressure" |
|
./pkg/ctrl/ctrl_unpack.F |
680 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
685 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
686 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wrunoff" |
|
./pkg/ctrl/ctrl_unpack.F |
689 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
694 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
695 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
698 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
703 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
704 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
707 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
712 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
713 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
716 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
721 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
722 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wkapredi" |
|
./pkg/ctrl/ctrl_unpack.F |
725 |
CTRL_UNPACK |
& weighttype, wkapredi, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
80 |
CTRL_UNPACK |
character*( 80) weighttype |