1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
|
!
! Copyright (C) 2004-2007 Quantum ESPRESSO group
! This file is distributed under the terms of the
! GNU General Public License. See the file `License'
! in the root directory of the present distribution,
! or http://www.gnu.org/copyleft/gpl.txt .
!
!--------------------------------------------------------------------------
!
MODULE atom
!
! ... The variables needed to describe the atoms and related quantities
!
USE radial_grids, ONLY : radial_grid_type
!
SAVE
!
type(radial_grid_type), allocatable, target :: &
rgrid(:) ! the information on atomic radial grids.
! NB: some of the subsequent data are therefore redundant
! and will be eliminated in due course asap
INTEGER, ALLOCATABLE :: &
msh(:) ! the point at rcut
!
END MODULE atom
|