Salut,


INTEGER FUNCTION nb_voisins_vivants(i,j,G)
INTEGER, DIMENSION(:,:),INTENT(INOUT) :: G
INTEGER, INTENT(INOUT) :: i,j
INTEGER :: s=0, f, jbis,z,a,b


En FORTRAN 90, s est une variable...