Discussion :

[feynman]

Bonjour,
comme j ai su en F.90 les nombres a gauche du program disparaissent (comme 10 continue)
mais il y a une commande ecrite en F.77 que je ne trouve pas jusqu a maintenant son equivalent en f.90 :

Code :

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

1
2
             print 20,(A(i),i=1,10)
20          format('A=',5(F4.1,1X))

alors qq sait quel son equivalent en F.90?
merci pour votre aide

[Sylvain Bergeron]

Bonjour,
comme j ai su en F.90 les nombres a gauche du program disparaissent (comme 10 continue)...

Les étiquettes ne disparaissent pas. C'est juste que la marge de 5 colonnes n'est plus nécessairement là. « 10 continue » est toujours supporté. De façon générale, on n'a plus vraiment besoin d'utiliser d'étiquette et comme c'est plus joli de ne pas en utiliser...

... une commande ecrite en F.77 que je ne trouve pas jusqu a maintenant son equivalent en f.90 :
print 20,(A(i),i=1,10)
20 format('A=',5(F4.1,1X))

alors qq sait quel son equivalent en F.90?
merci pour votre aide

Ton bout de code fonctionne toujours tel quel. En format libre, il pourrait être écrit comme suit :

Code :

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

1
2
print 20,(A(i),i=1,10)
20 format('A=',5(F4.1,1X))

Pour lui donner un look plus f90, tu peux déplacer le format dans le print directement :

Code :

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

print '(''A='',5(F4.1,1X))',(A(i),i=1,10)

ou encore :

Code :

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

print "('A=',5(F4.1,1X))",(A(i),i=1,10)

[feynman]

Ok Sylvain, merci, c'est ce que je voulais savoir.