| 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 |
103 |
CTRL_PACK |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_pack.F |
257 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
258 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wthetaLev" |
|
./pkg/ctrl/ctrl_pack.F |
261 |
CTRL_PACK |
& weighttype, wtheta, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
266 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
267 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsaltLev" |
|
./pkg/ctrl/ctrl_pack.F |
270 |
CTRL_PACK |
& weighttype, wsalt, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
275 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
276 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "whflux" |
|
./pkg/ctrl/ctrl_pack.F |
280 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
285 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
286 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsflux" |
|
./pkg/ctrl/ctrl_pack.F |
290 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
298 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
299 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtauu" |
|
./pkg/ctrl/ctrl_pack.F |
308 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
319 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
320 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtauv" |
|
./pkg/ctrl/ctrl_pack.F |
329 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
337 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
338 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "watemp" |
|
./pkg/ctrl/ctrl_pack.F |
342 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
347 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
348 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "waqh" |
|
./pkg/ctrl/ctrl_pack.F |
352 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
360 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
361 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wuwind" |
|
./pkg/ctrl/ctrl_pack.F |
365 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
376 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
377 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wvwind" |
|
./pkg/ctrl/ctrl_pack.F |
381 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
389 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
390 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcsn" |
|
./pkg/ctrl/ctrl_pack.F |
393 |
CTRL_PACK |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
398 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
399 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcss" |
|
./pkg/ctrl/ctrl_pack.F |
402 |
CTRL_PACK |
& weighttype, wobcss, 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)') "wobcsw" |
|
./pkg/ctrl/ctrl_pack.F |
411 |
CTRL_PACK |
& weighttype, wobcsw, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
416 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
417 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wobcse" |
|
./pkg/ctrl/ctrl_pack.F |
420 |
CTRL_PACK |
& weighttype, wobcse, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
425 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
426 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./pkg/ctrl/ctrl_pack.F |
429 |
CTRL_PACK |
& weighttype, wdiffkr, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
434 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
435 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./pkg/ctrl/ctrl_pack.F |
438 |
CTRL_PACK |
& weighttype, wkapgm, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
443 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
444 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wtr1" |
|
./pkg/ctrl/ctrl_pack.F |
447 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
452 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
453 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsst" |
|
./pkg/ctrl/ctrl_pack.F |
457 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
462 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
463 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsss" |
|
./pkg/ctrl/ctrl_pack.F |
467 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
472 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
473 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wdepth" |
|
./pkg/ctrl/ctrl_pack.F |
477 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
482 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
483 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./pkg/ctrl/ctrl_pack.F |
486 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
491 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
492 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./pkg/ctrl/ctrl_pack.F |
495 |
CTRL_PACK |
& weighttype, wunit, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
500 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
501 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./pkg/ctrl/ctrl_pack.F |
505 |
CTRL_PACK |
& 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)') "whfluxm" |
|
./pkg/ctrl/ctrl_pack.F |
515 |
CTRL_PACK |
& weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
520 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
521 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wedtaux" |
|
./pkg/ctrl/ctrl_pack.F |
524 |
CTRL_PACK |
& weighttype, wedtaux, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
527 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
528 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./pkg/ctrl/ctrl_pack.F |
531 |
CTRL_PACK |
& weighttype, wedtauy, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
536 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
537 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wuvel" |
|
./pkg/ctrl/ctrl_pack.F |
540 |
CTRL_PACK |
& weighttype, wuvel, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
545 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
546 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wvvel" |
|
./pkg/ctrl/ctrl_pack.F |
549 |
CTRL_PACK |
& weighttype, wvvel, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
554 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
555 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wetan" |
|
./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)') "wrelaxsst" |
|
./pkg/ctrl/ctrl_pack.F |
569 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
574 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
575 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./pkg/ctrl/ctrl_pack.F |
579 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
584 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
585 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wprecip" |
|
./pkg/ctrl/ctrl_pack.F |
589 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
594 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
595 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wswflux" |
|
./pkg/ctrl/ctrl_pack.F |
599 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
604 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
605 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wswdown" |
|
./pkg/ctrl/ctrl_pack.F |
609 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
614 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
615 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wlwflux" |
|
./pkg/ctrl/ctrl_pack.F |
619 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
624 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
625 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wlwdown" |
|
./pkg/ctrl/ctrl_pack.F |
629 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
634 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
635 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wevap" |
|
./pkg/ctrl/ctrl_pack.F |
639 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
644 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
645 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wsnowprecip" |
|
./pkg/ctrl/ctrl_pack.F |
649 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
654 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
655 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wapressure" |
|
./pkg/ctrl/ctrl_pack.F |
659 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
664 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
665 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wrunoff" |
|
./pkg/ctrl/ctrl_pack.F |
669 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
674 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
675 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_pack.F |
679 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
684 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
685 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_pack.F |
689 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
694 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
695 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_pack.F |
699 |
CTRL_PACK |
& "maskCtrlC", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
704 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
705 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wkapredi" |
|
./pkg/ctrl/ctrl_pack.F |
708 |
CTRL_PACK |
& weighttype, wkapredi, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
713 |
CTRL_PACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_pack.F |
714 |
CTRL_PACK |
write(weighttype(1:80),'(a)') "wshifwflx" |
|
./pkg/ctrl/ctrl_pack.F |
718 |
CTRL_PACK |
& "maskCtrlI", weighttype, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
145 |
CTRL_SET_PACK_XY |
if (weighttype.NE.' ') then |
|
./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 |
39 |
CTRL_SET_PACK_XY |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
412 |
CTRL_SET_PACK_XY |
call ACTIVE_READ_XY(weighttype, wei2d, 1, |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
8 |
CTRL_SET_PACK_XY |
& fname, masktype, weighttype, |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
154 |
CTRL_SET_PACK_XYZ |
if (weighttype.NE.' ') then |
|
./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 |
326 |
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 |
168 |
CTRL_SET_PACK_XZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_pack_xz.F |
170 |
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 |
168 |
CTRL_SET_PACK_YZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_pack_yz.F |
170 |
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 |
146 |
CTRL_SET_UNPACK_XY |
if (weighttype.NE.' ') then |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
147 |
CTRL_SET_UNPACK_XY |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
149 |
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 |
446 |
CTRL_SET_UNPACK_XY |
call ACTIVE_READ_XY(weighttype, wei2d, 1, |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
8 |
CTRL_SET_UNPACK_XY |
& fname, masktype, weighttype, |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
163 |
CTRL_SET_UNPACK_XYZ |
if (weighttype.NE.' ') then |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
164 |
CTRL_SET_UNPACK_XYZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
166 |
CTRL_SET_UNPACK_XYZ |
write(weightname(1:80),'(a)') weighttype(1:il) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
355 |
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 |
173 |
CTRL_SET_UNPACK_XZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_xz.F |
175 |
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 |
173 |
CTRL_SET_UNPACK_YZ |
il=ilnblnk( weighttype) |
|
./pkg/ctrl/ctrl_set_unpack_yz.F |
175 |
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 |
100 |
CTRL_UNPACK |
character*( 80) weighttype |
|
./pkg/ctrl/ctrl_unpack.F |
353 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
354 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wthetaLev" |
|
./pkg/ctrl/ctrl_unpack.F |
357 |
CTRL_UNPACK |
& weighttype, wtheta, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
362 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
363 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsaltLev" |
|
./pkg/ctrl/ctrl_unpack.F |
366 |
CTRL_UNPACK |
& weighttype, wsalt, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
371 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
372 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "whflux" |
|
./pkg/ctrl/ctrl_unpack.F |
376 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
381 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
382 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsflux" |
|
./pkg/ctrl/ctrl_unpack.F |
386 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
394 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
395 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wtauu" |
|
./pkg/ctrl/ctrl_unpack.F |
400 |
CTRL_UNPACK |
& weighttype, nwetwglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
403 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
415 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
416 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wtauv" |
|
./pkg/ctrl/ctrl_unpack.F |
421 |
CTRL_UNPACK |
& weighttype, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
424 |
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)') "watemp" |
|
./pkg/ctrl/ctrl_unpack.F |
438 |
CTRL_UNPACK |
& weighttype, nwetcglobal, 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)') "waqh" |
|
./pkg/ctrl/ctrl_unpack.F |
448 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
456 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
457 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wuwind" |
|
./pkg/ctrl/ctrl_unpack.F |
461 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
472 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
473 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wvwind" |
|
./pkg/ctrl/ctrl_unpack.F |
477 |
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)') "wobcsn" |
|
./pkg/ctrl/ctrl_unpack.F |
489 |
CTRL_UNPACK |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
494 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
495 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcss" |
|
./pkg/ctrl/ctrl_unpack.F |
498 |
CTRL_UNPACK |
& weighttype, wobcss, nWetobcssGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
503 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
504 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcsw" |
|
./pkg/ctrl/ctrl_unpack.F |
507 |
CTRL_UNPACK |
& weighttype, wobcsw, nWetobcswGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
512 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
513 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wobcse" |
|
./pkg/ctrl/ctrl_unpack.F |
516 |
CTRL_UNPACK |
& weighttype, wobcse, nWetobcseGlo, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
521 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
522 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wdiffkr" |
|
./pkg/ctrl/ctrl_unpack.F |
525 |
CTRL_UNPACK |
& weighttype, wdiffkr, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
530 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
531 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wkapgm" |
|
./pkg/ctrl/ctrl_unpack.F |
534 |
CTRL_UNPACK |
& weighttype, wkapgm, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
539 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
540 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wtr1" |
|
./pkg/ctrl/ctrl_unpack.F |
543 |
CTRL_UNPACK |
& weighttype, wunit, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
548 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
549 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsst" |
|
./pkg/ctrl/ctrl_unpack.F |
553 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
558 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
559 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsss" |
|
./pkg/ctrl/ctrl_unpack.F |
563 |
CTRL_UNPACK |
& weighttype, nwetcglobal, 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)') "wdepth" |
|
./pkg/ctrl/ctrl_unpack.F |
573 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
578 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
579 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wefluxy0" |
|
./pkg/ctrl/ctrl_unpack.F |
582 |
CTRL_UNPACK |
& weighttype, wefluxy, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
587 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
588 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wefluxp0" |
|
./pkg/ctrl/ctrl_unpack.F |
591 |
CTRL_UNPACK |
& weighttype, wefluxp, nwetvglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
596 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
597 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wbottomdrag" |
|
./pkg/ctrl/ctrl_unpack.F |
601 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
606 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
607 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "whfluxm" |
|
./pkg/ctrl/ctrl_unpack.F |
611 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
616 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
617 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wedtaux" |
|
./pkg/ctrl/ctrl_unpack.F |
620 |
CTRL_UNPACK |
& weighttype, wedtaux, nwetwglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
623 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
624 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wedtauy" |
|
./pkg/ctrl/ctrl_unpack.F |
627 |
CTRL_UNPACK |
& weighttype, wedtauy, nwetsglobal, 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)') "wuvel" |
|
./pkg/ctrl/ctrl_unpack.F |
636 |
CTRL_UNPACK |
& weighttype, wuvel, nwetwglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
641 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
642 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wvvel" |
|
./pkg/ctrl/ctrl_unpack.F |
645 |
CTRL_UNPACK |
& weighttype, wvvel, nwetsglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
650 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
651 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wetan" |
|
./pkg/ctrl/ctrl_unpack.F |
655 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
660 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
661 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wrelaxsst" |
|
./pkg/ctrl/ctrl_unpack.F |
665 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
670 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
671 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wrelaxsss" |
|
./pkg/ctrl/ctrl_unpack.F |
675 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
680 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
681 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wprecip" |
|
./pkg/ctrl/ctrl_unpack.F |
685 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
690 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
691 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wswflux" |
|
./pkg/ctrl/ctrl_unpack.F |
695 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
700 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
701 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wswdown" |
|
./pkg/ctrl/ctrl_unpack.F |
705 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
710 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
711 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wlwflux" |
|
./pkg/ctrl/ctrl_unpack.F |
715 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
720 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
721 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wlwdown" |
|
./pkg/ctrl/ctrl_unpack.F |
725 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
730 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
731 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wevap" |
|
./pkg/ctrl/ctrl_unpack.F |
735 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
740 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
741 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wsnowprecip" |
|
./pkg/ctrl/ctrl_unpack.F |
745 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
750 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
751 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wapressure" |
|
./pkg/ctrl/ctrl_unpack.F |
755 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
760 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
761 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wrunoff" |
|
./pkg/ctrl/ctrl_unpack.F |
765 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
770 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
771 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
775 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
780 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
781 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
785 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
790 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
791 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
795 |
CTRL_UNPACK |
& weighttype, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
800 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
801 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wkapredi" |
|
./pkg/ctrl/ctrl_unpack.F |
804 |
CTRL_UNPACK |
& weighttype, wkapredi, nwetcglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
809 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
810 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wshifwflx" |
|
./pkg/ctrl/ctrl_unpack.F |
814 |
CTRL_UNPACK |
& weighttype, nwetiglobal, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
837 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
838 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |
|
./pkg/ctrl/ctrl_unpack.F |
851 |
CTRL_UNPACK |
write(weighttype(1:80),'(80a)') ' ' |
|
./pkg/ctrl/ctrl_unpack.F |
852 |
CTRL_UNPACK |
write(weighttype(1:80),'(a)') "wunit" |