From 4b72360e82a6190cab0dac63a97856c7cb47de1f Mon Sep 17 00:00:00 2001
From: Matthias Redies <m.redies@fz-juelich.de>
Date: Thu, 28 Feb 2019 16:23:32 +0100
Subject: [PATCH] fix commit by making nsp() pure

---
 types/types_setup.F90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/types/types_setup.F90 b/types/types_setup.F90
index 05cc2c27..a80ca81a 100644
--- a/types/types_setup.F90
+++ b/types/types_setup.F90
@@ -667,7 +667,7 @@ MODULE m_types_setup
 
    END TYPE t_wann
 CONTAINS
-   function calc_nsp_atom(self) result(nsp) 
+   pure function calc_nsp_atom(self) result(nsp) 
       implicit none
       CLASS(t_atoms),INTENT(IN)      :: self
       INTEGER                        :: nsp
-- 
GitLab