Commit 8300a407 authored by Gregor Michalicek's avatar Gregor Michalicek
Browse files

Slightly more informative output if the potential shift is too small

parent 1c32d2cd
......@@ -147,7 +147,7 @@ CONTAINS
IF (info.NE.0) THEN
PRINT *,"Potential shift to small, increasing the value to:",td%e_shift(n,jsp)
PRINT *,"Potential shift for atom type ",n," is too small. Increasing the value to:",td%e_shift(n,jsp)
IF (td%e_shift(n,jsp)>e_shift_max) THEN
CALL judft_error("Potential shift at maximum")
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