1!--------------------------------------------------------------------------------------------------!
2!  DFTB+: general package for performing fast atomistic simulations                                !
3!  Copyright (C) 2006 - 2019  DFTB+ developers group                                               !
4!                                                                                                  !
5!  See the LICENSE file for terms of usage and distribution.                                       !
6!--------------------------------------------------------------------------------------------------!
7
8#:include 'common.fypp'
9
10!> MAGMA GPU interface library
11module dftbp_magmahelper
12#:if WITH_GPU
13  use device_info
14#:endif
15  implicit none
16
17#:if WITH_GPU
18
19  !> Whether code was built with GPU support
20  logical, parameter :: withGPU = .true.
21
22#:else
23
24  !> Whether code was built with GPU support
25  logical, parameter :: withGPU = .false.
26
27#:endif
28
29end module dftbp_magmahelper
30