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_eo
9
10  use precision, only: dp
11	implicit none
12
13  public
14
15  real(dp), pointer, save :: eo(:,:,:)  ! Hamiltonian eigenvalues
16  real(dp), pointer, save :: qo(:,:,:)  ! Occupations of eigenstates
17
18end module m_eo
19
20
21
22
23
24