normalize pot_ref

PHOTOX · Apr 4, 2022 · 3135eb8 · 3135eb8
1 parent 8161401
commit 3135eb8
Showing 1 changed file with 2 additions and 0 deletions.
diff --git 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()