Fortran

Fortran () est un langage de programmation généraliste dont le domaine de prédilection est le calcul scientifique et le calcul numérique. Il est utilisé aussi bien sur ordinateur personnel que sur les superordinateurs, où il sert d'ailleurs à tester leurs performances dans le cadre du classement TOP500 des superordinateurs les plus puissants au monde, entre autres grâce à la bibliothèque LINPACK.

Le nombre de bibliothèques scientifiques écrites en Fortran, éprouvées et améliorées pendant de longues années, et les efforts continus consacrés aux compilateurs pour exploiter au fil des décennies les nouvelles possibilités des calculateurs (vectorisation, coprocesseurs, parallélisme) ont maintenu l'usage de ce langage qui ne cesse d'évoluer.

Parmi les fonctionnalités ajoutées ces dernières décennies, on citera le calcul sur les tableaux (qui peuvent comporter jusqu'à quinze dimensions), la programmation modulaire, la programmation générique (Fortran 90), le calcul haute performance (Fortran 95), la programmation orientée objet et l'interopérabilité avec les bibliothèques du langage C (Fortran 2003), la programmation concurrente et le calcul parallèle à l'aide des cotableaux (Fortran 2008), des équipes, des évènements et des sous-routines collectives (Fortran 2018), en plus des interfaces OpenMP, OpenACC et de la bibliothèque Message Passing Interface. La prochaine norme sera Fortran 2023. Les discussions sur le contenu de la suivante, Fortran 202y, ont commencé.

Historique et versions 

Projet lancé en 1954 et aboutissant à une première version en 1957, Fortran est le premier langage de programmation de haut niveau, suivi notamment par Lisp (1958), Algol (1958) et COBOL (1959). Il est le premier langage à être normalisé, au milieu des années 60, et est devenu une norme ISO depuis Fortran 90.

Le nom du langage est généralement écrit en majuscules (FORTRAN) pour désigner les versions du langage antérieures à la norme Fortran 90 car à l'époque les lettres minuscules ne font pas partie du jeu de caractères du langage. Par contre, il est toujours écrit avec une majuscule à partir de Fortran 90. Enfin, depuis environ 2010 les titres des livres en anglais utilisent souvent l'expression modern Fortran (Fortran moderne) pour distinguer la forme actuelle du langage de ses formes historiques.

Période classique du Fortran 
1953 : John Backus, jeune ingénieur titulaire d'une maîtrise de mathématiques recruté en 1950 chez IBM, développe pour l'IBM 701 le système Speedcoding, un interpréteur qui facilite la programmation en particulier pour le calcul en virgule flottante. En décembre, il rédige une lettre à l'attention de son supérieur  pour lui proposer le projet FORTRAN destiné à l'IBM 704. L'objectif est d'accélérer considérablement le développement et le débogage des programmes, jusqu'alors écrits en langage machine, afin de réduire leur coût d'exploitation, qui pour moitié provient des salaires des informaticiens et pour moitié des machines. Backus insiste pour que l'IBM 704 devienne le première machine commerciale dont le processeur supporte directement les nombres en virgule flottante.
1954 : le groupe de recherche de Backus, le « Programming Research Group » basé à New York, rédige un rapport intitulé Preliminary Report, Specifications for the IBM Mathematical FORmula TRANslating System, FORTRAN, daté du 10 novembre 1954. Il faut encore deux ans d'efforts pour terminer le premier compilateur FORTRAN ( lignes), désigné alors par le mot anglais translator (traducteur). Dès le départ, ce compilateur est conçu pour fournir un code très optimisé, en particulier pour le calcul sur les tableaux et le traitement des boucles imbriquées, quasiment aussi rapide que celui qu'aurait écrit un programmeur en langage machine (objectif alors accueilli avec scepticisme par les clients d'IBM). D'après Backus lui-même, le développement du langage ne peut pas être séparé de la conception du compilateur et c'est même sur le compilateur que porte l'essentiel de l'effort initial. Le langage est défini au fur et à mesure, avec comme guide principal la simplicité de la syntaxe.
1957 : le compilateur FORTRAN est déployé courant avril sur tous les IBM 704, sur bande magnétique, avec son manuel intitulé Preliminary Operator's Manual. Fin 1957, un manuel plus complet, le Programmer's Primer rédigé par Grace E. Mitchell, est édité. FORTRAN est un succès et une révolution car il n'est plus nécessaire d'être un expert de l'ordinateur pour écrire et déboguer des programmes. Mary Tsingou, physicienne et mathématicienne au Los Alamos National Laboratory et qui travailla avec Fermi, Pasta et Ulam, dira ainsi : « Quand le Fortran est arrivé, c'était presque comme le paradis ». D'après la revue Nature (2021), ce compilateur fait partie des dix codes informatiques ayant le plus marqué la science. L'instruction GO TO permet de sauter à une ligne numérotée par une étiquette. Le IF de cette première version est arithmétique : IF (A-B) 10, 20, 30 permet de sauter aux instructions d'étiquettes 10, 20 ou 30 selon que l'expression A-B est négative, nulle ou positive.
 1958 : FORTRAN II apporte les fonctions FUNCTION et les sous-programmes SUBROUTINE que l’on appelle par l’instruction CALL, ce qui permet aux programmeurs de se répartir plus facilement le travail. L'instruction COMMON permet à plusieurs sous-programmes de partager des données communes. Le nouveau compilateur est également plus rapide que le compilateur Fortran I : il permet en particulier de découper un long programme en plusieurs parties pouvant être compilées indépendamment.
 1959 : FORTRAN III n'est déployé que sur une vingtaine de machines. Il est possible d'insérer des routines en langage assembleur symbolique dans le code mais cette fonctionnalité sera abandonnée car elle compromettrait la portabilité des programmes écrits en FORTRAN. Le groupe de Backus n'est plus chargé du développement du FORTRAN, activité transférée à lApplied Programming Department. Backus préconise le développement de deux compilateurs : un compilateur rapide pour la phase de débogage et un compilateur optimiseur pour le programme final. Mais l'idée n'est pas suivie.
1960 : FORTRAN devient l'un des premiers langages multi-plateforme, des compilateurs devenant disponibles sur quelques machines d'autres constructeurs qu'IBM.
 1962 : FORTRAN IV introduit les nombres réels double précision, les complexes et les booléens, ainsi que les opérateurs .AND., .OR. et .NOT.. Le IF logique permet d'écrire par exemple IF (A .GE. B) GOTO 10 (aller à 10 si A est supérieur ou égal à B). Le type des variables peut désormais être déclaré explicitement. Il est nécessaire de modifier les programmes écrits en FORTRAN II : le traducteur automatique SIFT (SHARE Internal FORTRAN Translator) est mis à disposition. Cette même année, chaque compilateur apportant ses extensions et variantes, un comité des normes FORTRAN est formé afin de normaliser le langage pour qu'il soit portable d'une machine à l'autre.
 1965 : ECMA-9 FORTRAN est la première norme FORTRAN, publiée en avril 1965 par l'ECMA (European Computer Manufacturers Association) dans le cadre d'une collaboration avec l'ANSI (American National Standards Institute). Il s'agit en fait d'une version du langage intermédiaire entre les deux niveaux du langage définis dans la norme FORTRAN 66.
 1966 : FORTRAN 66 (ANSI X3.9-1966) est la norme développée par l'ANSI, essentiellement basée sur FORTRAN IV. Elle définit en fait deux niveaux du langage : le FORTRAN proprement dit et une version simplifiée, le Basic FORTRAN. Le langage FORTRAN est le premier langage de programmation à avoir été normalisé.
1972 : l'ISO publie l'''ISO Recommendation for Fortran (R1539), constituée des deux niveaux du langage définis dans FORTRAN 66 et du niveau intermédiaire défini par l'ECMA FORTRAN. Mais il ne s'agit que d'une recommandation et il faudra attendre Fortran 90 pour que le langage devienne une norme ISO.
1977 : John Backus reçoit le Prix Turing pour « ses contributions profondes, influentes et durables à la conception de systèmes de programmation pratiques de haut niveau, notamment par ses travaux sur le FORTRAN, et pour ses publications pionnières sur les procédures formelles pour la spécification des langages de programmation. »
 1978 : FORTRAN 77 (ANSI X3.9-1978) est une évolution majeure. Comme pour FORTRAN 66, la norme définit deux niveaux du langage : le FORTRAN complet, ou full language, et une version simplifiée, ou subset language. Cette norme inclut en particulier des extensions au langage introduites par les différents compilateurs depuis FORTRAN 66. Elle apporte, entre autres améliorations, la programmation structurée avec les blocs IF / THEN / ELSE / END IF, le type de données CHARACTER en remplacement des  (qui sont supprimées de la norme), les fonctions LGE, LGT, LLE, LLT pour la comparaison des chaînes de caractères, l'attribut PARAMETER pour déclarer des constantes, l'attribut SAVE pour la persistance des variables locales, etc. Fin 1978, l'extension MIL-STD-1753 du département de la Défense américain introduit entre autres le END DO en FORTRAN 77 (bien que le label final reste obligatoire), les blocks DO WHILE / END DO, l'instruction INCLUDE, l'instruction IMPLICIT NONE et des fonctions pour manipuler les bits des entiers.

 Fortran moderne 
 1991 : Fortran 90 (ISO/IEC 1539:1991, puis ANSI X3.198-1992) est une version majeure ayant pour objectif de mettre Fortran au niveau des autres langages modernes. La norme apporte en particulier les modules, la récursivité, les arguments optionnels et nommés, la surcharge des opérateurs, une syntaxe pour le calcul sur les tableaux, l'allocation dynamique des tableaux grâce à l'attribut ALLOCATABLE, les types dérivés, l'attribut POINTER, l'instruction IMPLICIT NONE pour rendre obligatoire la déclaration des variables, les structures de contrôle SELECT CASE, les procédures SYSTEM_CLOCK et DATE_AND_TIME pour accéder à l'horloge du système, etc. Les restrictions concernant la mise en forme des programmes (colonnes 1 à 72) disparaissent : l'écriture se fait en format libre. Afin de rester compatible avec les nombreux codes industriels écrits en FORTRAN (Nastran, bibliothèques NAG et IMSL, etc.), Fortran 90 est conçu de telle façon que FORTRAN 77 en constitue un sous-ensemble.
 1992 : IEEE 1003.9-1992, volet FORTRAN 77 de la norme POSIX.
 1994 : ISO/IEC 1539-2:1994, qui définit des chaînes de caractères de longueur variable. Cette norme a été révisée en 2000.
1997 : Fortran 95 (ISO/CEI 1539-1:1997) : quoique mise à jour mineure, cette norme introduit en particulier les instructions FORALL et WHERE pour le calcul vectoriel, les procédures PURE et ELEMENTAL et rend obsolescentes certaines fonctionnalités telles que les boucles à compteur réel ou l'instruction PAUSE. La procédure CPU_TIME permet de mesurer le temps processeur utilisé par un segment de programme.
 1999 : ISO/IEC 1539-3:1999, qui définit des directives de compilation conditionnelle. Cette norme a été révisée en 2011.
 2004 : Fortran 2003 (ISO/CEI 1539-1:2004) est une révision majeure qui supporte la programmation orientée objet. L'interface avec le langage C est assurée par le module interne ISO_C_BINDING et les mots-clés BIND et VALUE, qui permettent à un programme Fortran d'accéder facilement aux bibliothèques disponibles en C. Les pointeurs de procédure permettent de choisir lors de l'exécution une procédure à exécuter. Les types dérivés sont améliorés, ainsi que les entrées/sorties. On peut désormais gérer les exceptions en calcul flottant de la norme IEEE 754. La norme apporte également la gestion des caractères ISO 10646, base de l'Unicode. L'intégration avec le système d'exploitation est améliorée avec l'introduction des instructions get_command_argument, get_command, et command_argument_count.
 2010 : Fortran 2008 (ISO/CEI 1539-1:2010), initialement pensée comme une révision mineure, introduit finalement les co-tableaux (co-arrays) comme paradigme de programmation parallèle. Les traitements sur ces co-tableaux sont effectués par des images (instances parallèles d'un programme Fortran). Cette norme introduit également les boucles DO CONCURRENT pour la parallélisation des itérations sans interdépendance. Les modules peuvent désormais comporter des sous-modules. Et les structures BLOCK...END BLOCK permettent de déclarer des variables à portée limitée n'importe où à l'intérieur d'une routine. La modularité est améliorée par l'introduction des SUBMODULE. De nouvelles procédures intrinsèques sont introduites pour la gestion des bits. De nouvelles constantes sont ajoutées au module ISO_FORTRAN_ENV, en particulier les KIND des types d'entiers INT8, INT16, INT32, INT64 et de réels REAL32, REAL64, REAL128.
 2018 : Fortran 2018 (ISO/CEI 1539-1:2018), considérée comme une révision mineure, introduit en particulier :
 ISO/IEC TS 29113:2012 Interopérabilité ultérieure de Fortran avec C
 ISO/IEC TS 18508:2015 Caractéristiques parallèles supplémentaires en Fortran : les images peuvent désormais être regroupées en équipes (teams) travaillant sur des tâches différentes. Avec les événements (events), une image peut poster un évènement à destination d'autres images, ou attendre de recevoir un évènement. Les sous-routines collectives (collective subroutines) permettent d'effectuer des tâches simples sur les résultats d'un ensemble d'images, par exemple calculer la somme des valeurs d'une variable dans les différentes images.
 ISO/IEC/IEEE 60559:2011 Systèmes de microprocesseurs — Arithmétique flottante
 2023 : le planning pour la norme Fortran 2023, initialement dénommée Fortran 202x, a démarré en juin 2017. Le document de travail du comité est disponible. La publication de la norme est prévue à l'automne 2023. Il s'agit d'une version mineure qui apporte de nombreuses améliorations à diverses parties du langage. Par exemple, la longueur maximale des lignes de programme passera de 132 à 10000 caractères, et les expressions conditionnelles, reprenant la syntaxe du C, font leur apparition. De nouvelles fonctions facilitent le passage des chaînes de caractères entre C et Fortran. Les boucles DO CONCURRENT peuvent gérer la réduction des variables. Les fonctions SIMPLE sont des fonctions PURE n'accédant à aucune donnée extérieure (à part leurs arguments).

 Gouvernance et communauté 

 Gouvernance 
Fortran fait partie des langages normalisés depuis 1965 et est devenu une norme ISO depuis Fortran 90. La norme Fortran est gérée par le groupe de travail ISO/IEC JTC1/SC22/WG5, généralement simplement appelé WG5 (pour Working Group 5), qui charge le comité Fortran US INCITS PL22.3 (généralement appelé J3, en référence à son ancien nom ANSI X3J3) de développer le langage. Le WG5 est composé d'experts chargés de faire des recommandations pour faire évoluer le langage. Le J3 est composé de fabricants de matériel, d'éditeurs de compilateurs, d'utilisateurs issus aussi bien de l'industrie que du monde académique.

Chaque révision de la norme peut ajouter de nouveaux paradigmes ou fonctionnalités, éventuellement déjà implémentées par les compilateurs sous forme d'extensions au langage, clarifier des points restés ambigus, mais aussi rendre obsolescentes d'anciennes fonctionnalités. En effet, depuis Fortran 90, les normes comportent systématiquement en annexes une liste des fonctionnalités supprimées et une liste des fonctionnalités obsolètes et donc susceptibles d'être supprimées dans une prochaine révision de la norme. Les compilateurs continuent néanmoins généralement de supporter ces fonctionnalités pour assurer la pérennité des codes déjà développés. Enfin, il s'écoule généralement plusieurs années entre la publication d'une nouvelle norme et la prise en charge intégrale de ses nouvelles fonctionnalités dans les compilateurs.

En 1995, le WG5 met en place des rapports techniques de type 2 pour travailler sur des fonctionnalités importantes qui n'auront pas le temps d'être intégrées à la norme en cours de rédaction, mais en constitueront une extension qui pourra être intégrée dans la norme suivante.

En 2019, un dépôt GitHub est créé afin que tous les utilisateurs du langage puissent proposer facilement au comité J3 des évolutions pour les normes futures. Il sert actuellement à proposer des nouveautés pour la norme Fortran 202Y qui succédera à Fortran 2023, comme par exemple l'amélioration de la programmation générique, des valeurs par défaut pour les arguments optionnels, etc.

 Communauté 
En 1955, IBM crée le groupe d'utilisateurs SHARE afin que ses clients puissent échanger entre eux. John Backus y fait des présentations régulières durant le développement du premier compilateur FORTRAN. En avril 1957, des ingénieurs de Westinghouse y rapportent la compilation du premier programme FORTRAN en dehors d'IBM. Alors que le langage se diffuse, un sous-groupe SHARE y est consacré : le FORTRAN Standard Commitee.

En 1970, la British Computer Society crée le Fortran Specialist Group, toujours en activité en 2023, afin de promouvoir le langage, participer à ses évolutions et organiser des échanges entre utilisateurs.

Créé en juillet 1982, le bulletin mensuel FORTRAN Forum a été publié par le SIGPLan (Special Interest Group in Programming Languages) de l'ACM (Association for Computing Machinery) trois fois par an, jusqu'en avril 2020.

Le 29 novembre 1983, un groupe de discussion net.lang.f77 est créé sur  Usenet. Le 7 novembre 1986, il est renommé comp.lang.fortran et est toujours l'un des principaux canaux de communication de la communauté Fortran.

La liste de diffusion comp-fortran-90 est consacrée aux questions concernant le Fortran à partir de la norme Fortran 90. On peut en consulter les archives jusque 1997, mais l'activité y est désormais très réduite avec seulement six messages postés en 2020.

Un groupe Fortran Programmers est créé sur LinkedIn en juillet 2008 et comporte plus de 4700 membres en 2022.

Le site Fortran Wiki est créé en octobre 2008. Il est édité par les utilisateurs du langage et propose de nombreuses ressources.

Début 2020, une nouvelle communauté d'utilisateurs fortran-lang.org est créée afin de fédérer les efforts dans l'écosystème Fortran, sur le modèle de langages plus jeunes. En s'appuyant sur GitHub, elle développe en particulier une bibliothèque standard Fortran (stdlib) similaire à celle du C, un gestionnaire de paquets Fortran (fpm) faisant également office de système de compilation, le compilateur interactif LFortran, ainsi que des tutoriels pour apprendre le Fortran moderne. Certaines pages sont traduites en français. La communauté édite une lettre mensuelle résumant ses activités en cours et diffuse des informations sur Twitter. Une visioconférence mensuelle permet à ses membres de discuter des projets à mener. Son forum Fortran Discourse est devenu un lieu central de discussion pour la communauté Fortran. Les projets de la communauté ont reçu l'aide de cinq étudiants lors du Google Summer of Code 2021 (GSoC 2021), et de même pour le GSoC 2022.

LInternational Fortran Conference (FortranCon) est créée en 2020. Initialement prévue à Zurich début juillet 2020, elle a lieu en visioconférence à cause de la pandémie de Covid-19. La seconde édition, FortranCon 2021, a également lieu en visioconférence les 23 et 24 septembre 2021. Les vidéos des conférences sont disponibles sur la chaîne YouTube FortranCon. La prochaine édition est prévue pour 2023, un rythme d'environ dix-huit mois ayant été choisi.

 Applications 

Fortran est toujours l'un des langages les plus utilisés pour le calcul intensif, que ce soit pour l'astronomie, la modélisation climatique, la modélisation chimique, la modélisation en économie, la mécanique des fluides numérique, la physique numérique, l'analyse de données, la modélisation hydrologique, l'algèbre linéaire numérique et les bibliothèques numériques (LAPACK, IMSL et NAG), l'optimisation, la simulation de satellites, l'ingénierie des structures et les prévisions météorologiques. Les calculs peuvent aussi bien être réalisés sur des ordinateurs de bureau que sur des supercalculateurs.

De nombreux tests de performance (benchmarks) destinés à évaluer les performances des nouveaux microprocesseurs sont écrits en Fortran.

Les logiciels des sondes Voyager 1 et Voyager 2 de la NASA ont été écrits à l'origine en FORTRAN 5, puis portés en FORTRAN 77. Depuis le 25 septembre 2013, certains logiciels sont encore écrits en Fortran et d'autres ont été portés en C.

 Code source : format et syntaxe 

 Ancien format fixe 

Avant la norme Fortran 90, le FORTRAN, créé à l'époque des cartes perforées (en particulier avec le système FMS), utilise une mise en page adaptée à ces supports :
 la colonne 1 peut contenir la lettre C indiquant un commentaire. Le caractère * est aussi accepté ;
 les colonnes 1 à 5 peuvent contenir une étiquette numérique (facultative) de l'instruction, dont la valeur peut être limitée à  ou  suivant le compilateur ;
 la colonne 6 indique une suite de l'instruction précédente ;
le code commence à partir de la  et ne doit pas dépasser la . Les espaces n'ont pas de signification dans ces colonnes : une boucle DO 10 I=1,5 peut aussi s'écrire DO10I=1,5 (le 10 est ici l'étiquette obligatoire de fin de boucle) ;
les colonnes 73 à 80 servent à l'identification et la numérotation des cartes perforées (souvent les trois initiales du projet, du chef de projet ou du programmeur, suivies de numéros de cinq chiffres attribués de dix en dix pour permettre des insertions de dernière minute).

Les extensions de fichiers les plus courantes pour le format fixe sont .f et .for, mais ce n'est qu'une convention adoptée par la plupart des compilateurs. Rien n'empêche de les utiliser avec le format libre à condition d'en avertir le compilateur à l'aide de l'option adéquate.

 Fortran moderne 
Depuis la norme Fortran 90, le code source est écrit suivant un format dit libre : il n'y a plus de colonne particulière, les lignes font au maximum 132 caractères (mais elles peuvent être continuées à l'aide du caractère &), les commentaires sont introduits par un point d'exclamation (éventuellement disposé à la suite d'une instruction Fortran). L'extension de nom de fichier la plus courante est alors .f90, même si le programme utilise des fonctionnalités de normes plus récentes telles que Fortran 2018.
program degrad
    ! =================================================
    ! Imprime une table de conversion degrés -> radians
    ! avec 32 chiffres significatifs (réels 128 bits)
    ! =================================================
    use, intrinsic :: iso_fortran_env, only: wp=>real128

    implicit none
    ! Déclaration des variables
    integer  :: deg
    real(wp) :: radians(0:90)
    ! Déclaration des constantes
    real(wp), parameter :: pi = 4.0_wp * atan(1.0_wp)
    real(wp), parameter :: coeff = (2.0_wp * pi) / 360.0_wp
    character(*), parameter :: ligne_horizontale = "(49('-'))"

    ! Remplissage du tableau :
    radians = [ (coeff * deg, deg=0,90) ]

    ! En-tête de la table
    write (*, ligne_horizontale)
    write (*, "('| Degrés |', 15(' '), 'Radians', 16(' '), '|')")
    write (*, ligne_horizontale)
    ! Affichage formaté
    do deg = 0, 90
        write (*, "('|   ', I2,'   |  ', F34.32,'  |')") deg, radians(deg)
    end do
    ! Fin de la table
    write (*, ligne_horizontale)
end program degrad

Notes :
 ce programme est écrit en Fortran moderne. Il nécessite un compilateur implémentant les bases de la norme Fortran 2008 ;
 l'instruction use permet d'importer le module intrinsèque iso_fortran_env qui définit des constantes, en particulier pour les types de réels disponibles (real32, real64, real128). Ici seule est importée la constante real128 qui sera désignée par l'alias wp (working precision). Les nombres réels apparaissant dans le programme sont suffixés par cet alias afin de définir leur type. Il suffirait ainsi de remplacer real128 par real64 ou real32 pour modifier de façon cohérente la précision numérique utilisée dans l'ensemble du programme, pour autant que le compilateur prenne en charge la précision correspondante ;
 l'instruction implicit none, introduite dans la norme Fortran 90, rend la déclaration des variables obligatoire. Historiquement, celle-ci est en effet facultative : les variables dont le nom commence par une des lettres I, J, K, L, M ou N sont par défaut de type integer, les autres de type real. Ce mécanisme est désormais fortement déconseillé et l'instruction implicit none doit donc être systématiquement utilisée ;
 la déclaration se fait en début de routine. Le type de données et les noms de variables sont séparés par ::. On utilise les entiers par défaut pour deg. La numérotation des tableaux commence par défaut à 1 en Fortran mais ici on la fait commencer à 0 pour le tableau radians(0:90). Les constantes, qui peuvent être calculées, sont spécifiées par l'attribut parameter. Les chaînes de caractères sont de longueur fixe, mais ici l'étoile indique que la longueur de la chaîne doit être définie en fonction de la longueur de son contenu ;
 le contenu du tableau radians() est calculé à l'aide d'un constructeur, avec deg pour variable de boucle variant de 0 à 90. Le Fortran permettant de calculer directement sur des tableaux, on aurait pu écrire également radians = coeff * [ (deg, deg=0,90) ] ;
 l'instruction write se réfère à une unité d'entrée-sortie (* désigne le terminal) et une spécification de format. Ce format est ici stocké dans la chaîne ligne_horizontale et décrit qu'il faudra afficher 49 tirets. On aurait également pu utiliser une déclaration format située sur une autre ligne et précédée d'un label numérique ;
 l'instruction do deg = 0, 90 indique de répéter en boucle les instructions qui suivent (jusqu'au end do) pour toutes les valeurs de deg de 0 à 90 par pas de 1 ;
 le write à l'intérieur de la boucle permet d'écrire sur le terminal les valeurs des variables deg et radians(deg) en utilisant deux caractères pour deg (qui est un entier) et 34 caractères dont 32 après la virgule pour radians(deg) qui est un réel.

 Compilateurs 
De nombreux compilateurs commerciaux ou libres sont disponibles.

 Compilateurs actuels 

 Compilateurs libres 
Avant sa version 4.0, le compilateur libre GCC incluait le compilateur g77 pour le FORTRAN 77, qui a été remplacé en 2005 par le compilateur GFortran, issu d'un fork de G95 réalisé en 2003. En décembre 2022, GFortran prend en charge quasiment intégralement Fortran 2003 et Fortran 2008 et environ 40 % de Fortran 2018. Contrairement aux compilateurs Intel et Cray, il ne gère pas encore de façon native la programmation parallèle avec les co-tableaux mais nécessite l'installation de la bibliothèque OpenCoarrays.

Omni Compiler est un méta-compilateur C et Fortran destiné à transformer du code contenant des directives XcalableMP et OpenACC en code parallèle natif.

 Compilateurs propriétaires 
On trouve de nombreux compilateurs commerciaux :  (filiale de NVidia), NAG, etc. La plupart des fabricants de stations de travail ou d'ordinateurs destinés au calcul intensif proposent également un compilateur Fortran : Intel, IBM, Oracle (à la suite du rachat de Sun Microsystems), HPE Cray (Cray a été racheté par HP en 2019), etc.

Certains de ces compilateurs commerciaux ont des versions gratuites pour une utilisation non commerciale : c'est le cas d'Oracle, Portland Group. On peut télécharger le compilateur BiSheng que Huawei a développé pour sa plateforme Kunpeng : pour le Fortran, il utilise Flang en frontal.

Quant aux compilateurs Intel, ils sont depuis janvier 2021 gratuits pour tous les développeurs : le nouveau compilateur ifx, basé sur LLVM, implémente depuis sa version 2023.0.0 l'intégralité de la norme Fortran 2018 et offre désormais les mêmes fonctionnalités que le compilateur classique ifort, qu'il remplacera progressivement. Le compilateur Intel Visual Fortran est l'héritier de DEC Visual Fortran, devenu Compaq Visual Fortran puis HP Visual Fortran.

 Compilateurs en cours de développement 
De nouveaux compilateurs Fortran basés sur LLVM  sont en développement : LFortran qui vise à permettre de tester du code de façon interactive et Flang.

 Compilateurs en ligne 
Le Fortran fait partie des langages proposés par certains compilateurs en ligne, tels que codingground, OnlineGDB, JDOODLE, godbolt Compiler Explorer et le Fortran Playground de la communauté Fortran-lang. Certains proposent le choix entre plusieurs compilateurs Fortran ou plusieurs versions d'un compilateur, ou permettent d'analyser le code avec un débogueur et de voir le langage machine généré. Ces outils permettent donc d'apprendre le langage sans installer de compilateur sur sa machine, ils permettent également de collaborer en ligne sur un projet.
 Compilateurs non maintenus 

 Lahey : arrêté le 31 décembre 2022 (Lahey Computer Systems Inc. a fermé ses portes).
 Absoft : arrêté le 31 décembre 2022 (Absoft Corporation a fermé ses portes après 42 ans d'activité).
  : arrêté en 2013.
 G95 : compilateur libre développé entre 2000 et janvier 2013.
  est un compilateur Fortran 95 libre arrêté en 2011.
 Compilateur FORTRAN 77 libre Open Watcom : arrêté en 2010.
 HP.
 Unisys.
 Certains fabricants ont disparu, tels que CDC ou DEC.

 Outils de développement 
 Éditeurs et environnements de développement intégrés 
La plupart des éditeurs de texte offrent une coloration syntaxique pour le Fortran : Emacs, Notepad++, Sublime Text, Vim, Neovim, Visual Studio Code... Parmi les environnements de développement intégrés, il existe une version de Code::Blocks destinée au développement en Fortran. Il existe également une version d'Eclipse destinée au Fortran, nommée Photran, mais dont la dernière version date de 2015. Sous Windows, le compilateur Intel Fortran est intégré à Visual Studio.

 Gestionnaire de paquets et systèmes de construction 
Les systèmes de construction de projet tels que CMake et Meson gèrent généralement le Fortran. L'utilitaire makedepf90 permet de générer des fichiers Make pour un projet Fortran.

Mais Fortran dispose depuis fin 2020 du gestionnaire de paquets fpm (Fortran Package Manager), qui fait office également de système de construction de projet. Il est inspiré par l'outil Cargo du langage Rust. Il permet en particulier de gérer les dépendances, qu'il peut télécharger automatiquement depuis GitHub. Et il est lui-même écrit en Fortran.

 Vérification et analyse de code 
fpt est un outil d'analyse de code Fortran. On peut également citer CamFort, un projet universitaire libre, ftncheck, qui est limité au FORTRAN 77 et qui n'est plus développé depuis 2005. findent est un indenteur de code source qui peut également transformer l'ancien format fixe du Fortran en format libre.

Plusieurs analyseurs de type lint sont disponibles : Flint et fortran-linter, logiciels libres écrits en Python, et FortranLint, produit commercial.

Lizard est un analyseur de complexité cyclomatique qui prend en charge une vingtaine de langages, dont le Fortran.

 Débogage et profilage 
Pour le débogage, on peut par exemple utiliser les débogueurs GNU gdb ou idb (Intel Debugger). Pour le profilage sous système de type UNIX, on peut utiliser gprof et Valgrind. La couverture de code peut être évaluée avec .

 Préprocesseurs 
Fypp est un préprocesseur Python qui peut être utilisé avec n'importe quel langage, tout en étant avant tout destiné au langage Fortran. Il utilise la syntaxe du Python.

 Tests unitaires 
 est un framework de tests unitaires, libre et initialement développé par la NASA. Le framework test-drive est utilisé dans les projets fpm et stdlib, et il prend en charge Meson, CMake et fpm. On peut également citer vegetables et FRUIT.

 Générateurs de documentation 
Parmi les générateurs de documentation gérant le Fortran, on peut citer Doxygen, FORD et ROBODoc.

 Outils spécifiques pour Windows 
Quickstart Fortran permet d'installer facilement sous Microsoft Windows, sans nécessiter les droits d’administration, les outils essentiels pour développer en Fortran : GCC-GFortran, Fortran Package Manager, Git for Windows, OpenBLAS (BLAS/LAPACK), GNU make. Il peut également faciliter l'installation d'Intel OneAPI et de la librairie stdlib en cours de développement.

 Bibliothèques 
 Bibliothèques de calcul scientifique 
De nombreuses bibliothèques de calcul ont été développées en Fortran. Certaines sont développées, utilisées, testées et donc déboguées depuis des décennies, ce qui leur assure une très grande fiabilité.
 LAPACK (Linear Algebra Package) est une bibliothèque consacrée comme son nom l'indique à l'algèbre linéaire numérique.
 Basic Linear Algebra Subprograms (BLAS) est un ensemble de fonctions standardisées réalisant des opérations de base de l'algèbre linéaire. Il fait partie des dix codes informatiques ayant le plus marqué la science, d'après la revue Nature.
LINPACK est une bibliothèque de fonctions pour l'algèbre linéaire, et notamment la résolution numérique de systèmes d'équations linéaires.
 Physics Analysis Workstation (PAW).
 International Mathematics and Statistics Library (IMSL) est une bibliothèque logicielle d'objets utilisables pour le développement informatique d'applications d'analyse numérique.
 NAG Fortran Library propose plus de 1700 routines mathématiques et statistiques.
SLATEC est une bibliothèque dans le domaine public proposant 1400 fonctions mathématiques, initalement développée en Fortran 77. Le code source a été adapté en Fortran moderne avec une version 4.2 datée de 2019.
...

 Bibliothèques graphiques 
Les normes Fortran n'incluant pas d'instructions graphiques ou d'instructions pour construire des interfaces graphiques, la visualisation peut se faire après exécution avec des outils externes tels que ParaView, ou en appelant des outils de tracé tels que Gnuplot via l'instruction EXECUTE_COMMAND_LINE(), ou enfin à l'aide de bibliothèques :
 DISLIN, créé par le Max Planck Institute for Solar System Research, permet de tracer des données et de réaliser des interfaces graphiques. Multiplate-formes (UNIX, Linux, FreeBSD, OpenVMS, Windows et MS-DOS). Fonctionne avec de nombreux compilateurs, ainsi que d'autres langages que le Fortran. Téléchargeable gratuitement depuis la version 11.3 de mars 2020.
GINO permet de tracer des données et de réaliser des interfaces graphiques. Logiciel commercial pour Windows et Linux.
GrWin Graphics Library : logiciel libre pour Windows.
gtk-fortran est une bibliothèque sous licence libre GPL 3 permettant de créer des interfaces graphiques GTK en Fortran, grâce aux fonctionnalités d'interopérabilité Fortran / C introduites depuis la norme Fortran 2003. Multi-plateforme (Linux, Windows, macOS, FreeBSD, Raspberry Pi...). Supporte GTK 4, la bibliothèque généraliste GLib et la bibliothèque PLplot. Peut être utilisée comme dépendance fpm.
 JAPI (Java Application Programming Interface) : interface Java/Fortran permettant de créer une interface graphique complète pour les programmes Fortran. Multiplate-formes (Windows, Linux, Solaris). Fonctionne avec de nombreux compilateurs (entre autres gfortran, Compaq Visual Fortran…). Logiciel libre sous licence LGPL.
MATFOR : construction d'interfaces graphiques et bibliothèques numériques et graphiques pour Fortran et d'autres langages. Logiciel commercial pour Windows et Linux.
ogpf permet d'accéder facilement à gnuplot depuis un programme Fortran, grâce à l'utilisation de la programmation orientée objet. Il peut être utilisé comme paquet fpm.
  : bibliothèque permettant de dessiner des graphiques scientifiques. Multilangage et multiplate-formes (Linux, OpenSolaris, Unix, MS-DOS, Windows, Mac OS X). Logiciel libre sous licence LGPL.
Quickwin : bibliothèque graphique fournie avec le Compaq Visual Fortran (désormais Intel Visual Fortran). Ne fonctionne que sous Windows.
 Winteracter : construction d'interfaces graphiques et d'outils de visualisation. Logiciel commercial pour Windows, Linux et MacOS X.

Début 2021, les bibliothèques suivantes ne sont plus maintenues depuis au moins 10 ans :
 f90gl : interface du Fortran 90 avec OpenGL, GLU et GLUT. Multiplate-formes. Fonctionne avec de nombreux compilateurs. Licence : domaine public.
Ftcl : interface Fortran-Tcl/TK. gratuit, open-source.
g2 graphical library : pour Linux, AIX, Digital Unix, SunOS, IRIX, OpenVMS, Windows. Logiciel libre sous licence LGPL.
  : bibliothèque de routines graphiques, interactive, gratuite, multiplate-forme, gère beaucoup de périphériques de sortie.
pilib (Platform Independent Library for Fortran) : interface Fortran 90-95 / GTK. Développement arrêté. Logiciel libre.
 PSPLOT : générer des dessins en PostScript.
SansGUI : interface commerciale pour Windows et Compaq Visual Fortran.
Xeffort : bibliothèque graphique pour Visual Fortran. Logiciel libre pour Windows.

 Interopérabilité avec les autres langages 
Depuis Fortran 2003, l'interopérabilité du Fortran avec le langage C est normalisée. Le module intrinsèque ISO_C_BINDING définit des constantes de types telle que c_int ou c_double, des procédures et constantes permettant en particulier de gérer l'interopérabilité des pointeurs C et Fortran, ainsi que des constantes pour les caractères telles que c_null_char pour gérer l'échange des chaînes de caractères. Cette partie du langage a reçu des améliorations avec la norme Fortran 2018.

Cette interopérabilité normalisée facilite d'une part l'appel des innombrables bibliothèques écrites en C, et d'autre part l'utilisation par d'autres langages de bibliothèques écrites en Fortran. Julia sait ainsi appeler des fonctions Fortran de manière native avec la function ccall(). Python peut utiliser des bibliothèques Fortran grâce à F2PY (Fortran to Python interface generator), qui fait partie de NumPy.

 Autres langages pour le calcul scientifique 
Le Fortran côtoie désormais de nombreux autres langages et logiciels pour le calcul scientifique, en particulier :
 C et C++,
 des langages interprétés tels que Python grâce à des bibliothèques telles que NumPy et SciPy, dont certaines parties sont d'ailleurs écrites en Fortran,
Julia,
R (langage), axé statistiques et analyse de données,
 des logiciels tels que Scilab, MATLAB ou GNU Octave. Scilab et MATLAB incorporent d'ailleurs les bibliothèques BLAS et LAPACK, développées en Fortran. MATLAB était à l'origine un programme en Fortran, distribué aux universités et aux centres de recherche.

Par ailleurs, d'autres langages ont été développés dans les années 2000 pour faciliter la programmation parallèle sur les superordinateurs, avant la parution de la norme Fortran 2008. On peut citer X10, développé par IBM depuis 2004, et Chapel, développé par Cray depuis 2009. Un autre langage, Fortress, apparu en 2006 et développé par Sun Microsystems, a été abandonné en 2012. Ces trois langages font partie du projet  de la DARPA.

 Notes et références 
 Notes 

 Références 

 Voir aussi 

 Bibliographie 
 
 
 
 
 
 
 
 
 

 Articles connexes 
 Fortran 90
 Fortran 95
 Netlib est un site qui offre une collection de bibliothèques de fonctions pour le calcul numérique.

 Autres liens externes 

 Cours de Fortran de l'IDRIS (CNRS).
 Fortran sur le Wiki ubuntu-fr : cette page décrit l'installation et l'utilisation des outils Fortran sur une distribution Linux Ubuntu.
 Blog Dr. Fortran de Steve Lionel, responsable depuis 2018 du Working Group WG5'' pour l'élaboration des normes Fortran.
 Comparaison de différents compilateurs Fortran.

Langage Fortran
Langage de programmation
Norme ISO
Norme CEI
Éponyme d'un objet céleste