From 5ed7bde198a63b5f1d0b185eb43a156a57b8be78 Mon Sep 17 00:00:00 2001 From: Lionel GUEZ <guez@lmd.ens.fr> Date: Fri, 9 Jun 2023 15:30:43 +0200 Subject: [PATCH] Polish --- Inst_eddies/Tests/test_set_max_speed.f90 | 2 -- 1 file changed, 2 deletions(-) diff --git a/Inst_eddies/Tests/test_set_max_speed.f90 b/Inst_eddies/Tests/test_set_max_speed.f90 index a31e2a1a..72354830 100644 --- a/Inst_eddies/Tests/test_set_max_speed.f90 +++ b/Inst_eddies/Tests/test_set_max_speed.f90 @@ -77,8 +77,6 @@ program test_set_max_speed corner_window = corner + (llc - 1) * step e%extr%coord_proj = nint((e%extr%coord - corner) / step) + 1 - ! Define cont_list: - call shp_open_03(hshp, "cont_list", "rb") call shp_get_info_03(hshp, n_cont) call assert(1 <= n_cont, n_cont <= n_max_cont - 1, & -- GitLab