Bonjour à tous,

Je dois transcrire des subroutines de fortran en Delphi. Tous va bien sauf une que je ne comprends pas, En voici une partie que je ne comprends pas :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
*
*      ************************
*      * minver : inverse of a matrix *
*      ************************
*
       SUBROUTINE MINVER(A,N,D,L,M)
C
       IMPLICIT DOUBLE PRECISION (Z-H, O-Z)
       DIMENSION A(N*N),L(N),M(N)
C
      D=1.
      NK=-N
      DO 80 K=1,N
      NK=NK+N
      L(K)=K
      M(K)=K
      KK=NK+K
      BIGA=A(KK)
...
la variable A est un tableau de deux dimensions passer un paramètre, donc c'est quoi BIGA=A(KK), il manque une dimension ou elle est traité autrement. Si quelqu'un à une idéee ? Je dois transcrire cette subroutine assez rapidement, c'est le département d'ingénierie qui attends après cette réponse pour un calcule important.

Merci