.: Le Fortran :.

Le fortran, dont le nom provient de (FORmula TRANslator), est le premier langage de programmation de haut niveau écrit par John Backus dans la fin des années 1950.

Présenté dès 1954, la version Fortran I est sortie en 1957. Ce langage est toujours utilisé dans les milieux scientifiques des mathématiques, astronomie, etc, car on y trouve des millier de librairies écritent par les chercheurs et étidiants.

Les versions fortran II, III, IV et V puis fortran 66 fortran 77, fortran 90, fortran 95, fortran 2003 et fortran 2008 ont accompagné les étudiants et scientiques sur plusieurs générations !

Index

Edition & compilation
Syntaxe
 Trucs
 Liens

Edition & compilation

Edition

  • Plusieurs versions du fortran circulent encore, mais les fichiers sources sont en principe révélateurs de ces versions avec leur extensions, par exemple: sinus .f ou .for ou sinus f90 ou sinus.f95

    Vous pouvez utiliser votre éditeur préféré tel que vi, nano, joe ou emacs ... En effet on travail souvent en mode console pour ces applications de calcul. 

    
$ joe sinus.f95
    		Voici un exemple d'appel depuis la console pour l'édition du fichier source sinus.f95
    		 
      
  I   sinus2.f95                 Row 13   Col 1   10:27  Ctrl-K H for help


program sinus

  implicit none

  double precision  val = 45.0
  double precision, parameter :: pi = 3.14159265359d0

  print *, 'Sinus de ',val,' = ', sin(val*(pi/180.0))

end program sinus
    		Avec l'éditeur de texte sous console "joe"

    Compilation

  • Pour vos merveilles, pas de problème sous Linux avec "gfortran" 

    
$ gfortran -o sinus sinus.f95

    Exécution

    Vous pouvez exécuter après la compilation votre programmme dans le répertoire de travail . Pour ce faire il suffit de lancer la commande en spécifiant d'où doit être exécuté le programme de la manière suivante : 

    
$ ./sinus
    Si vous souhaitez produire des fichiers objets .o avec les fichiers .f95 par exemple, il suffit de tapper la commande 
    
$ gfortran -c fraction.f95
    le résultat de cet opération donnera un fichier "fraction.o" dans le répertoire.

    Syntaxe

  • Un programme est un module souvent composé de plusieurs modules internes ou externes. 

    
!-prog principal----------------------
program calcul
  ...
  call affiche
  ...
  
contains

!-subroutines--------------------------
  subroutine affiche
    ...
    ...
    return
  end subroutine affiche

!-fonctions-----------------------------
  function sinus(val)
    ...
    ...
  end function sinus

end program calcul
!--------------------------------------

    ..
    ..
    ..
    ..
    ..
    .

    Trucs

  • La déclaration des variables est facultative en Fortran.
    Sans déclaration, les variables sont par défaut de type REAL sauf pour les variables dont le nom commence par une les lettres I, J, K, L, M ou N. Elles sont alors de type INTEGER par défaut.

    
jp@URANUS:~/progra/fortran$ cat var.f95
!
! Travail avec des variables non definies
!
! Jean-Pierre Perroud, mai 2010
!

! debut du programme
program var

! boucle d'ecriture avec i non définit
        do i = 1,5
                print 10,'Valeur de i = ', i
        end do

! assignation de valeur aux variables non definies
        juste = 44
        somme = 12.0

        print 10,'Var juste = ',juste
        print 20,'Var Somme = ',somme

! formats de mise en page
10 format (a,i4)
20 format (a,f4.1)

end program var
! fin du programme

jp@URANUS:~/progra/fortran$

    Ce qui donne en faisant tourner le programme ... 

    
jp@URANUS:~/progra/fortran$ ./var
Valeur de i =    1
Valeur de i =    2
Valeur de i =    3
Valeur de i =    4
Valeur de i =    5
Var juste =   44
Var Somme = 12.0
jp@URANUS:~/progra/fortran$

    On voit bien que la variable "i" qui n'étant pas déninie dans le programme, est bien de type "integer" .
    On note aussi que "juste" qui commence par un "j" est bien aussi de type "integer",
    alors que "Somme" qui n'est pas définie et ne comporte pas une première lettre dans la liste i,j,k,l,m et n est bien un variable de type "real", cqfd !

    En résumé, même si la déclaration des variables n'est pas obligatoitre, je touve plus intéressant de définir toutes celles que nous utiliserons.
    Sur des progammes plus gros, cela simplifie tout de même le debugage de ceux-ci et nous oblige à plus de rigueur.

    Il est a noter que l'on peut modifier la liste des variables implicites en modifiant ou ajutant des définitions. 

    
     implicit real*8 (S)

    Ce qui va donner que toutes les variables utilisées commençant pas "S" seront de type real double précision.

    ..
    ..
    ..

    Liens

    [Home Page][Programmation]

    Jean-Pierre Perroud
    Switzerland
    Dernière mise à jour le 2 juin 2010
    Visiteurs :