LENGUAJE DE PROGRAMACIÓN FORTRAN

El Fortran tiene la ventaja de ser un lenguaje compacto que sirve muy bien para satisfacer las necesidades de los científicos y los estadísticos de los negocios. Al servicio de los científicos e ingenieros hay grandes bibliotecas de programas ingenieriles y científicos escritos en Fortran. El lenguaje también es ampliamente utilizado para aplicaciones de negocios que no requieren el manejo de grandes archivos de datos. Debido a que existen estándares establecidos de Fortran, los programas escritos para una computadora son fácilmente convertidos para su uso en otra.

Entre sus características más relevantes de este lenguaje aparecen, como ya vienen siendo habituales los soporte de localización de los programas o computación paralela, y otras como soporte de notación matemática, comprobación estática de tipos en arrays y matrices multidimensionales, o definición en las librerías (o bibliotecas) de sintaxis del lenguaje específicas para ciertos dominios. La implementación de referencia del lenguaje necesita Java 1.5 (o superior) para funcionar.

Ventajas y Desventajas del Fortran

Ventajas

•  es un lenguaje muy simple 
•  es fácil de aprender 
•  se diseñó para trabajar con expresiones matemáticas y Matrices 
•  es todavía uno de los lenguajes más usados para cálculo numérico 
•  existen cientos de librerías probadas y eficientes
•  los compiladores tienen más de 50 años de experiencia para optimizar el tiempo de    cálculo de los do-loops 

Desventajas

• no existen clases o estructuras 
• no se puede hacer una reserva de memoria dinámica 
• es un lenguaje primitivo para proceso de textos, listas y estructuras de datos más complejas 
• puede haber mayor dificultad en el rastreo de la lógica de un programa en el código Fortran que en algunos otros lenguajes de alto nivel.

Lectura y Escritura

La sentencia read es usada para la entrada y la sentencia write para la salida. El formato es:

read (núm_unidad, núm_formato) lista_de_variables

write(núm_unidad, núm_formato) lista_de_variables

El número de unidad se puede referir a la salida estándar, entrada estándar o a un archivo. Se describirá más adelante. El número de formato se refiere a una etiqueta para la sentencia format, la cual será descrita brevemente.

Es posible simplificar estas sentencias usando asteriscos (*) para algunos argumentos, como lo que se ha hecho en los ejemplos anteriores. A lo anterior se le conoce como una lectura/escritura de lista dirigida.

read (*,*) lista_de_variables

write(*,*) lista_de_variables

La primera sentencia leerá valores de la entrada estándar y asignará los valores a las variables que aparecen en la lista, y la segunda escribe la lista en la salida estándar.

Ejemplos

Se muestra un segmento de código de un programa de Fortran:

integer m, n

real x, y

read(*,*) m, n

read(*,*) x, y

Se ingresan los datos a través de la entrada estándar (teclado), o bien, redireccionando la entrada a partir de un archivo. Un archivo de datos consiste de registros de acuerdo a los formatos válidos de Fortran. En el ejemplo, cada registro contiene un número (entero o real). Los registros estan separados por espacios en blanco o comas. Por lo que una entrada válida al programa anterior puede ser:

-1 100

-1.0 1e+2

O se pueden agregar comas como separadores:

-1, 100

-1.0, 1e+2

Observar que la entrada en Fortran 77 es sensible a la línea, por lo que es importante contar con el número apropiado de elementos de entrada (registros) en cada línea. Por ejemplo, si se da la siguiente entrada en una sola línea

-1, 100, -1.0, 1e+2

entonces a m y a n se asignarán los valores de -1 y 100 respectivamente, pero los dos últimos valores serán descartados, dejando a x e y sin definir.