Changeset 4177


Ignore:
Timestamp:
Aug 20, 2019 2:32:34 PM (2 years ago)
Author:
gronemeier
Message:

add comment

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/turbulence_closure_mod.f90

    r4170 r4177  
    2525! -----------------
    2626! $Id$
     27! add comment
     28!
     29! 4170 2019-08-19 17:12:31Z gronemeier
    2730! - add performance optimizations according to K. Ketelsen
    2831!   to diffusion_e and tcm_diffusivities_default
     
    40534056!> Diffusion and dissipation terms for the TKE.
    40544057!> Vector-optimized version
     4058!> @todo Try to avoid the usage of the 3d-array 'diss' where possible (case les
     4059!>       and rans_tke_l if not wang_kernel, use_sgs_for_particles, or
     4060!>       collision_turbulence).
    40554061!------------------------------------------------------------------------------!
    40564062 SUBROUTINE diffusion_e( var, var_reference )
     
    42574263!> Diffusion and dissipation terms for the TKE.
    42584264!> Cache-optimized version
     4265!> @todo Try to avoid the usage of the 3d-array 'diss' where possible (case les
     4266!>       and rans_tke_l if not wang_kernel, use_sgs_for_particles, or
     4267!>       collision_turbulence).
    42594268!------------------------------------------------------------------------------!
    42604269 SUBROUTINE diffusion_e_ij( i, j, var, var_reference )
Note: See TracChangeset for help on using the changeset viewer.