Fortran

Introducci´on a FORTRAN
Miguel Alcubierre
Instituto de Ciencias Nucleares, UNAM
Abril 2005

´Indice
1. Introducci´
on

3

2. Compilar y correr programas en FORTRAN

4

3. Elementos b´
asicos de un programa en FORTRAN

5

4. Constantes y variables
4.1. Tipos de datos . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
4.2. Declaraci´on de variables . . . . . . . . . . . . . . . . .. . . . . . . . . . .
4.3. Conversi´on entre tipos . . . . . . . . . . . . . . . . . . . . . . . . . . . . .

6
6
7
8

5. Operaciones en FORTRAN

9

6. Arreglos
10
6.1. Arreglos de tama˜
no fijo . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 11
6.2. Asignaci´on din´amica de memoria . . . . . . . . . . . . . . . . . . . . . . . 14
7. Funciones intr´ınsecas

14

8. Control de flujo delprograma
16
8.1. Loops . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 17
8.2. IF . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 18
8.3. Control l´ogico de loops . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 22

1

9. Entrada y salida de datos (input/output)
23
9.1. Unidades de entrada y salida . . . . . . . . . . . . . . .. . . . . . . . . . . 24
9.2. Formato de entrada y salida . . . . . . . . . . . . . . . . . . . . . . . . . . 25
10.Subprogramas
27
10.1. Funciones . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 28
10.2. Subrutinas . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30
10.3. M´odulos . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .. . 33

2

1.

Introducci´
on

En este curso se presenta una breve introducci´on a FORTRAN 90, el lenguaje de
programaci´on de m´as amplio uso en el c´omputo cient´ıfico. El nombre FORTRAN proviene
de “FORmula TRANslator” (traductor de f´ormulas), y fue desarrollado originalmente por
IBM en 1954, con el objetivo de poder escribir programas de c´omputo cient´ıfico en un
lenguaje de alto nivel envez de tener que recurrir a lenguaje de m´aquina o ensamblador.
En 1958 se present´o una segunda versi´on y varias compa˜
n´ıas comenzaron a desarrollar
compiladores independientes a IBM para usar el lenguaje en otras m´aquinas.
El primer estandard de FORTRAN se introdujo en 1962 y se llam´o FORTRAN IV.
En 1966 se present´o el primer estandard ANSI (American National Standards Institute),
que seconoci´o como FORTRAN 66. El segundo estandard ANSI, con muchas mejoras,
se introdujo en 1977 (FORTRAN 77), y se convirti´o en el estandard utilizado por la
comunidad cient´ıfica por muchos a˜
nos. Incluso a la fecha es com´
un encontrar muchos
programas escritos en FORTRAN 77.
FORTRAN 77 ten´ıa una serie de desventajas. Entre ellas una estructura muy r´ıgida
adaptada al uso de tarjetasperforadas (“forma fija”), que requer´ıa que ciertas columnas
tuvieran usos espec´ıficos. Adem´as, no permit´ıa un uso din´amico de la memoria y no
permit´ıa realizar operaciones entre arreglos de n´
umeros. Para mejorar esta situaci´on, en
1990 se present´o un tercer estandard ANSI conocido como FORTRAN 90, que conten´ıa
muchas nuevas caracter´ısticas y permit´ıa una programaci´on m´as estructurada. Unaserie
de cambios menores se presentaron en 1995 (FORTRAN 95), y actualmente se trabaja en
un nuevo estandard ANSI (FORTRAN 2003).
El d´ıa de hoy la mayor parte de los programas en FORTRAN siguen el estandard de
FORTRAN 90, pero a´
un existe un n´
umero importante de aplicaciones de FORTRAN 77.
FORTRAN esta espec´ıficamente dise˜
nado para el c´omputo cient´ıfico, y no es particularmente buenopara otro tipo de aplicaciones (control, administraci´on, manejo de documentos, etc). Para estas aplicaciones otros lenguajes somo C, JAVA o PERL son m´as
adecuados. En la actualidad, la mayor parte del c´omputo cient´ıfico de alto rendimiento
a nivel internacional se lleva a cabo en FORTRAN (FORTRAN esta muy lejos de ser
obsoleto), aunque los lenguajes C y C++ han ganando cierta popularidad...