diff --git a/Common/read_snapshot.f90 b/Common/read_snapshot.f90
index 6f7f620db92f4642147cdac7a34cadd593291135..06a3079ea97a29fd8a1951ed007b7d9ba26d1bbd 100644
--- a/Common/read_snapshot.f90
+++ b/Common/read_snapshot.f90
@@ -39,7 +39,11 @@ contains
 
     !---------------------------------------------------------------------
 
-    call hunt([hshp%d0, huge(0)], k, i_shpc)
+    if (size(hshp) == 1) then
+       i_shpc = 1
+    else
+       call hunt([hshp%d0, huge(0)], k, i_shpc)
+    end if
 
     if (k == hshp(i_shpc)%d0) then
        ishape_first = 0