Instead of corner.

Pass `extr%coord_proj` instead of `extr%coord` to `get_1_outerm`,
avoiding a repeated computation of `extr%coord_proj`.

Rename `coord_extr` to `extr_coord` and `coord_extr_proj` to
`extr_coord_proj`, to have the same names as in procedure
`set_max_speed`.

Make `cont_list` a polyline and `cont_list_proj` an SSH contour,
instead of vice-versa. The motivation is clarity in `get_1_outerm`: we
only define `cont_list` at the end.

Because we may drop all the contours, if the area is not large enough,
or some of the contours, if `n_cont == n_max_cont-1`, convert to
longitude and latitude only when we are are sure it is useful.

Lionel GUEZ authored 9 months ago and GUEZ Lionel committed 8 months ago

Transmit `cont_list_proj` from `get_1_outerm` to `set_max_speed`.

Lionel GUEZ authored 9 months ago and GUEZ Lionel committed 8 months ago

This is equivalent for a return value of `good_contour`. It is a
little faster to test a logical value, maybe.

Lionel GUEZ authored 9 months ago and GUEZ Lionel committed 8 months ago

Do not orient nor compute the area of `cont_list(n_cont)`. When the
area is too small, then we have one more copy than before, of
`cont_list(n_cont)` to `out_cont`, but, on the other hand, we have one
less call to `ccw_orient` than before. So this change should not
impact performance. Note that the orientation and area of
`cont_list(n_cont)` were not used after `get_1_outerm`.

Preparing to keep `cont_list` in projection coordinates.

Lionel GUEZ authored 9 months ago and GUEZ Lionel committed 8 months ago

Procedure `good_contour` now takes input in projection coordinates and
returns a contour in projection coordinates. The dummy argument step
of `good_contour` is thus removed.

It is `min_area` that we need in the code, in `get_1_outerm`. Instead
of computing it in the main program and trickling it down to
`get_1_outerm`, define it in `config_m`.

Follow commit d540a1f3.

This avoids copying `cont_list(n_cont)` to `out_cont` if it has
insufficient area.

Add dummy arguments `cont_list` and `n_cont` to `get_1_outerm`.

Because we are going to add another intent out argument.

Keep the good contours found when looking for the outermost contour,
subject to a maximum of `n_max_cont` contours. The idea is to use them
later when looking for the maximum-speed contour. Inside function
`get_1_outerm`, we temporarily store the good contours in a local
explicit-shape array, `cont_list`.

Rename dummy argument `innermost_level` to `innermost_level_2`.