From 3135eb85746b7eef22d369015c4938f37d768a94 Mon Sep 17 00:00:00 2001
From: Daniel Hollas <danekhollas@gmail.com>
Date: Mon, 4 Apr 2022 02:02:42 +0200
Subject: [PATCH] normalize pot_ref

---
 src/init.F90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/init.F90 b/src/init.F90
index 9c3a9f50..35ec5ece 100644
--- a/src/init.F90
+++ b/src/init.F90
@@ -150,7 +150,9 @@ subroutine init(dt)
    open (150, file=chinput, status='OLD', delim='APOSTROPHE', action="READ")
    read (150, general)
    rewind (150)
+
    pot = tolower(pot)
+   pot_ref = tolower(pot_ref)
 
    if (pot == "_cp2k_" .or. pot_ref == "_cp2k_") then
       call init_cp2k()