From c2dee7e151ecb0ccc89ae55eb97bdafbc3856735 Mon Sep 17 00:00:00 2001
From: Tobias Neumann <mail@tobias-neumann.eu>
Date: Mon, 25 Mar 2024 09:26:01 -0700
Subject: [PATCH] Fix for omp_lib (at least on perlmutter system)

---
 src/Need/mcfm_mpi.f | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Need/mcfm_mpi.f b/src/Need/mcfm_mpi.f
index 638f4c3..025f311 100644
--- a/src/Need/mcfm_mpi.f
+++ b/src/Need/mcfm_mpi.f
@@ -1,8 +1,9 @@
       program mcfm
+          use omp_lib
       implicit none
       include 'types.f'
       include 'mpif.h'
-      include "omp_lib.h"
+      !include "omp_lib.h"
       include 'mpicommon.f'
       integer ierr,mylen,support
       character (len=mpi_max_processor_name)::procname