xref: /phasta/phSolver/common/turbke.f (revision 595995161822a203c8467e0e4a253d7bd7d6df32) 
1c-----------------------------------------------------------------------
2c
3c     Lam-Bremhorst Kay-Epsilon turbulence model constants
4c
5c-----------------------------------------------------------------------
6      module turbKE
7
8      real*8 ke_C_mu, ke_C_eps1, ke_C_eps2
9      real*8 ke_sigma, ke_otherstuff
10      parameter (
11     &     ke_C_mu       = 0.09,
12     &     ke_C_eps1     = 1.44,
13     &     ke_C_eps2     = 1.92,
14     &     ke_sigma      = 1.3,
15     &     ke_otherstuff = 1.50d0
16     &     )
17
18
19      end module
20
21