diff --git a/Common/CMakeLists.txt b/Common/CMakeLists.txt
index 732cdcce7b1537c0a0b01ed5f2c5db8043eb6b37..f5cf8cfb98591b8e0b07181e67f707aa8330f543 100644
--- a/Common/CMakeLists.txt
+++ b/Common/CMakeLists.txt
@@ -2,34 +2,35 @@ add_subdirectory(Tests)
 target_sources(test_get_1_outerm PRIVATE derived_types.f90 get_slice_dir.f90
   spher_polyline_area.f90 shpc_close.f90)
 target_sources(test_nearby_extr PRIVATE derived_types.f90
-  read_field_indices.f90 shpc_open.f90 shpc_close.f90
+  read_field_indices.f90 ori_slice_open.f90 shpc_close.f90
   get_slice_dir.f90)
 target_sources(test_set_max_speed PRIVATE derived_types.f90 get_slice_dir.f90
-  spher_polyline_area.f90 shpc_open.f90 shpc_close.f90 read_field_indices.f90)
+  spher_polyline_area.f90 ori_slice_open.f90 shpc_close.f90
+  read_field_indices.f90)
 target_sources(test_spher_polyline_area PRIVATE spher_polyline_area.f90)
 target_sources(inst_eddies PRIVATE spher_polyline_area.f90
-  derived_types.f90 shpc_close.f90 shpc_open.f90
+  derived_types.f90 shpc_close.f90 ori_slice_open.f90
   get_slice_dir.f90 read_field_indices.f90)
-target_sources(test_write_null PRIVATE derived_types.f90 shpc_open.f90
+target_sources(test_write_null PRIVATE derived_types.f90 ori_slice_open.f90
   shpc_close.f90 read_field_indices.f90 get_slice_dir.f90)
 target_sources(examine_eddy PRIVATE derived_types.f90 get_slice_dir.f90
   spher_polyline_area.f90 shpc_close.f90)
 
 if(MPI_Fortran_HAVE_F08_MODULE)
   target_sources(test_overlap PRIVATE derived_types.f90 spher_polyline_area.f90
-    read_field_indices.f90 shpc_open.f90 shpc_close.f90 get_slice_dir.f90)
+    read_field_indices.f90 ori_slice_open.f90 shpc_close.f90 get_slice_dir.f90)
   target_sources(test_read_snapshot PRIVATE derived_types.f90
     read_field_indices.f90
-    shpc_open.f90 shpc_close.f90 get_slice_dir.f90)
+    ori_slice_open.f90 shpc_close.f90 get_slice_dir.f90)
   target_sources(test_spher_polygon_area PRIVATE spher_polyline_area.f90)
   target_sources(test_read_eddy PRIVATE derived_types.f90
-    read_field_indices.f90 shpc_open.f90
+    read_field_indices.f90 ori_slice_open.f90
     shpc_close.f90 get_slice_dir.f90)
   target_sources(test_send_recv PRIVATE read_field_indices.f90
-    derived_types.f90 shpc_open.f90 shpc_close.f90 get_slice_dir.f90)
+    derived_types.f90 ori_slice_open.f90 shpc_close.f90 get_slice_dir.f90)
   target_sources(test_get_dispatch_snap PRIVATE read_field_indices.f90
-    derived_types.f90 shpc_open.f90 shpc_close.f90 get_slice_dir.f90)
-  target_sources(eddy_graph PRIVATE shpc_open.f90 shpc_close.f90
+    derived_types.f90 ori_slice_open.f90 shpc_close.f90 get_slice_dir.f90)
+  target_sources(eddy_graph PRIVATE ori_slice_open.f90 shpc_close.f90
     read_field_indices.f90 spher_polyline_area.f90
     derived_types.f90 get_slice_dir.f90)
 endif()
diff --git a/Common/shpc_open.f90 b/Common/ori_slice_open.f90
similarity index 100%
rename from Common/shpc_open.f90
rename to Common/ori_slice_open.f90