Skip to content
Snippets Groups Projects
Commit 13cbe446 authored by Lionel GUEZ's avatar Lionel GUEZ
Browse files

Polish

parent d540a1f3
No related branches found
No related tags found
No related merge requests found
......@@ -1071,7 +1071,9 @@ itération sur les extremums pour trouver les contours et une seconde
itération pour trouver le contour de vitesse maximale. (On reviendrait
ainsi à l'organisation envisagée jusqu'à la commission 8fe2368c.)
L'avantage serait une économie de mémoire vive : on ne stockerait pas
tous les contours dans le snasphot.
tous les contours dans le snasphot. Inversement, il y a un avantage de
souplesse à séparer les deux phases : laisser la voix à d'autres
processus de recherche des contours.
Notons ici :
\begin{align*}
......@@ -1617,14 +1619,18 @@ Algorithme principal :
\STATE appel de set\_all\_speed
\end{algorithmic}
\verb+set_all_contours+ : remplit s\%list\%cont\_list sauf
speed. Conserver tous les bons contours trouvés lors de la recherche
par dichotomie du contour extérieur. Ils serviront lors de la
recherche du contour de vitesse maximale. Trier la liste de contour
\verb+set_all_contours+ : remplit s\%list\%cont\_list sauf la
composante speed. Conserver tous les bons contours trouvés lors de la
recherche par dichotomie du contour extérieur. Ils serviront lors de
la recherche du contour de vitesse maximale. Trier la liste de contour
par ordre de ssh et compléter la liste de contours pour qu'il y ait un
intervalle de ssh maximal entre deux contours successifs. Le projet de
compléter la liste justifie que ce tableau ait une taille fixe au lieu
d'être alloué par \verb+get_1_outerm+.
d'être alloué par \verb+get_1_outerm+. L'idée est de créer une
procédure pour compléter la liste, qui serait appelée après
\verb+get_1_outerm+, à l'intérieur de l'itération sur les extremums,
avant affectation de la liste à une composante du type eddy. La
composante \verb+cont_list+ du type eddy serait allocatable.
\verb+set_all_speed+ : remplit s\%list\%i\_max\_speed,
s\%list\%cont\_list\%speed
......
......@@ -65,8 +65,8 @@ contains
integer, parameter:: n_max_cont = 31
type(ssh_contour) cont_list(n_max_cont)
! Contour list. The outermost contour is element n_cont. The
! contours are in monotonic order of ssh.
! Contour list. The outermost contour is element with subscript
! n_cont. The contours are in monotonic order of ssh.
integer n_cont ! number of good contours found and stored in cont_list
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment