Fortran 90

[invite5935b412]

Bonsoir tout le monde ma question est simple , j'ai veux générer une matrice avec les conditions if en faisant apparaître une certaine matrice A , voici la matrice \0.,0.,0.,0.,0.,1.,-1.,0.,0.,-1.,+1.,0.,0.,0.,0.,0\ j'ai essayé de faire un petit programme mais il ne veux pas compiler a cause d'une erreur de syntaxe

DIMENSION A(1:2,1:2),C(1:4,1:4)
	DATA A/1.,-1.,-1.,1/
do 2 i=1,4
do 2 j=1,4    
     	if((i.eq.1).and.(j.eq..1)) C(i,j)=0
        if((i.eq.4).and.(j.eq.4))   C(i,j)=0   
        if((i.lt.4).and.(j.lt.4).and.(i.ge.2).and.(j.ge.2)) C(i,j)=A(i-1,j-1)
															  
	
    2 continue 
do 4 i=1,4
	write(*,*)c(1,i),c(2,i),c(3,i),c(4,i)
    4 continue
    	stop	
	end

j'obtiens rien merci d'avance
-----

[Calvert]

Salut !

Quel est le message du compilateur ? Et serait-il possible de mettre tout le programme ?
En passant, est-ce obligatoire d'utiliser la syntaxe de fortran 77 ?

[invite5935b412]

le code est en entier , je pense que oui il faut respecter, erreur de syntaxe

[invite5935b412]

error FOR3852: syntax error voici l'erreur qui apparaît

[A voir en vidéo sur Futura]

[Calvert]

Un programme en fortran commence par:

program

du coup, le programme n'est pas complet et ne compilera pas.

[invite5935b412]

ça veut pas :/

[Calvert]

Si le code ci-dessus est complet, il ne va pas compiler, puisqu'il est mal écrit. Notamment, il ne commence pas par

program LeNomDeMonProgramme

Il y a ensuite d'autres erreurs. Il vous faut apprendre à comprendre les messages d'erreur du compilateur. Je pense qu'il donne plus d'indications que "error FOR3852: syntax error" (il donne sûrement d'autres messages, ou au moins, indique à quelle ligne il plante).

Remettre le code complet, et on continue !

[invite5935b412]

Oui il indique la ligne if((i.lt.4).and.(j.lt.4).and.( i.ge.2).and.(j.ge.2)) C(i,j)=A(i-1,j-1)

[Calvert]

Remettre le code complet, et on continue !

Chez moi, ça compile, mais le comportement est étonnant, et il y a à mon avis encore plusieurs erreurs.

[invite5935b412]

j'ai réussi a compiler finalement il y'avait un problème dans l’algorithme merci beaucoup