IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Fortran Discussion :

probleme de diffusion


Sujet :

Fortran

  1. #1
    Futur Membre du Club
    Femme Profil pro
    Inscrit en
    Avril 2012
    Messages
    14
    Détails du profil
    Informations personnelles :
    Sexe : Femme

    Informations forums :
    Inscription : Avril 2012
    Messages : 14
    Points : 7
    Points
    7
    Par défaut probleme de diffusion
    salut
    j'ai essayé de faire cette résolution et j'ai une faute
    program tdma
    implicit none
    integer i,j,Nmax,n,k
    parameter (Nmax=200)
    real a(Nmax),b(Nmax),c(Nmax),T0(Nmax),d(Nmax)
    real p(Nmax),Q(Nmax),T(Nmax),TAN(Nmax)
    n=5
    a(1)=100.00
    a(2)=200.00
    a(3)=200.00
    a(4)=200.00
    a(5)=200.00
    b(1)=0.0
    b(2)=0.0
    b(3)=0.0
    b(4)=0.0
    b(5)=0.0
    c(1)=0.0
    c(2)=0.0
    c(3)=0.0
    c(4)=0.0
    c(5)=0.0
    do j=2,5
    T0(j)=150.00
    enddo
    do j=1,
    T0(j)=75.00
    enddo
    do j=1,4
    T0(j-1)=25
    enddo
    do j=2,5
    T0(j+1)=25
    enddo
    d(j)=150.00*T0(j)
    d(j-1)=150.00*T0(j)
    d(j+1)=150.00*T0(j+1)

    svp aidez moi

  2. #2
    Membre habitué Avatar de Grame
    Profil pro
    Inscrit en
    Août 2007
    Messages
    148
    Détails du profil
    Informations personnelles :
    Âge : 68
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations forums :
    Inscription : Août 2007
    Messages : 148
    Points : 192
    Points
    192
    Par défaut
    Bonjour

    En lecture rapide, au moins 2 erreurs.

    Il manque l'indice de fin dans la 2ieme boucle

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    do j=1, 
    T0(j)=75.00
    enddo
    Il manque un end à la fin
    Quand tu postes un (bout de) code, met le entre les balises de code (cliques sur le # dans la barre d'outils) ça nous facilite la lecture.

  3. #3
    Membre habitué Avatar de Grame
    Profil pro
    Inscrit en
    Août 2007
    Messages
    148
    Détails du profil
    Informations personnelles :
    Âge : 68
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations forums :
    Inscription : Août 2007
    Messages : 148
    Points : 192
    Points
    192
    Par défaut
    Autres erreurs :

    - ligne 30 tu affectes une valeur à T0(j-1), soit quand j vaut 1 à T0(0)
    Or le tableau TO est déclaré de 1 à Nmax

    - à la fin, tu affectes des valeurs à d(j), d(j-1), d(j+1). Or à la sortie de la boucle j n'est pas
    défini. Si je ne me trompe, ça dépend du compilateur.

Discussions similaires

  1. [Exchange 2007] Exchange 2007 - Probleme adresse interne et adresse liste de diffusion
    Par lcatm dans le forum Exchange Server
    Réponses: 2
    Dernier message: 01/09/2014, 11h28
  2. Réponses: 1
    Dernier message: 21/11/2013, 16h19
  3. Réponses: 6
    Dernier message: 23/10/2012, 11h05
  4. Probleme de diffuse shader dans un ray tracer
    Par dfrancis750 dans le forum Développement 2D, 3D et Jeux
    Réponses: 8
    Dernier message: 23/08/2009, 22h20
  5. GWT - Probleme de diffusion en mode web
    Par sboober dans le forum GWT et Vaadin
    Réponses: 13
    Dernier message: 24/08/2007, 16h13

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo