1! --- 2! Copyright (C) 1996-2016 The SIESTA group 3! This file is distributed under the terms of the 4! GNU General Public License: see COPYING in the top directory 5! or http://www.gnu.org/copyleft/gpl.txt . 6! See Docs/Contributors.txt for a list of contributors. 7! --- 8module m_steps 9 implicit none 10 public 11 integer:: inicoor ! Initial step in geommetry iteration 12 integer:: fincoor ! Final step in geommetry iteration 13 integer:: istp ! Geommetry iteration step starting in istp=1 14 logical:: final=.false. ! Last geometry step? 15 16end module m_steps 17