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 :

Fichiers ouverts en lecture


Sujet :

Fortran

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Candidat au Club
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2007
    Messages : 2
    Par défaut Fichiers ouverts en lecture
    bonjour tous le monde

    je suis nouveau ici mais egalement à Fortran. j'arais besoin de votre aide si possible.

    Je resoud une EDP ( equation aux dérivées partielles ). les solutions doivent ere enregistrées dans plusieurs fichiers. J'ai ecris une routine, qui gener les noms de fichiers, les ouvres, resoud une partie du probleme et ecris les données dans les fichiers deja ouverts. Cetet routine est appele par le programe principal. je vous met le bout de code suivant

    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
    17
    18
    19
    20
    21
    22
    !! generation et ouverture des fichiers
    do count1=1,4*N+7
          write(filename,'(a4,i2.2,a4)') 'datafile',count1,'.dat'
          open(unit=intfiles(count1), file=filename,form='formatted', status='unknown')
      end do
     
     !!ecrire les donnees initiales
     call writedata(time)
     
     !! resolution
     comp0=0
     do while( time.le. tf) 
         call somesolver(deltat)
         time=time+ deltat
         comp0=comp0+1
         call writedata(time) 
      end do
     
       !! fermeture des fichiers
       do count1=1,4*N+7
         close(count1)
      end do
    Le tableau intfiles est un tableau d'entiers declaré avec l'attribut save dans un module et initializé par une autre routine. son role est donc de faire une connexion enre les noms de fichiers et les numeros d'unités.

    Remarquez qu'une routne writedata est chargée d'ecrire dans les fichiers.

    La compilation se passe bien, mais pendant l'execution, j'ai une erreur qui me dit que mes fichiers sont ouvert pour lecture, je ne peux donc pas ecrire dedans.

    qu'est ce que vous en pensez

    merci d'avance

  2. #2
    Candidat au Club
    Profil pro
    Inscrit en
    Mars 2007
    Messages
    2
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mars 2007
    Messages : 2
    Par défaut Probleme résolu
    re bonjour

    je m'excuse d'avoir posté mon message precedent avant de diagnostiquer le probleme de facon plus profonde.

    J'estime tout de meme que ce serait bien d'expliquer la nature du probleme pour les autres debutants comme moi.

    En fait le probleme vient du tableau d'unités intfiles. En effet, le sixieme fichier aura comme unité 6. Or fortran attribut ce numero pour l'entree et sortie standard, ' la console on va dire'.

    Une question tout de meme : normalement, on pourrait detourner ce numero, de telel sorte que si on l'attribut à un fichier, il sera automatiquement desaffectée de l'entree sortie standard. ce n'est pas le cas, pourquoi ?


    En fait, le dialogue que je devais avoir avec le prog, ne s'affiche plus sur la console maus dans le fichier datafile06.dat.

    A bientot,

Discussions similaires

  1. Supprimer des lignes d'un fichier ouvert en lecture
    Par virtuadrack dans le forum C
    Réponses: 3
    Dernier message: 10/09/2009, 10h18
  2. Savoir si un fichier a été ouvert en lecture seule
    Par man_coef dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 05/08/2008, 16h09
  3. Comment savoir si un fichier Excel est ouvert en lecture seul
    Par patate5555 dans le forum VBA Access
    Réponses: 2
    Dernier message: 21/06/2007, 13h53
  4. Réponses: 4
    Dernier message: 20/04/2007, 09h06
  5. [webdav] fichier ouvert en lecture seule
    Par Invité dans le forum Autres Logiciels
    Réponses: 4
    Dernier message: 04/12/2006, 09h15

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