diff --git a/base/serial/f77/smmp.f b/base/serial/f77/smmp.f
index 5c055f62..4e8900f1 100644
--- a/base/serial/f77/smmp.f
+++ b/base/serial/f77/smmp.f
@@ -18,7 +18,7 @@ c=======================================================================
      *  index)
       use psb_const_mod
       use psb_realloc_mod
-      use psb_serial_mod, only: psb_msort
+      use psb_sort_mod, only: psb_msort
 c
       integer       ia(*), ja(*), diaga,
      *  ib(*), jb(*), diagb,