Bonjour,
Je voudrais insérer plusieurs lignes dans une matrice à des indices précis (calculés par mon programme).
Pour cela, j'ai écrit une procédure qui insère une ligne dans une matrice à un certain indice, que j'appelle plusieurs fois. Mais d'une part, ça ne marche pas, et d'autre part, la méthode que j'utilise ne me parait pas efficace du tout.
Voici un extrait de mon code :
Quelqu'un connaît-il une meilleure méthode ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 real, dimension (nbrows,nbcols) :: matrix real, dimension (nbcols) :: row ! row to insert integer :: index ! place to insert row real, dimension (nbrows+1,nbcols) :: res res(1:index,1:nbcols) = matrix(1:index,1:nbcols) res(index+1,1:nbcols) = row(1:nbcols) res(index+2:nbrows+1,1:nbcols) = matrix(index+1:nbrows,1:nbcols)
Merci
Partager