FIX: Fix where in module functions go

NCAR · Sep 17, 2024 · 1c20f4a · 1c20f4a
1 parent 607cf30
commit 1c20f4a
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/fortran/ompgen.F90.template b/fortran/ompgen.F90.template
@@ -20,6 +20,7 @@ MODULE omp_constants
     INTEGER(KIND=4), PARAMETER :: fomp_sched_auto = 4
 #endif
 
+    contains
     logical function have_omp_constants()
         have_omp_constants = .true.
     end function have_omp_constants