Funciones IO

Salida

Las funciones de salida son dos write y print.

Modificador	Descripción
A	Cadena
Fw,b	Real de anchura total w y número de decimales b. Si w=0 se empleará el espacio mínimo necesario.
Iw	Entero con anchura total w. Si w=0 se empleará el espacio mínimo necesario
ESw,bEc	Notación científica con anchura total w, número de decimales b y cdígitos en el exponente
S, SP, SS	Control del signo. Solo afecta a I, F, E, D y G. S: Todos los números restantes usan el signo que especifique el sistema. SP: Todos los restantes números positivos llevarán el signo + SS: Todos los restantes números positivos no llevarán el signo +

Más información en Oracle y en Michigan Tech.

Ejemplos de write


program write_ejemplo
    use iso_fortran_env
    implicit none

    integer :: a, b

    a = 7863
    b = 2134

    write (*, "(A)") "Hola mundo"
    write (*, "(2I6)") a, b
end program write_ejemplo

Funciones

Pure

Una función pure no modifica variables globales, no realiza entrada/salida (E/S) ni realiza ninguna operación que tenga efectos colaterales. Las funciones puras se utilizan en Fortran para realizar cálculos basados únicamente en sus argumentos de entrada y devolver un resultado sin alterar el estado de las variables globales del programa.

Las funciones puras son importantes en Fortran porque permiten al compilador realizar optimizaciones adicionales, ya que el compilador sabe que la función no tiene efectos secundarios y que el resultado depende únicamente de sus argumentos. Esto puede llevar a un código más eficiente y predecible.


real pure elemental function circle_area(r) result (a)
    real, intent(in):: r

    a = r**2 * 3.14
end function circle_area