diff --git a/Inst_eddies/get_1_outerm.f90 b/Inst_eddies/get_1_outerm.f90 index 8700e1ba1e2e6ad065af9c5e4c7d5a37a4e22be1..b2a79f38a7479ae9f7355ecdd295ae96b34aa59b 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