Changeset 4180 for palm/trunk/SOURCE/surface_layer_fluxes_mod.f90
- Timestamp:
- Aug 21, 2019 2:37:54 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/surface_layer_fluxes_mod.f90
r3987 r4180 54 54 ! OpenACC port for SPEC 55 55 ! 56 ! 3597 2018-12-04 08:40:18Z maronga57 ! Added routine for calculating near surface air potential temperature (moved58 ! from urban_surface_mod)59 !60 ! 3547 2018-11-21 13:21:24Z suehring61 ! variables documented62 !63 ! 3361 2018-10-16 20:39:37Z knoop64 ! Modularization of all bulk cloud physics code components65 !66 ! 3271 2018-09-24 08:20:34Z suehring67 ! Comment revised68 !69 ! 3157 2018-07-19 21:08:49Z maronga70 ! Added local free convection velocity scale w_lfc in calculation of uvw_abs.71 ! This can be switche on/off by the user via the flag namelist parameter72 ! use_free_convection_scaling73 !74 ! 3152 2018-07-19 13:26:52Z suehring75 ! q_surface is now part of surface structure76 !77 ! 3149 2018-07-19 05:48:09Z maronga78 ! Correct accidental last commit79 !80 ! 3148 2018-07-19 05:45:25Z maronga81 ! Major bugfix in calculation of Obukhov length82 !83 ! 3146 2018-07-18 22:36:19Z maronga84 ! move phi_m from turbulence_closure_mod85 !86 ! 3045 2018-05-28 07:55:41Z Giersch87 ! Error message revised88 !89 ! 2766 2018-01-22 17:17:47Z kanani90 ! Removed preprocessor directive __chem91 !92 ! 2718 2018-01-02 08:49:38Z maronga93 ! Corrected "Former revisions" section94 !95 ! 2696 2017-12-14 17:12:51Z kanani96 ! - Change in file header (GPL part)97 ! - Implementation of chemistry module (FK)98 ! - Added calculation of pt1 and qv1 for all surface types. Added calculation of99 ! pt_surface for default-type surfaces (BM)100 ! - Add flag to disable computation of qsws in case of urban surface (MS)101 !102 ! 2547 2017-10-16 12:41:56Z schwenkel103 ! extended by cloud_droplets option104 !105 ! 2321 2017-07-24 15:57:07Z schwenkel106 ! Bugfix: Correct index in lookup table for Obukhov length107 !108 ! 2299 2017-06-29 10:14:38Z suehring109 ! Adjusted for allow separate spinups of LSM and atmosphere code110 !111 ! 2292 2017-06-20 09:51:42Z schwenkel112 ! Implementation of new microphysic scheme: cloud_scheme = 'morrison'113 ! includes two more prognostic equations for cloud drop concentration (nc)114 ! and cloud water content (qc).115 !116 ! 2281 2017-06-13 11:34:50Z suehring117 ! Clean-up unnecessary index access to surface type118 !119 ! 2233 2017-05-30 18:08:54Z suehring120 !121 ! 2232 2017-05-30 17:47:52Z suehring122 ! Adjustments to new surface concept123 ! OpenMP bugfix124 !125 ! 2118 2017-01-17 16:38:49Z raasch126 ! OpenACC directives and related code removed127 !128 ! 2091 2016-12-21 16:38:18Z suehring129 ! Bugfix in calculation of vsws ( incorrect linear interpolation of us )130 !131 ! 2076 2016-12-02 13:54:20Z raasch132 ! further openmp bugfix for lookup method133 !134 ! 2073 2016-11-30 14:34:05Z raasch135 ! openmp bugfix for lookup method136 !137 ! 2037 2016-10-26 11:15:40Z knoop138 ! Anelastic approximation implemented139 !140 ! 2011 2016-09-19 17:29:57Z kanani141 ! Flag urban_surface is now defined in module control_parameters.142 !143 ! 2007 2016-08-24 15:47:17Z kanani144 ! Account for urban surface model in computation of vertical kinematic heatflux145 !146 ! 2000 2016-08-20 18:09:15Z knoop147 ! Forced header and separation lines into 80 columns148 !149 ! 1992 2016-08-12 15:14:59Z suehring150 ! Minor bug, declaration of look-up index as INTEGER151 !152 ! 1960 2016-07-12 16:34:24Z suehring153 ! Treat humidity and passive scalar separately154 !155 ! 1929 2016-06-09 16:25:25Z suehring156 ! Bugfix: avoid segmentation fault in case one grid point is horizontally157 ! completely surrounded by topography158 !159 ! 1920 2016-05-30 10:50:15Z suehring160 ! Avoid segmentation fault (see change in 1915) by different initialization of161 ! us instead of adding a very small number in the denominator162 !163 ! 1915 2016-05-27 11:05:02Z suehring164 ! Bugfix: avoid segmentation fault in case of most_method = 'circular' at first165 ! timestep166 !167 ! 1850 2016-04-08 13:29:27Z maronga168 ! Module renamed169 !170 !171 ! 1822 2016-04-07 07:49:42Z hoffmann172 ! icloud_scheme replaced by microphysics_*173 !174 ! 1788 2016-03-10 11:01:04Z maronga175 ! Added parameter z0q which replaces z0h in the similarity functions for176 ! humidity.177 ! Syntax layout improved.178 !179 ! 1757 2016-02-22 15:49:32Z maronga180 ! Minor fixes.181 !182 ! 1749 2016-02-09 12:19:56Z raasch183 ! further OpenACC adjustments184 !185 ! 1747 2016-02-08 12:25:53Z raasch186 ! adjustments for OpenACC usage187 !188 ! 1709 2015-11-04 14:47:01Z maronga189 ! Bugfix: division by zero could occur when calculating rib at low wind speeds190 ! Bugfix: calculation of uv_total for neutral = .T., initial value for ol for191 ! neutral = .T.192 !193 ! 1705 2015-11-02 14:28:56Z maronga194 ! Typo removed195 !196 ! 1697 2015-10-28 17:14:10Z raasch197 ! FORTRAN and OpenMP errors removed198 !199 ! 1696 2015-10-27 10:03:34Z maronga200 ! Modularized and completely re-written version of prandtl_fluxes.f90. In the201 ! course of the re-writing two additional methods have been implemented. See202 ! updated description.203 !204 ! 1551 2015-03-03 14:18:16Z maronga205 ! Removed land surface model part. The surface fluxes are now always calculated206 ! within prandtl_fluxes, based on the given surface temperature/humidity (which207 ! is either provided by the land surface model, by large scale forcing data, or208 ! directly prescribed by the user.209 !210 ! 1496 2014-12-02 17:25:50Z maronga211 ! Adapted for land surface model212 !213 ! 1494 2014-11-21 17:14:03Z maronga214 ! Bugfixes: qs is now calculated before calculation of Rif. calculation of215 ! buoyancy flux in Rif corrected (added missing humidity term), allow use of216 ! topography for coupled runs (not tested)217 !218 ! 1361 2014-04-16 15:17:48Z hoffmann219 ! Bugfix: calculation of turbulent fluxes of rain water content (qrsws) and rain220 ! drop concentration (nrsws) added221 !222 ! 1340 2014-03-25 19:45:13Z kanani223 ! REAL constants defined as wp-kind224 !225 ! 1320 2014-03-20 08:40:49Z raasch226 ! ONLY-attribute added to USE-statements,227 ! kind-parameters added to all INTEGER and REAL declaration statements,228 ! kinds are defined in new module kinds,229 ! old module precision_kind is removed,230 ! revision history before 2012 removed,231 ! comment fields (!:) to be used for variable explanations added to232 ! all variable declaration statements233 !234 ! 1276 2014-01-15 13:40:41Z heinze235 ! Use LSF_DATA also in case of Dirichlet bottom boundary condition for scalars236 !237 ! 1257 2013-11-08 15:18:40Z raasch238 ! openACC "kernels do" replaced by "kernels loop", "loop independent" added239 !240 ! 1036 2012-10-22 13:43:42Z raasch241 ! code put under GPL (PALM 3.9)242 !243 ! 1015 2012-09-27 09:23:24Z raasch244 ! OpenACC statements added245 !246 ! 978 2012-08-09 08:28:32Z fricke247 ! roughness length for scalar quantities z0h added248 !249 ! Revision 1.1 1998/01/23 10:06:06 raasch250 ! Initial revision251 !252 56 ! 253 57 ! Description:
Note: See TracChangeset
for help on using the changeset viewer.