From 6dec281ead5324c0067ba796ea6a6ba318a7a8d3 Mon Sep 17 00:00:00 2001
From: "Hrant P. Hratchian" <hhratchian@ucmerced.edu>
Date: Mon, 9 Sep 2024 12:22:20 -0700
Subject: [PATCH] Fixed ubuntu compile failure in mqc_binary.

---
 src/mqc_binary.F03 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/mqc_binary.F03 b/src/mqc_binary.F03
index 110b262c..9cdf150b 100644
--- a/src/mqc_binary.F03
+++ b/src/mqc_binary.F03
@@ -409,7 +409,7 @@ function MQC_PopCnt(mqc_bits_in) result(bits_on)
 !
       implicit none
       type(mqc_bits),intent(in)::mqc_bits_in
-      integer(kind=int64),intent(out)::bits_on
+      integer(kind=int64)::bits_on
 !
       integer(kind=int64)::i
 !