Skip to content
Snippets Groups Projects
Commit eb5c7056 authored by Debolskiy Andrey's avatar Debolskiy Andrey :bicyclist_tone5:
Browse files

fixed charnok constant b2 definition

parent 449adbf5
No related branches found
No related tags found
No related merge requests found
Pipeline #1561 failed
Stage: build
Stage: test
Show whitespace changes
Inline Side-by-side
Showing
with 1 addition and 1 deletion
srcF/sfx_surface.f90
+ 1
− 1
View file @ eb5c7056
......@@ -47,7 +47,7 @@ module sfx_surface
real, parameter :: h_charnock = 10.0
real, parameter :: c1_charnock = log(h_charnock * (g / gamma_c))
real, parameter :: c2_charnock = Re_visc_min * nu_air * c1_charnock
real, parameter :: c2_charnock = Re_visc_min * nu_air * (g / gamma_c)
! --------------------------------------------------------------------------------
!< Re fully roughness minimum value [n/d]
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment