Bonjour
je cherche à trier une matrice à 3 colonnes et vraiment plein de lignes d'abord suivant la 2ème colonne, puis suivant la 3ème.
Malheureusement je n'arrive pas à faire ma 2ème boucle
Trier une colonne et permuter les lignes en conséquence c'est ok, j'ai réussi
mais trier ensuite la 3ème colonne IMPOSSIBLE.
Voici le bout de code que j'utilise pour trier ma colonne 2
Est-ce quelqu'un peut m'aider à trier maintenant ma colonne 3 ???
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 do tri_termine1=.true. do i=1,ligne-1 if (mat(i+1,2)<mat(i,2)) then tri_termine1=.false. do j=1,3 mat(i:i+1,j)=mat(i+1:i:-1,j) end do end if end do if (tri_termine1) exit end do
Merci beaucoup
Partager