Merge pull request #1594 from ExtremeFLOW/Shiyu-Sandy-Du-patch-1

Update sigma_device.f90
ExtremeFLOW · Nov 11, 2024 · 40fdaff · 40fdaff
2 parents 75f92e4 + 62c777e
commit 40fdaff
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/les/bcknd/device/sigma_device.f90 b/src/les/bcknd/device/sigma_device.f90
@@ -75,7 +75,7 @@ subroutine sigma_compute_device(t, tstep, coef, nut, delta, c)
     integer :: e, i
 
     ! some constant
-    eps = 1.0_rp-14
+    eps = NEKO_EPS
 
     ! get fields from registry
     u => neko_field_registry%get_field_by_name("u")
@@ -123,4 +123,4 @@ subroutine sigma_compute_device(t, tstep, coef, nut, delta, c)
 
     call neko_scratch_registry%relinquish_field(temp_indices)
   end subroutine sigma_compute_device
-end module sigma_device
+end module sigma_device