Commit cc58bb6e authored by Daniel Wortmann's avatar Daniel Wortmann

Removed left over 'use m_apws' from the code

parent faff058a
...@@ -24,7 +24,6 @@ CONTAINS ...@@ -24,7 +24,6 @@ CONTAINS
#include"cpp_double.h" #include"cpp_double.h"
USE m_constants, ONLY : pi_const,sfp_const USE m_constants, ONLY : pi_const,sfp_const
USE m_types USE m_types
USE m_apws
USE m_eigen_hssetup USE m_eigen_hssetup
USE m_pot_io USE m_pot_io
USE m_eigen_diag USE m_eigen_diag
......
...@@ -60,7 +60,6 @@ CONTAINS ...@@ -60,7 +60,6 @@ CONTAINS
USE m_constants, ONLY : fpi_const,tpi_const USE m_constants, ONLY : fpi_const,tpi_const
USE m_types USE m_types
USE m_ylm USE m_ylm
USE m_apws
USE cudafor USE cudafor
USE nvtx USE nvtx
IMPLICIT NONE IMPLICIT NONE
...@@ -175,7 +174,6 @@ CONTAINS ...@@ -175,7 +174,6 @@ CONTAINS
USE m_constants, ONLY : fpi_const,tpi_const USE m_constants, ONLY : fpi_const,tpi_const
USE m_types USE m_types
USE m_ylm USE m_ylm
USE m_apws
IMPLICIT NONE IMPLICIT NONE
TYPE(t_sym),INTENT(IN) :: sym TYPE(t_sym),INTENT(IN) :: sym
TYPE(t_cell),INTENT(IN) :: cell TYPE(t_cell),INTENT(IN) :: cell
......
...@@ -24,7 +24,6 @@ CONTAINS ...@@ -24,7 +24,6 @@ CONTAINS
!*********************************************************************** !***********************************************************************
USE m_constants,ONLY: fpi_const USE m_constants,ONLY: fpi_const
USE m_types USE m_types
USE m_apws
IMPLICIT NONE IMPLICIT NONE
TYPE(t_input),INTENT(IN) :: input TYPE(t_input),INTENT(IN) :: input
TYPE(t_atoms),INTENT(IN) :: atoms TYPE(t_atoms),INTENT(IN) :: atoms
......
...@@ -16,7 +16,6 @@ ...@@ -16,7 +16,6 @@
USE m_constants USE m_constants
USE m_ylm USE m_ylm
USE m_gaunt USE m_gaunt
USE m_apws
USE m_util USE m_util
USE m_types USE m_types
USE m_io_hybrid USE m_io_hybrid
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment