Changeset 4180 for palm/trunk/SOURCE/flow_statistics.f90
- Timestamp:
- Aug 21, 2019 2:37:54 PM (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/flow_statistics.f90
r4131 r4180 37 37 ! Bugfix, terminate OMP Parallel block 38 38 ! 39 ! 3637 2018-12-20 01:51:36Z knoop40 ! Implementation of the PALM module interface41 !42 ! 3458 2018-10-30 14:51:23Z kanani43 ! from chemistry branch r3443, basit:44 ! bug fixed in chemistry profiles45 !46 ! 3452 2018-10-30 13:13:34Z schwenkel47 ! Bugfix for profiles output48 !49 ! 3298 2018-10-02 12:21:11Z kanani50 ! - Minor formatting (kanani)51 ! - Added .AND. max_pr_cs > 0 before MPI_ALLREDUCE call (forkel)52 ! - Data arrays, sums, sums_l, hom, hom_sum updated for chem species (basit)53 ! - Directives of parallelism added for chemistry (basit)54 ! - Call for chem_statistics added (basit)55 !56 ! 3294 2018-10-01 02:37:10Z raasch57 ! ocean renamed ocean_mode58 !59 ! 3274 2018-09-24 15:42:55Z knoop60 ! Modularization of all bulk cloud physics code components61 !62 ! 3241 2018-09-12 15:02:00Z raasch63 ! unused variables removed64 !65 ! 3042 2018-05-25 10:44:37Z schwenkel66 ! Changed the name specific humidity to mixing ratio67 !68 ! 3040 2018-05-25 10:22:08Z schwenkel69 ! Comments related to the calculation of the inversion height expanded70 !71 ! 3003 2018-04-23 10:22:58Z Giersch72 ! The inversion height will not be calcuated before the first timestep in73 ! case of restarts.74 !75 ! 2968 2018-04-13 11:52:24Z suehring76 ! Bugfix in output of timeseries quantities in case of elevated model surfaces.77 !78 ! 2817 2018-02-19 16:32:21Z knoop79 ! Preliminary gust module interface implemented80 !81 ! 2773 2018-01-30 14:12:54Z suehring82 ! Timeseries output of surface temperature.83 !84 ! 2753 2018-01-16 14:16:49Z suehring85 ! Tile approach for spectral albedo implemented.86 !87 ! 2718 2018-01-02 08:49:38Z maronga88 ! Corrected "Former revisions" section89 !90 ! 2696 2017-12-14 17:12:51Z kanani91 ! Change in file header (GPL part)92 ! Bugfix in evaluation of surface quantities in case different surface types93 ! are used (MS)94 !95 ! 2674 2017-12-07 11:49:21Z suehring96 ! Bugfix in output conversion of resolved-scale momentum fluxes in case of97 ! PW advections scheme.98 !99 ! 2320 2017-07-21 12:47:43Z suehring100 ! Modularize large-scale forcing and nudging101 !102 ! 2296 2017-06-28 07:53:56Z maronga103 ! Enabled output of radiation quantities for radiation_scheme = 'constant'104 !105 ! 2292 2017-06-20 09:51:42Z schwenkel106 ! Implementation of new microphysic scheme: cloud_scheme = 'morrison'107 ! includes two more prognostic equations for cloud drop concentration (nc)108 ! and cloud water content (qc).109 !110 ! 2270 2017-06-09 12:18:47Z maronga111 ! Revised numbering (removed 2 timeseries)112 !113 ! 2252 2017-06-07 09:35:37Z knoop114 ! perturbation pressure now depending on flux_output_mode115 !116 ! 2233 2017-05-30 18:08:54Z suehring117 !118 ! 2232 2017-05-30 17:47:52Z suehring119 ! Adjustments to new topography and surface concept120 !121 ! 2118 2017-01-17 16:38:49Z raasch122 ! OpenACC version of subroutine removed123 !124 ! 2073 2016-11-30 14:34:05Z raasch125 ! openmp bugfix: large scale forcing calculations cannot be executed thread126 ! parallel127 !128 ! 2037 2016-10-26 11:15:40Z knoop129 ! Anelastic approximation implemented130 !131 ! 2031 2016-10-21 15:11:58Z knoop132 ! renamed variable rho to rho_ocean133 !134 ! 2026 2016-10-18 10:27:02Z suehring135 ! Bugfix, enable output of s*2.136 ! Change, calculation of domain-averaged perturbation energy.137 ! Some formatting adjustments.138 !139 ! 2000 2016-08-20 18:09:15Z knoop140 ! Forced header and separation lines into 80 columns141 !142 ! 1976 2016-07-27 13:28:04Z maronga143 ! Removed some unneeded __rrtmg preprocessor directives144 !145 ! 1960 2016-07-12 16:34:24Z suehring146 ! Separate humidity and passive scalar147 !148 ! 1918 2016-05-27 14:35:57Z raasch149 ! in case of Wicker-Skamarock scheme, calculate disturbance kinetic energy here,150 ! if flow_statistics is called before the first initial time step151 !152 ! 1853 2016-04-11 09:00:35Z maronga153 ! Adjusted for use with radiation_scheme = constant154 !155 ! 1849 2016-04-08 11:33:18Z hoffmann156 ! prr moved to arrays_3d157 !158 ! 1822 2016-04-07 07:49:42Z hoffmann159 ! Output of bulk microphysics simplified.160 !161 ! 1815 2016-04-06 13:49:59Z raasch162 ! cpp-directives for intel openmp bug removed163 !164 ! 1783 2016-03-06 18:36:17Z raasch165 ! +module netcdf_interface166 !167 ! 1747 2016-02-08 12:25:53Z raasch168 ! small bugfixes for accelerator version169 !170 ! 1738 2015-12-18 13:56:05Z raasch171 ! bugfixes for calculations in statistical regions which do not contain grid172 ! points in the lowest vertical levels, mean surface level height considered173 ! in the calculation of the characteristic vertical velocity,174 ! old upstream parts removed175 !176 ! 1709 2015-11-04 14:47:01Z maronga177 ! Updated output of Obukhov length178 !179 ! 1691 2015-10-26 16:17:44Z maronga180 ! Revised calculation of Obukhov length. Added output of radiative heating >181 ! rates for RRTMG.182 !183 ! 1682 2015-10-07 23:56:08Z knoop184 ! Code annotations made doxygen readable185 !186 ! 1658 2015-09-18 10:52:53Z raasch187 ! bugfix: temporary reduction variables in the openacc branch are now188 ! initialized to zero189 !190 ! 1654 2015-09-17 09:20:17Z raasch191 ! FORTRAN bugfix of r1652192 !193 ! 1652 2015-09-17 08:12:24Z raasch194 ! bugfix in calculation of energy production by turbulent transport of TKE195 !196 ! 1593 2015-05-16 13:58:02Z raasch197 ! FORTRAN errors removed from openacc branch198 !199 ! 1585 2015-04-30 07:05:52Z maronga200 ! Added output of timeseries and profiles for RRTMG201 !202 ! 1571 2015-03-12 16:12:49Z maronga203 ! Bugfix: output of rad_net and rad_sw_in204 !205 ! 1567 2015-03-10 17:57:55Z suehring206 ! Reverse modifications made for monotonic limiter.207 !208 ! 1557 2015-03-05 16:43:04Z suehring209 ! Adjustments for monotonic limiter210 !211 ! 1555 2015-03-04 17:44:27Z maronga212 ! Added output of r_a and r_s.213 !214 ! 1551 2015-03-03 14:18:16Z maronga215 ! Added suppport for land surface model and radiation model output.216 !217 ! 1498 2014-12-03 14:09:51Z suehring218 ! Comments added219 !220 ! 1482 2014-10-18 12:34:45Z raasch221 ! missing ngp_sums_ls added in accelerator version222 !223 ! 1450 2014-08-21 07:31:51Z heinze224 ! bugfix: calculate fac only for simulated_time >= 0.0225 !226 ! 1396 2014-05-06 13:37:41Z raasch227 ! bugfix: "copyin" replaced by "update device" in openacc-branch228 !229 ! 1386 2014-05-05 13:55:30Z boeske230 ! bugfix: simulated time before the last timestep is needed for the correct231 ! calculation of the profiles of large scale forcing tendencies232 !233 ! 1382 2014-04-30 12:15:41Z boeske234 ! Renamed variables which store large scale forcing tendencies235 ! pt_lsa -> td_lsa_lpt, pt_subs -> td_sub_lpt,236 ! q_lsa -> td_lsa_q, q_subs -> td_sub_q,237 ! added Neumann boundary conditions for profile data output of large scale238 ! advection and subsidence terms at nzt+1239 !240 ! 1374 2014-04-25 12:55:07Z raasch241 ! bugfix: syntax errors removed from openacc-branch242 ! missing variables added to ONLY-lists243 !244 ! 1365 2014-04-22 15:03:56Z boeske245 ! Output of large scale advection, large scale subsidence and nudging tendencies246 ! +sums_ls_l, ngp_sums_ls, use_subsidence_tendencies247 !248 ! 1353 2014-04-08 15:21:23Z heinze249 ! REAL constants provided with KIND-attribute250 !251 ! 1322 2014-03-20 16:38:49Z raasch252 ! REAL constants defined as wp-kind253 !254 ! 1320 2014-03-20 08:40:49Z raasch255 ! ONLY-attribute added to USE-statements,256 ! kind-parameters added to all INTEGER and REAL declaration statements,257 ! kinds are defined in new module kinds,258 ! revision history before 2012 removed,259 ! comment fields (!:) to be used for variable explanations added to260 ! all variable declaration statements261 !262 ! 1299 2014-03-06 13:15:21Z heinze263 ! Output of large scale vertical velocity w_subs264 !265 ! 1257 2013-11-08 15:18:40Z raasch266 ! openacc "end parallel" replaced by "end parallel loop"267 !268 ! 1241 2013-10-30 11:36:58Z heinze269 ! Output of ug and vg270 !271 ! 1221 2013-09-10 08:59:13Z raasch272 ! ported for openACC in separate #else branch273 !274 ! 1179 2013-06-14 05:57:58Z raasch275 ! comment for profile 77 added276 !277 ! 1115 2013-03-26 18:16:16Z hoffmann278 ! ql is calculated by calc_liquid_water_content279 !280 ! 1111 2013-03-08 23:54:10Z raasch281 ! openACC directive added282 !283 ! 1053 2012-11-13 17:11:03Z hoffmann284 ! additions for two-moment cloud physics scheme:285 ! +nr, qr, qc, prr286 !287 ! 1036 2012-10-22 13:43:42Z raasch288 ! code put under GPL (PALM 3.9)289 !290 ! 1007 2012-09-19 14:30:36Z franke291 ! Calculation of buoyancy flux for humidity in case of WS-scheme is now using292 ! turbulent fluxes of WS-scheme293 ! Bugfix: Calculation of subgridscale buoyancy flux for humidity and cloud294 ! droplets at nzb and nzt added295 !296 ! 801 2012-01-10 17:30:36Z suehring297 ! Calculation of turbulent fluxes in advec_ws is now thread-safe.298 !299 ! Revision 1.1 1997/08/11 06:15:17 raasch300 ! Initial revision301 !302 39 ! 303 40 ! Description:
Note: See TracChangeset
for help on using the changeset viewer.