Changeset 4180 for palm/trunk/SOURCE/prognostic_equations.f90
- Timestamp:
- Aug 21, 2019 2:37:54 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/prognostic_equations.f90
r4110 r4180 99 99 ! OpenACC port for SPEC 100 100 ! 101 ! 3589 2018-11-30 15:09:51Z suehring102 ! Move the control parameter "salsa" from salsa_mod to control_parameters103 ! (M. Kurppa)104 !105 ! 3582 2018-11-29 19:16:36Z suehring106 ! Implementation of a new aerosol module salsa.107 ! Remove cpu-logs from i,j loop in cache version.108 !109 ! 3458 2018-10-30 14:51:23Z kanani110 ! remove duplicate USE chem_modules111 ! from chemistry branch r3443, banzhafs, basit:112 ! chem_depo call introduced113 ! code added for decycling chemistry114 !115 ! 3386 2018-10-19 16:28:22Z gronemeier116 ! Renamed tcm_prognostic to tcm_prognostic_equations117 !118 ! 3355 2018-10-16 14:03:34Z knoop119 ! (from branch resler)120 ! Fix for chemistry call121 !122 ! 3302 2018-10-03 02:39:40Z raasch123 ! Stokes drift + wave breaking term added124 !125 ! 3298 2018-10-02 12:21:11Z kanani126 ! Code added for decycling chemistry (basit)127 !128 ! 3294 2018-10-01 02:37:10Z raasch129 ! changes concerning modularization of ocean option130 !131 ! 3274 2018-09-24 15:42:55Z knoop132 ! Modularization of all bulk cloud physics code components133 !134 ! 3241 2018-09-12 15:02:00Z raasch135 ! omp_get_thread_num now declared in omp directive136 !137 ! 3183 2018-07-27 14:25:55Z suehring138 ! Remove unused variables from USE statements139 !140 ! 3182 2018-07-27 13:36:03Z suehring141 ! Revise recent bugfix for nesting142 !143 ! 3021 2018-05-16 08:14:20Z maronga144 ! Bugfix in IF clause for nesting145 !146 ! 3014 2018-05-09 08:42:38Z maronga147 ! Fixed a bug in the IF condition to call pcm_tendency in case of148 ! potential temperature149 !150 ! 2815 2018-02-19 11:29:57Z kanani151 ! Rename chem_tendency to chem_prognostic_equations,152 ! implement vector version for air chemistry153 !154 ! 2766 2018-01-22 17:17:47Z kanani155 ! Removed preprocessor directive __chem156 !157 ! 2746 2018-01-15 12:06:04Z suehring158 ! Move flag plant canopy to modules159 !160 ! 2719 2018-01-02 09:02:06Z maronga161 ! Bugfix for last change.162 !163 ! 2718 2018-01-02 08:49:38Z maronga164 ! Corrected "Former revisions" section165 !166 ! 2696 2017-12-14 17:12:51Z kanani167 ! - Change in file header (GPL part)168 ! - Moved TKE equation to tcm_prognostic (TG)169 ! - Added switch for chemical reactions (RF, FK)170 ! - Implementation of chemistry module (RF, BK, FK)171 !172 ! 2563 2017-10-19 15:36:10Z Giersch173 ! Variable wind_turbine moved to module control_parameters174 !175 ! 2320 2017-07-21 12:47:43Z suehring176 ! Modularize large-scale forcing and nudging177 !178 ! 2292 2017-06-20 09:51:42Z schwenkel179 ! Implementation of new microphysic scheme: cloud_scheme = 'morrison'180 ! includes two more prognostic equations for cloud drop concentration (nc)181 ! and cloud water content (qc).182 !183 ! 2261 2017-06-08 14:25:57Z raasch184 ! bugfix for r2232: openmp directives removed185 !186 ! 2233 2017-05-30 18:08:54Z suehring187 !188 ! 2232 2017-05-30 17:47:52Z suehring189 ! Adjutst to new surface-type structure. Remove call for usm_wall_heat_flux,190 ! which is realized directly in diffusion_s now.191 !192 ! 2192 2017-03-22 04:14:10Z raasch193 ! Bugfix for misplaced and missing openMP directives from r2155194 !195 ! 2155 2017-02-21 09:57:40Z hoffmann196 ! Bugfix in the calculation of microphysical quantities on ghost points.197 !198 ! 2118 2017-01-17 16:38:49Z raasch199 ! OpenACC version of subroutine removed200 !201 ! 2031 2016-10-21 15:11:58Z knoop202 ! renamed variable rho to rho_ocean203 !204 ! 2011 2016-09-19 17:29:57Z kanani205 ! Flag urban_surface is now defined in module control_parameters.206 !207 ! 2007 2016-08-24 15:47:17Z kanani208 ! Added pt tendency calculation based on energy balance at urban surfaces209 ! (new urban surface model)210 !211 ! 2000 2016-08-20 18:09:15Z knoop212 ! Forced header and separation lines into 80 columns213 !214 ! 1976 2016-07-27 13:28:04Z maronga215 ! Simplied calls to radiation model216 !217 ! 1960 2016-07-12 16:34:24Z suehring218 ! Separate humidity and passive scalar219 !220 ! 1914 2016-05-26 14:44:07Z witha221 ! Added calls for wind turbine model222 !223 ! 1873 2016-04-18 14:50:06Z maronga224 ! Module renamed (removed _mod)225 !226 ! 1850 2016-04-08 13:29:27Z maronga227 ! Module renamed228 !229 ! 1826 2016-04-07 12:01:39Z maronga230 ! Renamed canopy model calls.231 !232 ! 1822 2016-04-07 07:49:42Z hoffmann233 ! Kessler microphysics scheme moved to microphysics.234 !235 ! 1757 2016-02-22 15:49:32Z maronga236 !237 ! 1691 2015-10-26 16:17:44Z maronga238 ! Added optional model spin-up without radiation / land surface model calls.239 ! Formatting corrections.240 !241 ! 1682 2015-10-07 23:56:08Z knoop242 ! Code annotations made doxygen readable243 !244 ! 1585 2015-04-30 07:05:52Z maronga245 ! Added call for temperature tendency calculation due to radiative flux divergence246 !247 ! 1517 2015-01-07 19:12:25Z hoffmann248 ! advec_s_bc_mod addded, since advec_s_bc is now a module249 !250 ! 1484 2014-10-21 10:53:05Z kanani251 ! Changes due to new module structure of the plant canopy model:252 ! parameters cthf and plant_canopy moved to module plant_canopy_model_mod.253 ! Removed double-listing of use_upstream_for_tke in ONLY-list of module254 ! control_parameters255 !256 ! 1409 2014-05-23 12:11:32Z suehring257 ! Bugfix: i_omp_start changed for advec_u_ws at left inflow and outflow boundary.258 ! This ensures that left-hand side fluxes are also calculated for nxl in that259 ! case, even though the solution at nxl is overwritten in boundary_conds()260 !261 ! 1398 2014-05-07 11:15:00Z heinze262 ! Rayleigh-damping for horizontal velocity components changed: instead of damping263 ! against ug and vg, damping against u_init and v_init is used to allow for a264 ! homogenized treatment in case of nudging265 !266 ! 1380 2014-04-28 12:40:45Z heinze267 ! Change order of calls for scalar prognostic quantities:268 ! ls_advec -> nudging -> subsidence since initial profiles269 !270 ! 1374 2014-04-25 12:55:07Z raasch271 ! missing variables added to ONLY lists272 !273 ! 1365 2014-04-22 15:03:56Z boeske274 ! Calls of ls_advec for large scale advection added,275 ! subroutine subsidence is only called if use_subsidence_tendencies = .F.,276 ! new argument ls_index added to the calls of subsidence277 ! +ls_index278 !279 ! 1361 2014-04-16 15:17:48Z hoffmann280 ! Two-moment microphysics moved to the start of prognostic equations. This makes281 ! the 3d arrays for tend_q, tend_qr, tend_pt and tend_pt redundant.282 ! Additionally, it is allowed to call the microphysics just once during the time283 ! step (not at each sub-time step).284 !285 ! Two-moment cloud physics added for vector and accelerator optimization.286 !287 ! 1353 2014-04-08 15:21:23Z heinze288 ! REAL constants provided with KIND-attribute289 !290 ! 1337 2014-03-25 15:11:48Z heinze291 ! Bugfix: REAL constants provided with KIND-attribute292 !293 ! 1332 2014-03-25 11:59:43Z suehring294 ! Bugfix: call advec_ws or advec_pw for TKE only if NOT use_upstream_for_tke295 !296 ! 1330 2014-03-24 17:29:32Z suehring297 ! In case of SGS-particle velocity advection of TKE is also allowed with298 ! dissipative 5th-order scheme.299 !300 ! 1320 2014-03-20 08:40:49Z raasch301 ! ONLY-attribute added to USE-statements,302 ! kind-parameters added to all INTEGER and REAL declaration statements,303 ! kinds are defined in new module kinds,304 ! old module precision_kind is removed,305 ! revision history before 2012 removed,306 ! comment fields (!:) to be used for variable explanations added to307 ! all variable declaration statements308 !309 ! 1318 2014-03-17 13:35:16Z raasch310 ! module interfaces removed311 !312 ! 1257 2013-11-08 15:18:40Z raasch313 ! openacc loop vector clauses removed, independent clauses added314 !315 ! 1246 2013-11-01 08:59:45Z heinze316 ! enable nudging also for accelerator version317 !318 ! 1241 2013-10-30 11:36:58Z heinze319 ! usage of nudging enabled (so far not implemented for accelerator version)320 !321 ! 1179 2013-06-14 05:57:58Z raasch322 ! two arguments removed from routine buoyancy, ref_state updated on device323 !324 ! 1128 2013-04-12 06:19:32Z raasch325 ! those parts requiring global communication moved to time_integration,326 ! loop index bounds in accelerator version replaced by i_left, i_right, j_south,327 ! j_north328 !329 ! 1115 2013-03-26 18:16:16Z hoffmann330 ! optimized cloud physics: calculation of microphysical tendencies transfered331 ! to microphysics.f90; qr and nr are only calculated if precipitation is required332 !333 ! 1111 2013-03-08 23:54:10Z raasch334 ! update directives for prognostic quantities removed335 !336 ! 1106 2013-03-04 05:31:38Z raasch337 ! small changes in code formatting338 !339 ! 1092 2013-02-02 11:24:22Z raasch340 ! unused variables removed341 !342 ! 1053 2012-11-13 17:11:03Z hoffmann343 ! implementation of two new prognostic equations for rain drop concentration (nr)344 ! and rain water content (qr)345 !346 ! currently, only available for cache loop optimization347 !348 ! 1036 2012-10-22 13:43:42Z raasch349 ! code put under GPL (PALM 3.9)350 !351 ! 1019 2012-09-28 06:46:45Z raasch352 ! non-optimized version of prognostic_equations removed353 !354 ! 1015 2012-09-27 09:23:24Z raasch355 ! new branch prognostic_equations_acc356 ! OpenACC statements added + code changes required for GPU optimization357 !358 ! 1001 2012-09-13 14:08:46Z raasch359 ! all actions concerning leapfrog- and upstream-spline-scheme removed360 !361 ! 978 2012-08-09 08:28:32Z fricke362 ! km_damp_x and km_damp_y removed in calls of diffusion_u and diffusion_v363 ! add ptdf_x, ptdf_y for damping the potential temperature at the inflow364 ! boundary in case of non-cyclic lateral boundaries365 ! Bugfix: first thread index changes for WS-scheme at the inflow366 !367 ! 940 2012-07-09 14:31:00Z raasch368 ! temperature equation can be switched off369 !370 ! Revision 1.1 2000/04/13 14:56:27 schroeter371 ! Initial revision372 !373 101 ! 374 102 ! Description:
Note: See TracChangeset
for help on using the changeset viewer.