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