Commit 99ec80be authored by Gregor Michalicek's avatar Gregor Michalicek

Some fixes in r_inpXML needed due to the changed behavior of strho

parent 3980c34d
......@@ -2205,7 +2205,9 @@ SUBROUTINE r_inpXML(&
input%strho = .FALSE.
l_opti = .FALSE.
INQUIRE(file="cdn1",exist=l_opti)
if (noco%l_noco) INQUIRE(file="rhomat_inp",exist=l_opti)
l_opti=.not.l_opti
IF ((sliceplot%iplot).OR.(input%strho).OR.(input%swsp).OR.&
(input%lflip).OR.(obsolete%l_f2u).OR.(obsolete%l_u2f).OR.(input%l_bmt)) l_opti = .TRUE.
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment