Merge pull request #1595 from ExtremeFLOW/Shiyu-Sandy-Du-patch-2

Update sigma_cpu.f90
ExtremeFLOW · Nov 11, 2024 · 75f92e4 · 75f92e4
2 parents b9d3c5b + 018b506
commit 75f92e4
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/src/.depends b/src/.depends
@@ -315,7 +315,7 @@ les/bcknd/cpu/dynamic_smagorinsky_cpu.lo : les/bcknd/cpu/dynamic_smagorinsky_cpu
 les/elementwise_filter.lo : les/elementwise_filter.f90 math/tensor.lo les/bcknd/cpu/elementwise_filter_cpu.lo config/neko_config.lo common/utils.lo field/field.lo math/math.lo config/num_types.lo 
 les/bcknd/cpu/elementwise_filter_cpu.lo : les/bcknd/cpu/elementwise_filter_cpu.f90 math/mxm_wrapper.lo math/tensor.lo math/matrix.lo sem/speclib.lo math/math.lo config/num_types.lo 
 les/sigma.lo : les/sigma.f90 sem/coef.lo les/bcknd/device/sigma_device.lo les/bcknd/cpu/sigma_cpu.lo config/neko_config.lo common/utils.lo common/json_utils.lo sem/dofmap.lo les/les_model.lo field/field.lo config/num_types.lo 
-les/bcknd/cpu/sigma_cpu.lo : les/bcknd/cpu/sigma_cpu.f90 gs/gs_ops.lo sem/coef.lo math/operators.lo field/field.lo field/field_registry.lo field/scratch_registry.lo field/field_list.lo config/num_types.lo 
+les/bcknd/cpu/sigma_cpu.lo : les/bcknd/cpu/sigma_cpu.f90 math/math.lo gs/gs_ops.lo sem/coef.lo math/operators.lo field/field.lo field/field_registry.lo field/scratch_registry.lo field/field_list.lo config/num_types.lo 
 les/bcknd/device/sigma_device.lo : les/bcknd/device/sigma_device.f90 les/bcknd/device/device_sigma_nut.lo gs/gs_ops.lo sem/coef.lo math/operators.lo field/field.lo field/field_registry.lo field/scratch_registry.lo math/math.lo math/bcknd/device/device_math.lo field/field_list.lo config/num_types.lo 
 les/bcknd/device/device_sigma_nut.lo : les/bcknd/device/device_sigma_nut.F90 comm/comm.lo common/utils.lo config/num_types.lo 
 wall_models/wall_model.lo : wall_models/wall_model.f90 common/log.lo comm/comm.lo math/math.lo common/utils.lo math/vector.lo device/device.lo config/neko_config.lo sem/coef.lo sem/dofmap.lo field/field_registry.lo field/field.lo config/num_types.lo 

diff --git a/src/les/bcknd/cpu/sigma_cpu.f90 b/src/les/bcknd/cpu/sigma_cpu.f90
@@ -38,12 +38,13 @@
 module sigma_cpu
   use num_types, only : rp
   use field_list, only : field_list_t
-   use scratch_registry, only : neko_scratch_registry
+  use scratch_registry, only : neko_scratch_registry
   use field_registry, only : neko_field_registry
   use field, only : field_t
   use operators, only : dudxyz
   use coefs, only : coef_t
   use gs_ops, only : GS_OP_ADD
+  use math, only : NEKO_EPS
   implicit none
   private
 
@@ -82,7 +83,7 @@ subroutine sigma_compute_cpu(t, tstep, coef, nut, delta, c)
     integer :: e, i
 
     ! some constant
-    eps = 1.d-14
+    eps = NEKO_EPS
 
 
     ! get fields from registry