Changeset 1788 for palm/trunk/SOURCE/modules.f90
- Timestamp:
- Mar 10, 2016 11:01:04 AM (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/modules.f90
r1787 r1788 19 19 ! Current revisions: 20 20 ! ------------------ 21 ! 21 ! Added roughness length for moisture (z0q) 22 22 ! 23 23 ! Former revisions: … … 384 384 saswsb, saswst, shf, tnudge, td_lsa_lpt, td_lsa_q, td_sub_lpt, & 385 385 td_sub_q, total_2d_a, total_2d_o, ts, tswst, ug_vert, unudge, us, & 386 usws, uswst, vnudge, vg_vert, vsws, vswst, wnudge, wsubs_vert, z0, z0h 386 usws, uswst, vnudge, vg_vert, vsws, vswst, wnudge, wsubs_vert, & 387 z0, & !< roughness length for momentum 388 z0h, & !< roughness length for heat 389 z0q !< roughness length for moisture 387 390 388 391 REAL(wp), DIMENSION(:,:,:), ALLOCATABLE :: & … … 432 435 USE kinds 433 436 434 REAL(wp), DIMENSION(:,:), ALLOCATABLE :: lwp_av, & !> Avg. liquid water path 435 precipitation_rate_av, & !> Avg. of precipitation rate 436 ol_av, & !> Avg. of Obukhov length 437 qsws_av, & !> Avg. of surface moisture flux 438 shf_av, & !> Avg. of surface heat flux 439 ts_av, & !> Avg. of characteristic temperature scale 440 us_av, & !> Avg. of friction velocity 441 z0_av, & !> Avg. of roughness length for momentum 442 z0h_av !> Avg. of roughness length for heat and moisture 437 REAL(wp), DIMENSION(:,:), ALLOCATABLE :: lwp_av, & !< Avg. liquid water path 438 precipitation_rate_av, & !< Avg. of precipitation rate 439 ol_av, & !< Avg. of Obukhov length 440 qsws_av, & !< Avg. of surface moisture flux 441 shf_av, & !< Avg. of surface heat flux 442 ts_av, & !< Avg. of characteristic temperature scale 443 us_av, & !< Avg. of friction velocity 444 z0_av, & !< Avg. of roughness length for momentum 445 z0h_av, & !< Avg. of roughness length for heat 446 z0q_av !< Avg. of roughness length for moisture 443 447 444 448 REAL(wp), DIMENSION(:,:,:), ALLOCATABLE, TARGET :: &
Note: See TracChangeset
for help on using the changeset viewer.