From b7b7725638d5c3c0939837a55da68a5ca7c0670a Mon Sep 17 00:00:00 2001
From: Lionel GUEZ <guez@lmd.ens.fr>
Date: Fri, 28 Jun 2024 18:18:49 +0200
Subject: [PATCH] Polish
---
Inst_eddies/set_max_speed.f90 | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/Inst_eddies/set_max_speed.f90 b/Inst_eddies/set_max_speed.f90
index 263d0e3b..29c4047b 100644
--- a/Inst_eddies/set_max_speed.f90
+++ b/Inst_eddies/set_max_speed.f90
@@ -43,9 +43,10 @@ contains
! speed on speed_cont.
type(ssh_contour), intent(inout):: cont_list(:) ! (n_max_cont)
- ! Contour list. Defined only for subscripts 1:n_cont. On entry,
- ! the outermost contour is element with subscript n_cont. The
- ! contours between 1 and i_outer are in monotonic order of
+ ! Contour list, with points given by longitude and latitude, in
+ ! radians. Defined only for subscripts 1:n_cont. On entry, the
+ ! outermost contour is element with subscript n_cont. The contours
+ ! between 1 and i_outer are in monotonic order of
! ssh. cont_list%area has its default initialization value and the
! order of points in the polyline components (clockwise or
! counter-clockwise) is not specified.
--
GitLab