je viens de faire mon premier programme en fortran, je dois simuler une croissance d'agregats.
voici la partie qui ne fonctionne pas, et je n'arrivepas à comprendre pourquoi.
merci de votre aide
c=rand()
if (c.lt.0.25) then
x=x+1
if (x.gt.N)
x=x-N
endif
y=y
else if (c.lt.0.5) then
x=x
y=mod(y+1,N)
if (y.gt.N)
y=y-N
endif
else if (c.lt.0.75) then
x=mod(x-1,N)
y=y
if (x.lt.1)
x=x+N
endif
else
x=x
y=mod(y-1,N)
if (y.lt.1)
y=y+N
endif
endif