diff --git a/Overlap/Tests/test_read_eddy.f90 b/Overlap/Tests/test_read_eddy.f90 index 15bfba8bc882bcf55fa183a70bd6413a45cd5a7d..fe234e3ac6720c57ceb45f27cf0ee55ccb808307 100644 --- a/Overlap/Tests/test_read_eddy.f90 +++ b/Overlap/Tests/test_read_eddy.f90 @@ -31,6 +31,7 @@ program test_read_eddy slice = 0, grid_lon_lat = .true.) CALL shpc_close(hshp_in) call write_eddy(e, hshp_out, k, eddy_i) + write(hshp_out%unit, fmt = *) 0 CALL shpc_close(hshp_out) print *, 'Created shapefiles in SHPC.'