Discussion :

[Naomé]

Bonjour,
j'ai écris une subroutine de tri pour trier un fichier dans le sens ascendant mais mais quand je fais le build il m'affiche erreur que je ne comprend. voici la subroutine et l'erreur:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
subroutine tri(v,Nym1,c)
	IMPLICIT REAL*8(A-H,O-Z)
	Real*8 v(Nym1),c
 
	do i=1,Nym1
		do j=i+1,Nym1
			if(vi(i).gt.v(j))then
				ccc=v(j)
				v(j)=v(i)
				v(i)=c
			endif
		enddo
	enddo
 	return
end

l'erreur est:unresolved external sumbol subroutinetri@12
je vous pris de m'expliquer cette erreur est du a quoi? et merci

[Naomé]

il y'avait une erreur dans la subroutine que je vous ai donné que je corrige:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
subroutine tri(v,N,c)
 
	IMPLICIT REAL*8(A-H,O-Z)
	Real*8 v(N),c
 
	do i=1,N
		do j=i+1,N
			if(v(i).gt.v(j))then
				c=v(j)
				v(j)=v(i)
				v(i)=c
			endif
		enddo
	enddo
 	return
end

[prgasp77]

Bonjour,
merci de penser à la balise [code]. De plus, il semble que ton problème soit lié non pas à l'aglorithme, mais au langage (qui est ?). Merci de reposer ta question dans le forum approprié.

Un dernier point, les variables qui s'appelle a, i, o, n ... c'est pas génial ...

[souviron34]

mais au langage (qui est ?).

Fortran