commandes fortran Gautier Hypolite 19/08/2014 Début du programme Fin du programme Obliger de déclarer toutes les variables Déclaration de variable Bouléen (vrai ou faux) Type entier Type réel TYPE réel double pré TYPE complexe simpl TYPE complexe doubl TYPE chaine de chara Affectation Lecrure au clavier Affectation multiple Ion Variable fixe lors de Putilidation Création d’un type Négation Conjonction Disjonction Equivalence Non équivalence Strictement plus grand Plus grand ou égal Strictement plus petit Plus petit ou égal ; en option réel ANINT
Entier supérieur le plus proche CEILING Entier inférieur le plus proche FLOOR Manipulaition des chaines de charactére Longueur d’une chaine de caractères LEN Longueur d’une chaîne sans les blancs de fin LEN TRIM Recherche d’éléments particuliers SCAN Comparaison de deux chaînes LGT et L L T, LGE et LLE Alignement du texte à gauche ADJUSTL Alignement du texte à droite ADJUSTR Elimination des blancs de fin TRIM Algorithmique Boucle si, sinon.. IF ( expression 1 ) THEN code à exécuter si expressionl est vraie [ELSE expression2 ) THEN code à exécuter si expression2 est vraie
ELSE code à exécuter sinon] END IF test de différentes valeurs SELECT CASE ( variable ) CASE ( valeurl ) code à exécuter si variable vaut valeurl CASE ( valeur2 ) code à exécuter si variable NomProgrammePrincipal Définition des procédures externes subroutine SU BROUTINE , arg2, . , argn]) Déclaration des arguments (si procédure externe) Déclaration des paramètres locaux Instructions exécutables END SUBROUTINE NomSubroutine On l’appelle avec CALL Fonction FONCTION nom Fonction ([argl, arg2, , argn]) Déclaration des paramètres (arguments transmis)
Déclaration du type retourné par la fonction nomFonction END FUNCTION nomFonction Pour l’utiliser nomFonction([arg1 r… ,arg2]) Création d’un module MODULE Ensemble des variables contenues dans le module ( CONTAINS Ensemble des procédures contenues dans le module END MODULE nomDuModule Utilisation d’un module USE nomdumodule Entrées-sorties Lecture des données au clavier Ecriture à l’écran PRINT* Lecture IOSTAT=controlececture) PAGF3CFd créé que durant ‘SCRATCH l’exécution du programme puis détruit ensuite 4 Action lecture uniquement Action écriture uniquement
Action lecture et écriture Accès séquentielle Accès direct Transfert formatés Transfert nonformatés Fermer un fichier ‘READ’ ‘WRITE’ ‘READWRITE’ ‘SEQUENTIAL’ ‘DIRECT ‘FORMATTED’ ‘IJNFORMATTED’ CLOSE(UNlT=NumeroUniteLogique STATUS=StatutDuFichierApresFermeture IOSTAT=contr01eaorwerouIement) DELETE Statut conserver le fichier Statut suprimer le fichier Déclaration d’un tableau Exemple Déclaration d’un tableau dynamique Avant l’utilisation pour allouer le tableau Aprés utilisation Exemple d’utilisation d’un t Exemple d’utilisation d’un tableau
