Bonjour ,

Voila l'URL du site ou j'ai pu trouver le compliateur Fortran , tu peux le télecharger , et si tu arrives à l'installer correctement donnes moi des explications.
Merci par avence. URL ci dessous:
http://www.fas.umontreal.ca/biol/casgrain/fr/fortran.html

-----------------------------------------------

Tu peux aussi telecharger le compliateur Fortran de cette ardesse :
http://www.fortran.com/F/compilers.html
Tu click apres sur ce lien : ftp://ftp.swcp.com/pub/walt/F

Mais ATTENTION : au version du système d'exploitation !

Salut ,
Je souhaite reprendre une these dans le domaine de la simulation numerique dont on a souvent la Prog en Fortran ou en C , je programme souvent chez moi donc j'ai besoin d'un compilateur en Fortan sous Wind XP
Voila Merci si tu trouves quelques choses d'interessant ou si tu arrives à installer le comp Fortran 77 ou 90 ou 95 sous win XP

Adnan

Merci Flo_in_da_house, c'est très sympa de ta part !
J'ai pu l'installer, mais je verrai dès que j'execute un programme !

Quand à l'autre adresse que je t'avais donné avant mon premier message sur la liste de discution, regarde si tu arrives à installer ce compilateur car il compile toute version du fortran le 77 , 90 , 95 ...
Le seul problème c'est l'insttalation puisque il te propose trois grand fichier telecherger et puis à mettre correctement dans un repertoire! bon , si tu arrives à l'installer tu me laisses une réponse.
Je te remercie et à bientôt.
Adnan

Bonjour ,
j'ai pu installer le compilateur FORCE, le seul problème c'est que apres compilation et quand je lence l'execution la fenetre qui se trouve et ou quelle je saisie mes doinnées , les resutats ne s'afficheront plus et la fenetre d'execution se ferme automatiquement !!! Que peux je faire ??????????
Dans l'attente Merci !

Bonjour,

Je suis en thèse et travaille en fortran 90, et je peux te dire que ce que as donné comme code, ce n'est pas du fortran 90, paut être du 95, mais pas du f90. un version 90 de ce code serait :
program produit
integer x, y , z
print*,' entrer la valeur de x'
read(*,*) x
print*,' entrer la valeur de y'
read(*,*) y
write(*,100) x,y,x*y
100 format('le produit de ',1e8.3,' par ',1e8.3,' est : ',1e8.3)
end

Par contre si tu compile bien le fortran 95, je te conseille après l'écriture de demander une valeur quelconque ce qui permettra de voir si ta fenetre se ferme uniquemenet parce que ton programme est fini ou bien si c'est parce que tu as un problème plus grave. Ca revient en gros à faire pause.

Nicolas

Salut,

est ce que tu as essayé avec un code tout simple, qui fait qu'afficher le "Hello Word" par exemple.
les pb du type pb de registre peuvent être du à un dépassement de tableau.
Donc reste à savoir s'il te le met tout le temps ou juste sur ton prog

Salut à tous,
J'écris ce mail pour vous faire part d'un prob auquel je me suis confronté il ya à peine un bout de moment: j'ai établi un programme d'extraction d'un certain nombre de paramètre qui se trouvent dans un tableau mais quand je compile, il y a une erreur affichée que je parviens pas à corriger. De ce fait, je suis vraiment bloqué et si quelqu'un peut m'aider à le resoudre, ça me ferait du bien.Merci et le programme et le message d'erreur sont là:
PROGRAM extraction
PARAMETER (nimag=122*48,ndim=50)
IMPLICIT NONE
INTEGER duree_vie(nimag,ndim),taille(nimag,ndim)
INTEGER Tmin(nimag,ndim),Tmoy(nimag,ndim)
REAL vitesse(nimag,ndim),lati(nimag,ndim),long(nimag,ndim)
REAL jourslot(nimag,ndim)
CHARACTER *70 f1,f2
OPEN(10,file='C://USERS/Bureau/P094.3',
status='old',form='formatted')
100 format(a4,i4,i8,2i4,4f8.2)
101 format(4i3,i4,2i7,3i4,f5.1,f6.1,i4,4f7.2,i5,7i4,f5.0,
. i3,2i8,i3,f7.2,f8.3,i12,4i4,2i9)
OPEN(10,file='//Bureau/USERS/dossier/P094.3',
. status='unknown',form='formatted')
READ(10,*)
READ(10,*)
READ(10,*)
READ(10,*)
11 READ(10,100,err=999,end=201) fle,n0,n0t,s0,life,daydeb,dayfin,hdeb,hfin
DO i=1,life
READ(10,101,err=999,end=201) cl1,b1,cl,b,trs,ti,ticu,nbcb,
. Tmin,Tmoy,sig,grad,igrd,daytu,hlocal,lon,lat,
. jcm,icm,jco,ico,jcw,icw,jd,id,km/h,f1,
. if1,if2,if3,nsp,ang,exc,
. ivol,Niam40,Niam60,siz(km2),sizc(km2)
go to 11
201 continue
CLOSE(10)
IF(INT(daytu).ge.jour1.and.INT(daytu).le.jour2)THEN
nim=(INT(daytu)-jour1)*48+NINT( (daytu-INT(daytu))*100)
duree_vie(nimag,ndim)=life
taille(nimag,ndim)=iti
Tmin(nimag,ndim)=Tmin
Tmoy(nimag,ndim)=Tmoy
vitesse(nimag,ndim)=vit
lati(nimag,ndim)=alat
long(nimag,ndim)=alon
jourslot(nimag,ndim)=daytu
END DO
END IF
OPEN(11,file='C:USERS\dossier',
status='old', form='formatted')

WRITE(11,*) 'life iti Tmin Tmoy vit alat alon daytu '

CLOSE(11)
999 PRINT*,'afficher le nom du fichier'

STOP

END PROGRAM extraction
ompiling Fortran...
C:\Documents and Settings\sanghare\Bureau\dossier\file.f
C:\Documents and Settings\sanghare\Bureau\dossier\file.f(34) : Error: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
11 READ(10,100,err=999,end=201)fle,n0,n0t,s0,life,daydeb,dayfin,hdeb,hfin
-------------------------------------------------------------------------------^
Error executing df.exe.

file.obj - 1 error(s), 0 warning(s)

Bonjour Doc nico,
Je suis trés content de constater que vous vous intéressez à la résolution de ce prob;sur ce je vous remercie bien mais ce que vous avez suggéré n'est pas ça car le label du format(100) correspond aux formats des variables qui se trouvent sur la ligne 11 read.
Merci de votre contribution et j'espère bien que vous allez continuer à rechercher avec moi pour que solution puisse être trouvée définitivement.
A bientôt!

Salut!
oui c'est vrai j'ai fait deux open avec le même identificateur ceci n'est rien d'autre une erreur fortuite de copie coller; mais dans le programme source, il n'ya pas ces deux open! quant à la déclaration des variables! quand vous vous remontez tout à fait au début, je l'ai fait: integer, real etc...
Pour ce qui concerne un exemple du fichier de prog , vous le verrez en dessous:
32 5134
cl1 b1 cl b trs ti ticu nbcb Tmin Tmoy sig grad igrd daytu hlocal lon lat jcm icm jco ico jcw icw jd id km/h f1 fusions nsp ang exc ivol Niam40 Niam60 siz(km2) sizc(km2)
==> n0 n0t s0 life daydeb dayfin hdeb hfin

==> 1 1 3 9 167.03 167.11 1.33 5.26
0 -9 1 -1 2 494 1 1 202 208 2.4 2.8 45 167.03 1.33 1.27 12.96 578 146 578 145 570 146 0 0 -1. 0 0 0 0 78.25 0.560 60164 65 0 0 0 10487 21
1 1 1 1 2 436 5 1 -1 -1 -1.0 -1.0 -1 167.04 1.83 1.19 12.75 576 151 575 150 568 151 -3 5 51. 0 0 0 0 71.81 0.628 55691 33 0 0 0 9241 105
1 1 1 1 2 377 9 1 200 208 2.5 3.7 57 167.05 2.32 1.06 12.54 573 156 572 155 565 156 -3 5 51. 0 0 0 0 58.28 0.680 51217 0 0 0 0 7978 190
1 1 1 1 2 441 25 1 -1 -1 -1.0 -1.0 -1 167.06 2.81 0.89 12.50 569 157 568 155 561 157 -5 1 42. 0 0 0 0 78.53 0.692 57530 0 0 0 0 9332 529
1 1 1 1 2 504 40 1 197 208 3.2 4.4 66 167.07 3.30 0.69 12.46 564 158 564 155 556 158 -5 1 42. 0 0 0 0 90.00 0.623 63842 0 0 0 0 10665 846
1 1 1 1 2 581 22 2 -1 -1 -1.0 -1.0 -1 167.08 3.78 0.52 12.37 560 160 560 158 550 160 -4 2 39. 0 0 0 0 87.14 0.733 76977 0 0 0 0 12283 465
1 1 1 1 2 658 4 3 202 208 2.4 4.7 55 167.09 4.27 0.35 12.33 556 161 555 161 544 161 -4 2 39. 0 0 0 0 81.24 0.828 90111 0 0 0 0 13898 84
1 1 1 1 2 572 2 2 -1 -1 -1.0 -1.0 -1 167.10 4.77 0.27 12.41 554 159 553 160 544 159 -3 -2 29. 0 0 0 0 -89.06 0.733 60192 0 0 0 0 12085 42
1 1 1 1 2 485 0 0 206 211 1.5 0.9 9 167.11 5.26 0.15 12.50 551 157 551 158 543 157 -3 -2 29. 0 0 0 0 -84.61 0.619 30273 0 0 0 0 10253 0
==> 1 2 3 9 167.27 167.35 14.21 18.13
0 -9 1 0 2 244 0 0 203 210 2.1 3.6 91 167.27 14.21 14.41 11.65 890 179 891 178 886 179 0 0 -2. 0 0 0 0 78.58 0.639 24122 0 0 0 0 5439 0
1 1 1 1 2 368 2 1 -1 -1 -1.0 -1.0 -1 167.28 14.70 14.28 11.60 887 180 888 179 880 180 -3 1 30. 0 0 0 0 -85.69 0.653 37563 0 0 0 0 8193 44
1 1 1 1 2 492 4 2 200 209 2.8 1.7 69 167.29 15.19 14.15 11.56 884 181 884 179 874 181 -3 1 30. 0 0 0 0 -79.52 0.631 51003 0 0 0 0 10938 88
1 1 1 1 2 585 24 2 -1 -1 -1.0 -1.0 -1 167.30 15.69 14.17 11.26 885 188 883 185 875 188 1 7 66. 0 0 0 0 57.35 0.578 68161 0 0 0 0 12980 532
1 1 1 1 2 678 43 1 197 208 3.1 3.0 46 167.31 16.19 14.16 10.97 885 195 882 191 875 195 1 7 66. 0 0 0 0 48.73 0.341 85319 0 0 0 0 15013 952
1 1 1 1 2 777 23 2 -1 -1 -1.0 -1.0 -1 167.32 16.69 14.07 10.88 883 197 880 193 873 197 -2 2 27. 0 0 0 0 45.00 0.322 91434 0 0 0 0 17184 508
1 1 1 1 2 876 3 2 202 209 2.6 2.2 35 167.33 17.18 13.97 10.80 881 199 878 195 870 199 -2 2 27. 0 0 0 0 42.44 0.300 97549 0 0 0 0 19350 66
1 1 1 1 6 681 15 2 -1 -1 -1.0 -1.0 -1 167.34 17.65 13.55 10.96 871 195 871 193 862 195 -10 -5 103. 0 0 0 0 40.03 0.311 74870 0 0 0 0 15016 330
1 1 1 1 6 485 26 2 197 209 3.4 3.8 62 167.35 18.13 13.13 11.17 861 190 864 191 853 190 -10 -5 103. 0 0 0 0 36.03 0.314 52190 0 0 0 0 10675 572
==> 1 3 3 3 167.42 167.44 21.58 22.57