From cf540bfd521e9b5b9e750f0928b5be3672d3498a Mon Sep 17 00:00:00 2001
From: Lionel GUEZ <guez@lmd.ens.fr>
Date: Thu, 19 Jan 2023 14:56:40 +0100
Subject: [PATCH] Polish
---
Inst_eddies/get_1_outerm.f90 | 12 +++++++-----
1 file changed, 7 insertions(+), 5 deletions(-)
diff --git a/Inst_eddies/get_1_outerm.f90 b/Inst_eddies/get_1_outerm.f90
index 8700e1ba..b2a79f38 100644
--- a/Inst_eddies/get_1_outerm.f90
+++ b/Inst_eddies/get_1_outerm.f90
@@ -8,11 +8,13 @@ contains
innermost_level_2, outside_points, ssh, corner, step)
! This procedure gets one outermost contour, if it can find
- ! one. Method: dichotomy on level of ssh. If the procedure cannot
- ! find an outermost contour, it returns a null ssh_contour. An
- ! outermost contour is not found if, and only if, there is no good
- ! contour at innermost level. If a contour is found then its level
- ! is farther from the extremum than innermost level.
+ ! one. If the procedure cannot find an outermost contour, it
+ ! returns a null ssh_contour. An outermost contour is not found
+ ! if, and only if, there is no good contour at innermost level. If
+ ! a contour is found then its level is farther from the extremum
+ ! than innermost level.
+
+ ! Method: dichotomy on level of ssh.
! The length of the interval of longitudes of the domain, step(1)
! * (size(ssh, 1) - 1), should be < 180 degrees, so that the
--
GitLab