Primeros pasos con Fortran

Hola Mundo

Cualquier programa Fortran tiene que incluir end como última declaración. Por lo tanto, el programa Fortran más simple se ve así:

end

Estos son algunos ejemplos de programas “hola, mundo”:

print *, "Hello, world" 
end

Con la sentencia write:

write(*,*) "Hello, world"
end

Para mayor claridad, ahora es común usar la instrucción ‘programa’ para iniciar un programa y darle un nombre. La instrucción end puede hacer referencia a este nombre para que sea obvio a qué se refiere, y permitir que el compilador verifique que el código sea correcto. Además, todos los programas de Fortran deben incluir una declaración “implícita ninguna”. Por lo tanto, un programa Fortran mínimo en realidad debería tener el siguiente aspecto:

program hello
  implicit none
  write(*,*) 'Hello world!'
end program hello

El siguiente paso lógico desde este punto es cómo ver el resultado del programa hello world. Esta sección muestra cómo lograrlo en un entorno similar a Linux. Suponemos que tiene algunas nociones básicas de comandos de shell, principalmente sabe cómo llegar a la terminal de shell. También asumimos que ya ha configurado su entorno fortran. Usando su editor de texto preferido (notepad, notepad++, vi, vim, emacs, gedit, kate, etc.), guarde el programa hello anterior (copiar y pegar) en un archivo llamado hello.f90 en su directorio de inicio. hello.f90 es su archivo fuente. Luego vaya a la línea de comando y navegue hasta el directorio (¿directorio de inicio?) donde guardó su archivo fuente, luego escriba el siguiente comando:

>gfortran -o hello hello.f90

Acabas de crear tu programa ejecutable hello world. En términos técnicos, acabas de compilar tu programa. Para ejecutarlo, escriba el siguiente comando:

>./hello

Debería ver la siguiente línea impresa en su terminal de shell.

> Hello world!

Felicidades, acabas de escribir, compilar y ejecutar el programa “Hello World”.

2: https://www.wikiod.com/es/fortran/primeros-pasos-con-fortran#Instalación o Configuración

Ecuación cuadrática

Hoy Fortran se utiliza principalmente para el cálculo numérico. Este ejemplo muy simple ilustra la estructura básica del programa para resolver ecuaciones cuadráticas:

program quadratic
  !a comment

  !should be present in every separate program unit
  implicit none

  real :: a, b, c
  real :: discriminant
  real :: x1, x2

  print *, "Enter the quadratic equation coefficients a, b and c:"
  read *, a, b, c

  discriminant = b**2 - 4*a*c

  if ( discriminant>0 ) then

    x1 = ( -b + sqrt(discriminant)) / (2 * a)
    x2 = ( -b - sqrt(discriminant)) / (2 * a)
    print *, "Real roots:"
    print *, x1, x2

    ! Comparison of floating point numbers for equality is often not recommended. 
    ! Here, it serves the purpose of illustrating the "else if" construct. 
  else if ( discriminant==0 ) then

    x1 = - b / (2 * a)
    print *, "Real root:"
    print *, x1
  else

    print *, "No real roots."
  end if
end program quadratic

Insensibilidad a mayúsculas y minúsculas

Las letras mayúsculas y minúsculas del alfabeto son equivalentes en el Juego de caracteres Fortran. En otras palabras, Fortran no distingue entre mayúsculas y minúsculas. Este comportamiento contrasta con los lenguajes que distinguen entre mayúsculas y minúsculas, como C++ y muchos otros.

Como consecuencia, las variables a y A son la misma variable. En principio, uno podría escribir un programa de la siguiente manera

pROgrAm MYproGRaM
..
enD mYPrOgrAM

Corresponde al buen programador evitar elecciones tan desagradables.

Instalación o Configuración

Fortran es un lenguaje que se puede compilar utilizando compiladores proporcionados por muchos proveedores. Hay diferentes compiladores disponibles para diferentes plataformas de hardware y sistemas operativos. Algunos compiladores son software libre, otros se pueden usar de forma gratuita y otros requieren la compra de una licencia.

El compilador de Fortran gratuito más común es GNU Fortran o gfortran. El código fuente está disponible en GNU como parte de GCC, la colección de compiladores de GNU. Los binarios para muchos sistemas operativos están disponibles en https://gcc.gnu.org/wiki/GFortranBinaries. Las distribuciones de Linux a menudo contienen gfortran en su administrador de paquetes.

Otros compiladores están disponibles, por ejemplo:

En HPC-Systems, a menudo hay compiladores especializados disponibles por parte del proveedor del sistema como, por ejemplo, los compiladores IBM o Cray.

Todos estos compiladores admiten el estándar Fortran 95. El ACM Fortran Forum ofrece una descripción general del estado de Fortran 2003 y el estado de Fortran 2008 de varios compiladores y está disponible en Fortran Wiki.