- Timestamp:
- Aug 23, 2018 10:48:36 AM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/urban_surface_mod.f90
r3196 r3203 28 28 ! ----------------- 29 29 ! $Id$ 30 ! Revise bulk parameter for emissivity at ground-floor level 31 ! 32 ! 3196 2018-08-13 12:26:14Z maronga 30 33 ! Added maximum aerodynamic resistance of 300 for horiztonal surfaces. 31 34 ! … … 491 494 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 492 495 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 493 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37496 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 494 497 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 495 498 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44 … … 502 505 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 503 506 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 504 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37507 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 505 508 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 506 509 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44 … … 513 516 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 514 517 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 515 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37518 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 516 519 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 517 520 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44 … … 524 527 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 525 528 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 526 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37529 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 527 530 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 528 531 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44 … … 535 538 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 536 539 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 537 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37540 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 538 541 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 539 542 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44 … … 546 549 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 547 550 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 548 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37551 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 549 552 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 550 553 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44 … … 557 560 1000000.0_wp, 1000000.0_wp, 1000000.0_wp, & !parameter 26-28 558 561 0.3_wp, 0.3_wp, 0.3_wp, & !parameter 29-31 559 0. 4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37562 0.9_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp, & !parameter 32-37 560 563 24.0_wp, 24.0_wp, 24.0_wp, & !parameter 38-40 561 564 0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp, & !parameter 41-44
Note: See TracChangeset
for help on using the changeset viewer.