x | x | 0 | x | x | 0 | 0 | 0 | 0 |
x | x | x | x | x | x | 0 | 0 | 0 |
0 | x | x | 0 | x | x | 0 | 0 | 0 |
x | x | 0 | x | x | 0 | x | x | 0 |
x | x | x | x | x | x | x | x | x |
0 | x | x | 0 | x | x | 0 | x | x |
0 | 0 | 0 | x | x | 0 | x | x | 0 |
0 | 0 | 0 | x | x | x | x | x | x |
0 | 0 | 0 | 0 | x | x | 0 | x | x |
pour chaque élément e |
répéter j=1,nn |
répéter i=1,nn |
I=connec(i,e) |
J=connec(j,e) |
si J![]() |
irep = iprofil(J) - (J-I) |
Aglobal(irep) = Aglobal(irep) + Alocal(i,j) |
finsi |
fin répéter |
fin répéter |