erreur de compilation : (unit=6, file='stdout')

Version imprimable

Bonjour,

Pour faire court je met le code et l'erreur que le compilateur m'affiche.
Merci d'avance pour votre aide !!:ccool:
Code:

1 2 3 4 5 6 7 8 9 10 11 do i=2,n-1 som=som+points_fonc(i) end DO resultat_t=h*(points_fonc(1)+2*som+points_fonc(n)) !! Formule d'approximation de l'intégrale de la fonction définie par les points entrées sur l'intervalle [a,b] par la méthode des trapèzes Write(*,*) Write (*,"(' L''estimation de l''integrale sur l''intervalle [a,b] vaut : ')")resultat_t END subroutine resultat_trap
ERREUR :

At line 71 of file Méthode_trapeze.f90 (unit = 6, file = 'stdout')
Fortran runtime error: Insufficient data descriptors in format after reversion

Dernière précision : Le programme compile mais quand je demande d'afficher resultat_t il arrête le programme et affiche cette erreur.

12/05/2011, 09h32
Marlan

Citation:

Write (*,"(' L''estimation de l''integrale sur l''intervalle [a,b] vaut : ')")resultat_t

Si je ne m'abuse, tu es entrain de lui preciser un format: (' L''estimation de l''integrale sur l''intervalle [a,b] vaut : ') ce qui n'existe pas.

Essayes avec:

Citation:

Write (*,*)' L''estimation de l''integrale sur l''intervalle [a,b] vaut : ',resultat_t

En effet, le second nombre de la fonction WRITE est normalement reserve au format d'affichage l'* correspondant au format par defaut de ta variable.

Pour plus d'informations sur les formats:

http://www.developpez.net/forums/d10...t-sous-ubuntu/

Citation:
Envoyé par usag1e
Code:

1 2 3 4 5 6 7 8 9 10 11 do i=2,n-1 som=som+points_fonc(i) end DO resultat_t=h*(points_fonc(1)+2*som+points_fonc(n)) !! Formule d'approximation de l'intégrale de la fonction définie par les points entrées sur l'intervalle [a,b] par la méthode des trapèzes Write(*,*) Write (*,"(' L''estimation de l''integrale sur l''intervalle [a,b] vaut : ')")resultat_t END subroutine resultat_trap
ERREUR :

At line 71 of file Méthode_trapeze.f90 (unit = 6, file = 'stdout')
Fortran runtime error: Insufficient data descriptors in format after reversion
Contrairement à ce que dit Marlan, le problème est que le format ne prévoit pas masque pour la variable resultat_trap. Ton format ne prévoit que l'impression du texte qu'il contient. Tu dois utiliser la stratégie de Marlan avec le format libre pour imprimer une chaine de caractères et une variable numérique, ou ajouter un masque pour resultat_trap dans le format, comme suit :
Code:

1 2 Write (*,"(' L''estimation de l''integrale sur l''intervalle [a,b] vaut : ',f0.4)")resultat_t
Dans une situation comme celle-ci, la méthode du format libre (*) est la plus intéresssante.