Move `write_snapshot.f90` to `save_snapshot.f90`

Move `Common/write_snapshot.f90` to `Overlap/Tests/save_snapshot.f90`.

Common/CMakeLists.txt

@@ -24,7 +24,7 @@ if(MPI_Fortran_HAVE_F08_MODULE)
     shpc_open.f90 shpc_close.f90)
   target_sources(test_read_snapshot PRIVATE derived_types.f90 shpc_create.f90
     read_snapshot.f90 write_eddy.f90 read_eddy.f90 read_field_indices.f90
-    shpc_open.f90 shpc_close.f90 write_snapshot.f90)
+    shpc_open.f90 shpc_close.f90)
   target_sources(test_spher_polygon_area PRIVATE spher_polyline_area.f90)
   target_sources(test_weight PRIVATE derived_types.f90)
   target_sources(test_read_eddy PRIVATE derived_types.f90 shpc_create.f90
@@ -32,10 +32,10 @@ if(MPI_Fortran_HAVE_F08_MODULE)
     shpc_close.f90)
   target_sources(test_send_recv PRIVATE read_field_indices.f90
     read_snapshot.f90 write_eddy.f90 shpc_create.f90 read_eddy.f90
-    derived_types.f90 shpc_open.f90 shpc_close.f90 write_snapshot.f90)
+    derived_types.f90 shpc_open.f90 shpc_close.f90)
   target_sources(test_get_dispatch_snap PRIVATE read_field_indices.f90
     read_snapshot.f90 shpc_create.f90 write_eddy.f90 read_eddy.f90
-    derived_types.f90 shpc_open.f90 shpc_close.f90 write_snapshot.f90)
+    derived_types.f90 shpc_open.f90 shpc_close.f90)
   target_sources(eddy_graph PRIVATE shpc_open.f90 shpc_close.f90
     read_field_indices.f90 read_snapshot.f90 spher_polyline_area.f90
     read_eddy.f90 write_eddy.f90 derived_types.f90)

Overlap/Tests/CMakeLists.txt

@@ -4,7 +4,7 @@ target_link_libraries(test_overlap Shapelib_03::shapelib_03 Geometry::geometry
   Contour_531::contour_531 gpc_f Jumble::jumble Numer_Rec_95::numer_rec_95)
 
 # test_read_snapshot
-add_executable(test_read_snapshot test_read_snapshot.f90)
+add_executable(test_read_snapshot test_read_snapshot.f90 save_snapshot.f90)
 target_link_libraries(test_read_snapshot NetCDF95::netcdf95
   Shapelib_03::shapelib_03 Contour_531::contour_531 gpc_f
   Jumble::jumble NetCDF_Fortran::netcdff Numer_Rec_95::numer_rec_95)
@@ -25,14 +25,15 @@ target_link_libraries(test_read_eddy Shapelib_03::shapelib_03
   Contour_531::contour_531 gpc_f Jumble::jumble)
 
 # test_send_recv
-add_executable(test_send_recv test_send_recv.f90)
+add_executable(test_send_recv test_send_recv.f90 save_snapshot.f90)
 target_link_libraries(test_send_recv PRIVATE MPI::MPI_Fortran
   Shapelib_03::shapelib_03 EZMPI::ezmpi Contour_531::contour_531 gpc_f
   NetCDF95::netcdf95 Jumble::jumble NetCDF_Fortran::netcdff
   Numer_Rec_95::numer_rec_95)
 
 # test_get_dispatch_snap
-add_executable(test_get_dispatch_snap test_get_dispatch_snap.f90)
+add_executable(test_get_dispatch_snap test_get_dispatch_snap.f90
+  save_snapshot.f90)
 target_link_libraries(test_get_dispatch_snap Shapelib_03::shapelib_03
   Jumble::jumble Contour_531::contour_531 EZMPI::ezmpi NetCDF95::netcdf95
   gpc_f NetCDF_Fortran::netcdff MPI::MPI_Fortran Numer_Rec_95::numer_rec_95)