diff --git a/src/boundaries.F90 b/src/boundaries.F90
index 58b7563..b62d420 100644
--- a/src/boundaries.F90
+++ b/src/boundaries.F90
@@ -2336,7 +2336,7 @@ module boundaries
     use config       , only : ng, im, ih, ib, ie, ieu                          &
                             , nd, jm, jh, jb, je, jeu                          &
                             , nh, km, kh, kb, ke, keu
-    use interpolation, only : minmod
+    use interpolations, only : minmod
     use variables    , only : nqt
 
     implicit none
@@ -2665,7 +2665,7 @@ module boundaries
                             , zubndry, ng, im, jm, km, ib, ibl, ie, ieu, jb    &
                             , jbl, je, jeu, kb, kbl, ke, keu
     use error        , only : print_warning
-    use interpolation, only : limiter
+    use interpolations, only : limiter
     use variables    , only : nvr, nfl, idn, imx, imy, imz
 #ifdef MHD
     use variables    , only : ibx, iby, ibz
diff --git a/src/interpolation.F90 b/src/interpolation.F90
index 28cbc16..eb6d1d9 100644
--- a/src/interpolation.F90
+++ b/src/interpolation.F90
@@ -21,11 +21,14 @@
 !!
 !!******************************************************************************
 !!
-!! module: INTERPOLATION - subroutines for different kinds of interpolation
+!! module: INTERPOLATIONS
+!!
+!!  This module provides subroutine to interpolate variables and reconstruct
+!!  Riemann states.
 !!
 !!******************************************************************************
 !
-module interpolation
+module interpolations
 
   implicit none
 
@@ -1273,4 +1276,4 @@ module interpolation
 !
 !===============================================================================
 !
-end module
+end module interpolations
diff --git a/src/mesh.F90 b/src/mesh.F90
index 8fc5be4..149f466 100644
--- a/src/mesh.F90
+++ b/src/mesh.F90
@@ -1039,11 +1039,11 @@ module mesh
 !
   subroutine prolong_block(pblock)
 
-    use blocks       , only : block_meta, block_data, nchild
-    use coordinates  , only : ng, nh, in, jn, kn, im, jm, km
-    use coordinates  , only : ib, ie, jb, je, kb, ke
-    use interpolation, only : minmod
-    use variables    , only : nqt
+    use blocks        , only : block_meta, block_data, nchild
+    use coordinates   , only : ng, nh, in, jn, kn, im, jm, km
+    use coordinates   , only : ib, ie, jb, je, kb, ke
+    use interpolations, only : minmod
+    use variables     , only : nqt
 
     implicit none
 
diff --git a/src/scheme.F90 b/src/scheme.F90
index 24dee7c..a5a856b 100644
--- a/src/scheme.F90
+++ b/src/scheme.F90
@@ -605,16 +605,16 @@ module scheme
 !
   subroutine hll(n, h, u, f)
 
-    use interpolation, only : reconstruct
-    use variables    , only : nvr, nfl, nqt
-    use variables    , only : ivx, ivy, ivz
+    use interpolations, only : reconstruct
+    use variables     , only : nvr, nfl, nqt
+    use variables     , only : ivx, ivy, ivz
 #ifdef ADI
-    use variables    , only : ien
+    use variables     , only : ien
 #endif /* ADI */
 #ifdef MHD
-    use variables    , only : ibx, iby, ibz
+    use variables     , only : ibx, iby, ibz
 #ifdef GLM
-    use variables    , only : iph
+    use variables     , only : iph
 #endif /* GLM */
 #endif /* MHD */
 
@@ -734,9 +734,9 @@ module scheme
 !
   subroutine hllc(n, h, u, f)
 
-    use interpolation, only : reconstruct
-    use variables    , only : nvr, nfl, nqt
-    use variables    , only : idn, imx, imy, imz, ien, ivx, ivy, ivz, ipr
+    use interpolations, only : reconstruct
+    use variables     , only : nvr, nfl, nqt
+    use variables     , only : idn, imx, imy, imz, ien, ivx, ivy, ivz, ipr
 
     implicit none
 
@@ -942,12 +942,12 @@ module scheme
 !
   subroutine hlld(n, h, u, f)
 
-    use interpolation, only : reconstruct
-    use variables    , only : nvr, nfl, nqt
-    use variables    , only : idn, imx, imy, imz, ivx, ivy, ivz
-    use variables    , only : ibx, iby, ibz
+    use interpolations, only : reconstruct
+    use variables     , only : nvr, nfl, nqt
+    use variables     , only : idn, imx, imy, imz, ivx, ivy, ivz
+    use variables     , only : ibx, iby, ibz
 #ifdef GLM
-    use variables    , only : iph
+    use variables     , only : iph
 #endif /* GLM */
 
     implicit none
@@ -1193,13 +1193,13 @@ module scheme
 !
   subroutine hlld(n, h, u, f)
 
-    use equations    , only : gamma
-    use interpolation, only : reconstruct
-    use variables    , only : nvr, nfl, nqt
-    use variables    , only : idn, imx, imy, imz, ien, ivx, ivy, ivz, ipr
-    use variables    , only : ibx, iby, ibz
+    use equations     , only : gamma
+    use interpolations, only : reconstruct
+    use variables     , only : nvr, nfl, nqt
+    use variables     , only : idn, imx, imy, imz, ien, ivx, ivy, ivz, ipr
+    use variables     , only : ibx, iby, ibz
 #ifdef GLM
-    use variables    , only : iph
+    use variables     , only : iph
 #endif /* GLM */
 
     implicit none
@@ -1545,17 +1545,17 @@ module scheme
 !
   subroutine roe(n, h, u, f)
 
-    use equations    , only : gamma
-    use interpolation, only : reconstruct
-    use variables    , only : nvr, nfl, nqt
-    use variables    , only : idn, ivx, ivy, ivz
+    use equations     , only : gamma
+    use interpolations, only : reconstruct
+    use variables     , only : nvr, nfl, nqt
+    use variables     , only : idn, ivx, ivy, ivz
 #ifdef ADI
-    use variables    , only : ien, ipr
+    use variables     , only : ien, ipr
 #endif /* ADI */
 #ifdef MHD
-    use variables    , only : ibx, iby, ibz
+    use variables     , only : ibx, iby, ibz
 #ifdef GLM
-    use variables    , only : iph
+    use variables     , only : iph
 #endif /* GLM */
 #endif /* MHD */