Line data    Source code

       1              : !--------------------------------------------------------------------------------------------------!
       2              : !   CP2K: A general program to perform molecular dynamics simulations                              !
       3              : !   Copyright 2000-2025 CP2K developers group <https://cp2k.org>                                   !
       4              : !                                                                                                  !
       5              : !   SPDX-License-Identifier: GPL-2.0-or-later                                                      !
       6              : !--------------------------------------------------------------------------------------------------!
       7              : 
       8              : ! **************************************************************************************************
       9              : !> \brief defines the type needed for computing wannier states expectations
      10              : !> \author alin m elena
      11              : ! **************************************************************************************************
      12              : MODULE wannier_states_types
      13              :    USE kinds,                           ONLY: dp
      14              : #include "./base/base_uses.f90"
      15              : 
      16              :    IMPLICIT NONE
      17              :    PRIVATE
      18              : 
      19              :    PUBLIC :: wannier_centres_type
      20              : 
      21              :    TYPE wannier_centres_type
      22              :       REAL(kind=dp), POINTER, DIMENSION(:)        :: WannierHamDiag => NULL()
      23              :       REAL(KIND=dp), POINTER, DIMENSION(:, :)      :: centres => NULL()
      24              :    END TYPE wannier_centres_type
      25              : 
      26            0 : END MODULE wannier_states_types