diff --git a/src/les/bcknd/device/sigma_device.f90 b/src/les/bcknd/device/sigma_device.f90 index 6604b085682..f27e2c957a7 100644 --- 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 \ No newline at end of file +end module sigma_device