Cosmetic changes

This commit is contained in:
Sasha Fonari 2020-07-06 14:16:44 -04:00
parent e1400d1e7a
commit c3aa3c61a9
2 changed files with 2 additions and 2 deletions

View File

@ -18,6 +18,7 @@ MODULE beef_interface
beefrandinit, beefrandinitdef, beefensemble
!
INTERFACE
!
SUBROUTINE beefx( r, g, e, dr, dg, addlda ) BIND(C, NAME="beefx_")
USE iso_c_binding
REAL (C_DOUBLE), INTENT(INOUT) :: r, g, e, dr, dg
@ -65,4 +66,4 @@ MODULE beef_interface
END INTERFACE
!
END MODULE beef_interface
!
!

View File

@ -22,7 +22,6 @@ MODULE beef
!real(DP), save :: ldaxc
!
!
!
real(DP), allocatable :: beefxc(:), energies(:)
real(DP) :: ldaxc