From 6a0c3af0354b11b1e896eef4e33263337f23c2aa Mon Sep 17 00:00:00 2001
From: Alfio Lazzaro <alfio.lazzaro@chem.uzh.ch>
Date: Mon, 19 Mar 2018 18:14:32 +0000
Subject: [PATCH] DBCSR: rename hash table files

svn-origin-rev: 18331
---
 .../base/{hash_table.f90 => dbcsr_hash_table.f90}      | 10 +++++-----
 ...hash_table_types.f90 => dbcsr_hash_table_types.f90} |  0
 src/dbcsr/mm/dbcsr_mm_csr.F                            |  4 ++--
 3 files changed, 7 insertions(+), 7 deletions(-)
 rename src/dbcsr/base/{hash_table.f90 => dbcsr_hash_table.f90} (96%)
 rename src/dbcsr/base/{hash_table_types.f90 => dbcsr_hash_table_types.f90} (100%)

diff --git a/src/dbcsr/base/hash_table.f90 b/src/dbcsr/base/dbcsr_hash_table.f90
similarity index 96%
rename from src/dbcsr/base/hash_table.f90
rename to src/dbcsr/base/dbcsr_hash_table.f90
index 8e13df3a67..3518851c6f 100644
--- a/src/dbcsr/base/hash_table.f90
+++ b/src/dbcsr/base/dbcsr_hash_table.f90
@@ -10,7 +10,7 @@
 !> \brief finds a prime equal or larger than i, needed at creation
 !> \param i ...
 !> \return ...
-! *****************************************************************************
+! **************************************************************************************************
   FUNCTION matching_prime(i) RESULT(res)
     INTEGER, INTENT(IN)                      :: i
     INTEGER                                  :: res
@@ -34,7 +34,7 @@
 !>        the hash table will expand as needed (but this requires rehashing)
 !> \param hash_table ...
 !> \param table_size ...
-! *****************************************************************************
+! **************************************************************************************************
   SUBROUTINE hash_table_create(hash_table,table_size)
     TYPE(hash_table_type)                    :: hash_table
     INTEGER, INTENT(IN)                      :: table_size
@@ -56,7 +56,7 @@
 ! *****************************************************************************
 !> \brief ...
 !> \param hash_table ...
-! *****************************************************************************
+! **************************************************************************************************
   SUBROUTINE hash_table_release(hash_table)
     TYPE(hash_table_type)                    :: hash_table
 
@@ -71,7 +71,7 @@
 !> \param hash_table ...
 !> \param c this value is being hashed
 !> \param p this is being stored
-! *****************************************************************************
+! **************************************************************************************************
   RECURSIVE SUBROUTINE hash_table_add(hash_table,c,p)
     TYPE(hash_table_type), INTENT(INOUT)     :: hash_table
     INTEGER, INTENT(IN)                      :: c, p
@@ -123,7 +123,7 @@
 !> \param hash_table ...
 !> \param c ...
 !> \return ...
-! *****************************************************************************
+! **************************************************************************************************
   PURE FUNCTION hash_table_get(hash_table,c) RESULT(p)
     TYPE(hash_table_type), INTENT(IN)        :: hash_table
     INTEGER, INTENT(IN)                      :: c
diff --git a/src/dbcsr/base/hash_table_types.f90 b/src/dbcsr/base/dbcsr_hash_table_types.f90
similarity index 100%
rename from src/dbcsr/base/hash_table_types.f90
rename to src/dbcsr/base/dbcsr_hash_table_types.f90
diff --git a/src/dbcsr/mm/dbcsr_mm_csr.F b/src/dbcsr/mm/dbcsr_mm_csr.F
index 210a5360cf..7fa49467f8 100644
--- a/src/dbcsr/mm/dbcsr_mm_csr.F
+++ b/src/dbcsr/mm/dbcsr_mm_csr.F
@@ -81,7 +81,7 @@ MODULE dbcsr_mm_csr
       TYPE(dbcsr_mm_sched_type)                      :: sched
    END TYPE dbcsr_mm_csr_type
 
-#include "../base/hash_table_types.f90"
+#include "../base/dbcsr_hash_table_types.f90"
 
 ! **************************************************************************************************
    PUBLIC :: dbcsr_mm_csr_type
@@ -983,6 +983,6 @@ CONTAINS
 
    END FUNCTION my_checker_tr
 
-#include "../base/hash_table.f90"
+#include "../base/dbcsr_hash_table.f90"
 
 END MODULE dbcsr_mm_csr