diff --git a/share/CMakeLists.txt b/share/CMakeLists.txt
index 481694f..d47f1fe 100644
--- a/share/CMakeLists.txt
+++ b/share/CMakeLists.txt
@@ -24,7 +24,6 @@ target_sources(OM3_share PRIVATE
   CESM_share/include/shr_assert.h
   CESM_share/src/shr_abort_mod.F90
   CESM_share/src/shr_cal_mod.F90
-  CESM_share/src/shr_const_mod.F90
   CESM_share/src/shr_file_mod.F90
   CESM_share/src/shr_kind_mod.F90
   CESM_share/src/shr_log_mod.F90
@@ -46,6 +45,7 @@ target_sources(OM3_share PRIVATE
   # The following file is a stub.
   stubs/mct_mod.F90
 )
+add_patched_source(OM3_share CESM_share/src/shr_const_mod.F90)
 if(CMAKE_Fortran_COMPILER_ID MATCHES "Intel")
   # CESM reduces the precision and increases speed for the following file
   set_source_files_properties(CESM_share/src/shr_wv_sat_mod.F90 PROPERTIES COMPILE_FLAGS "-fimf-precision=low -fp-model fast")
diff --git a/share/patches/shr_const_mod.F90.patch b/share/patches/shr_const_mod.F90.patch
new file mode 100644
index 0000000..b1b0b64
--- /dev/null
+++ b/share/patches/shr_const_mod.F90.patch
@@ -0,0 +1,14 @@
+diff --git a/src/shr_const_mod.F90 b/src/shr_const_mod.F90
+index 8437190..9696c81 100644
+--- shr_const_mod.F90.old
++++ shr_const_mod.F90.new
+@@ -87,9 +87,8 @@ contains
+ !-----------------------------------------------------------------------------
+ 
+   elemental logical function shr_const_isspval(rval)
+-!$omp declare simd(shr_const_isspval)
+ 
+      real(r8), intent(in) :: rval
+ 
+      if (rval > SHR_CONST_SPVAL_TOLMIN .and. &
+          rval < SHR_CONST_SPVAL_TOLMAX) then