Changeset 4671 for palm/trunk/SOURCE/bulk_cloud_model_mod.f90
- Timestamp:
- Sep 9, 2020 8:27:58 PM (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/bulk_cloud_model_mod.f90
r4577 r4671 19 19 ! Current revisions: 20 20 ! ------------------ 21 ! 22 ! 21 ! 22 ! 23 23 ! Former revisions: 24 24 ! ----------------- 25 25 ! $Id$ 26 ! Implementation of downward facing USM and LSM surfaces 27 ! 28 ! 4577 2020-06-25 09:53:58Z raasch 26 29 ! further re-formatting concerning Fortran parameter variables 27 30 ! … … 1557 1560 surf_def_h(0)%qcsws, surf_def_h(1)%qcsws, & 1558 1561 surf_def_h(2)%qcsws, & 1559 surf_lsm_h%qcsws, surf_usm_h%qcsws, & 1562 surf_lsm_h(0)%qcsws, surf_lsm_h(1)%qcsws, & 1563 surf_usm_h(0)%qcsws, surf_usm_h(1)%qcsws, & 1560 1564 surf_def_v(0)%qcsws, surf_def_v(1)%qcsws, & 1561 1565 surf_def_v(2)%qcsws, surf_def_v(3)%qcsws, & … … 1647 1651 surf_def_h(0)%ncsws, surf_def_h(1)%ncsws, & 1648 1652 surf_def_h(2)%ncsws, & 1649 surf_lsm_h%ncsws, surf_usm_h%ncsws, & 1653 surf_lsm_h(0)%ncsws, surf_lsm_h(1)%ncsws, & 1654 surf_usm_h(0)%ncsws, surf_usm_h(1)%ncsws, & 1650 1655 surf_def_v(0)%ncsws, surf_def_v(1)%ncsws, & 1651 1656 surf_def_v(2)%ncsws, surf_def_v(3)%ncsws, & … … 1745 1750 surf_def_h(0)%qisws, surf_def_h(1)%qisws, & 1746 1751 surf_def_h(2)%qisws, & 1747 surf_lsm_h%qisws, surf_usm_h%qisws, & 1752 surf_lsm_h(0)%qisws, surf_lsm_h(1)%qisws, & 1753 surf_usm_h(0)%qisws, surf_usm_h(1)%qisws, & 1748 1754 surf_def_v(0)%qisws, surf_def_v(1)%qisws, & 1749 1755 surf_def_v(2)%qisws, surf_def_v(3)%qisws, & … … 1835 1841 surf_def_h(0)%nisws, surf_def_h(1)%nisws, & 1836 1842 surf_def_h(2)%nisws, & 1837 surf_lsm_h%nisws, surf_usm_h%nisws, & 1843 surf_lsm_h(0)%nisws, surf_lsm_h(1)%nisws, & 1844 surf_usm_h(0)%nisws, surf_usm_h(1)%nisws, & 1838 1845 surf_def_v(0)%nisws, surf_def_v(1)%nisws, & 1839 1846 surf_def_v(2)%nisws, surf_def_v(3)%nisws, & … … 1933 1940 surf_def_h(0)%qrsws, surf_def_h(1)%qrsws, & 1934 1941 surf_def_h(2)%qrsws, & 1935 surf_lsm_h%qrsws, surf_usm_h%qrsws, & 1942 surf_lsm_h(0)%qrsws, surf_lsm_h(1)%qrsws, & 1943 surf_usm_h(0)%qrsws, surf_usm_h(1)%qrsws, & 1936 1944 surf_def_v(0)%qrsws, surf_def_v(1)%qrsws, & 1937 1945 surf_def_v(2)%qrsws, surf_def_v(3)%qrsws, & … … 2023 2031 surf_def_h(0)%nrsws, surf_def_h(1)%nrsws, & 2024 2032 surf_def_h(2)%nrsws, & 2025 surf_lsm_h%nrsws, surf_usm_h%nrsws, & 2033 surf_lsm_h(0)%nrsws, surf_lsm_h(1)%nrsws, & 2034 surf_usm_h(0)%nrsws, surf_usm_h(1)%nrsws, & 2026 2035 surf_def_v(0)%nrsws, surf_def_v(1)%nrsws, & 2027 2036 surf_def_v(2)%nrsws, surf_def_v(3)%nrsws, & … … 2122 2131 surf_def_h(0)%qcsws, surf_def_h(1)%qcsws, & 2123 2132 surf_def_h(2)%qcsws, & 2124 surf_lsm_h%qcsws, surf_usm_h%qcsws, & 2133 surf_lsm_h(0)%qcsws, surf_lsm_h(1)%qcsws, & 2134 surf_usm_h(0)%qcsws, surf_usm_h(1)%qcsws, & 2125 2135 surf_def_v(0)%qcsws, surf_def_v(1)%qcsws, & 2126 2136 surf_def_v(2)%qcsws, surf_def_v(3)%qcsws, & … … 2179 2189 surf_def_h(0)%ncsws, surf_def_h(1)%ncsws, & 2180 2190 surf_def_h(2)%ncsws, & 2181 surf_lsm_h%ncsws, surf_usm_h%ncsws, & 2191 surf_lsm_h(0)%ncsws, surf_lsm_h(1)%ncsws, & 2192 surf_usm_h(0)%ncsws, surf_usm_h(1)%ncsws, & 2182 2193 surf_def_v(0)%ncsws, surf_def_v(1)%ncsws, & 2183 2194 surf_def_v(2)%ncsws, surf_def_v(3)%ncsws, & … … 2243 2254 surf_def_h(0)%qisws, surf_def_h(1)%qisws, & 2244 2255 surf_def_h(2)%qisws, & 2245 surf_lsm_h%qisws, surf_usm_h%qisws, & 2256 surf_lsm_h(0)%qisws, surf_lsm_h(1)%qisws, & 2257 surf_usm_h(0)%qisws, surf_usm_h(1)%qisws, & 2246 2258 surf_def_v(0)%qisws, surf_def_v(1)%qisws, & 2247 2259 surf_def_v(2)%qisws, surf_def_v(3)%qisws, & … … 2300 2312 surf_def_h(0)%nisws, surf_def_h(1)%nisws, & 2301 2313 surf_def_h(2)%nisws, & 2302 surf_lsm_h%nisws, surf_usm_h%nisws, & 2314 surf_lsm_h(0)%nisws, surf_lsm_h(1)%nisws, & 2315 surf_usm_h(0)%nisws, surf_usm_h(1)%nisws, & 2303 2316 surf_def_v(0)%nisws, surf_def_v(1)%nisws, & 2304 2317 surf_def_v(2)%nisws, surf_def_v(3)%nisws, & … … 2364 2377 surf_def_h(0)%qrsws, surf_def_h(1)%qrsws, & 2365 2378 surf_def_h(2)%qrsws, & 2366 surf_lsm_h%qrsws, surf_usm_h%qrsws, & 2379 surf_lsm_h(0)%qrsws, surf_lsm_h(1)%qrsws, & 2380 surf_usm_h(0)%qrsws, surf_usm_h(1)%qrsws, & 2367 2381 surf_def_v(0)%qrsws, surf_def_v(1)%qrsws, & 2368 2382 surf_def_v(2)%qrsws, surf_def_v(3)%qrsws, & … … 2421 2435 surf_def_h(0)%nrsws, surf_def_h(1)%nrsws, & 2422 2436 surf_def_h(2)%nrsws, & 2423 surf_lsm_h%nrsws, surf_usm_h%nrsws, & 2437 surf_lsm_h(0)%nrsws, surf_lsm_h(1)%nrsws, & 2438 surf_usm_h(0)%nrsws, surf_usm_h(1)%nrsws, & 2424 2439 surf_def_v(0)%nrsws, surf_def_v(1)%nrsws, & 2425 2440 surf_def_v(2)%nrsws, surf_def_v(3)%nrsws, &
Note: See TracChangeset
for help on using the changeset viewer.