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 :

Ecriture de formats


Sujet :

Fortran

  1. #1
    Membre régulier
    Homme Profil pro
    Inscrit en
    Juillet 2006
    Messages
    79
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations forums :
    Inscription : Juillet 2006
    Messages : 79
    Points : 89
    Points
    89
    Par défaut Ecriture de formats
    Bonjour,

    je souhaite écrire un format de lecture dans mon programme : basiquement je fait une écriture du genre :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    program
    implicit none
    character(len=20)::Fmt
    integer::Long,QQchose
     
    Long=6
     
    write(Fmt,'(''(1x,i'',i1,'')'')')Long
     !ensuite on utilise  ce format
    read(*,Fmt)QQchose
    Dans la pupart des cas, une lecture libre (du type) :
    serait plus appropriée.

    Mon idée serait donc d'écrire "*" dans FMT si une lecture libre est plus appropriée et un format plus complexe dans les autres cas.

    Avez-vous des idées pour réussir ceci ?

    Par avance merci

  2. #2
    Modérateur

    Profil pro
    Inscrit en
    Août 2006
    Messages
    974
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations forums :
    Inscription : Août 2006
    Messages : 974
    Points : 1 346
    Points
    1 346
    Par défaut
    Il n'est pas possible de définir une lecture list-directed (libre) à partir d'un format. Tu devras donc prévoir explicitement les 2 cas :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    ...
    if (condition) then
       write(Fmt,...)
       read(*,Fmt) ....
    else
       read(*,*) ...

  3. #3
    Membre régulier
    Homme Profil pro
    Inscrit en
    Juillet 2006
    Messages
    79
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations forums :
    Inscription : Juillet 2006
    Messages : 79
    Points : 89
    Points
    89
    Par défaut Format de lecture
    Merci pour la réponse...bon effectivement ce n'est pas la réponse que j'aurai aimé avoir mais bon !

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2010] Ecriture au format monétaire
    Par grisan29 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 19/01/2013, 16h14
  2. Appli ecriture en format DXF
    Par VITALTH dans le forum Débuter
    Réponses: 0
    Dernier message: 05/07/2011, 17h51
  3. ecriture en format special dans un fichier
    Par DJEcalcul dans le forum MATLAB
    Réponses: 8
    Dernier message: 23/02/2011, 12h14
  4. Ecriture d'un label ou textout en format exposant
    Par jamescook dans le forum C++Builder
    Réponses: 1
    Dernier message: 30/01/2007, 01h20
  5. Format d'ecriture en C
    Par Pef74 dans le forum C
    Réponses: 2
    Dernier message: 25/12/2005, 20h43

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