Tutoriel Fortran

Ce tutoriel est en cours de rédaction (Permissions: Ouvert en écriture pour les membres du site, en lecture pour le public)

Introduction

C'est quoi le fortran ?:

• Tutoriel Fortran 90

Compilateur fortran

Télécharger le compilateur gfortran

gfortran -v

donne

Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/usr/local/gfortran/libexec/gcc/i686-apple-darwin10/4.6.1/lto-wrapper
Target: i686-apple-darwin10
Configured with: ../gcc-4.6.1/configure --prefix=/usr/local/gfortran --with-gmp=/Users/fx/devel/gcc/deps-static/i686 --enable-languages=c,c++,fortran,objc,obj-c++ --build=i686-apple-darwin10 CC='gcc -arch i386' CXX='g++ -arch i386' 'STAGE1_CFLAGS=-arch i386' 'STAGE1_LDFLAGS=-arch i386' 'STAGE1_CXXFLAGS=-arch i386'
Thread model: posix
gcc version 4.6.1 (GCC)

Débuter avec le fortran

Premier programme en fortran

program ProgName

write(6,*) "Hello Fortran !"

end program

compiler le code

gfortran CodeName.f90 -o CodeName

Les variables en fortran

program ProgName

implicit none

integer :: i
real :: x
double precision:: d
complex :: c
logical :: l 
character(len=20) :: name

i = 4
x = 7.0
d = 7.0
c = (2,3)
l = .TRUE.
name = 'toto'

write(6,*) i
write(6,*) x
write(6,*) d
write(6,*) c
write(6,*) l
write(6,*) name

end program

Les opérateurs

Les opérateurs arithmétiques

Les opérateurs de comparaisons

La condition "if"

program ProgName

implicit none
integer :: i

i = -3

if( i > 0 )then
write(6,*) "i: is greater than 0"
else
write(6,*) "i: is lower then 0"
end if

end program

Les boucles "do" et "while"

La Boucle "do"

program ProgName

implicit none
integer :: i

do i = 1, 10
write(6,*) i
end do

end program

La Boucle "while"

program ProgName

implicit none
integer :: i

i = 1
do while (i <= 10) 
write(6,*) i
i = i + 1
end do

end program

Les "Subroutine" et "functions" en fortran

Tutoriels pour apprendre le fortran

Apprendre le fortran par l'exemple

Références