Constructores de arreglos en Fortran

Arreglos armados entre corchetes, dimensionados por su tipo, recorridos por un implied-do.

program array_constructors
    implicit none
    ! An array constructor in brackets; size is part of the type.
    real :: tides(5) = [2.1, 3.4, 4.8, 3.9, 2.6]
    integer :: berths(4) = [(7 * 2), 3, 5, 8]
    integer :: i

    print *, "readings held: ", size(tides)
    print *, "first and last: ", tides(1), tides(5)
    ! An implied-do builds a sequence inline.
    print *, [(i * 10, i = 1, 4)]
    print *, "berths: ", berths
end program array_constructors

Cómo funciona

1. real :: tides(5) = [...] declara y llena en una línea.
2. size(tides) le pregunta al arreglo mismo; expresiones como (7 * 2) valen dentro de un constructor.
3. [(i * 10, i = 1, 4)] es un implied-do: una secuencia construida en línea.

Palabras clave y builtins usados aquí

• end
• implicit
• integer
• none
• print
• program
• real

El intento, en números

Líneas

13

Caracteres a escribir

422

Tokens

95

Ritmo de tres estrellas

65 tpm

Al ritmo de tres estrellas de 65 tokens por minuto, este intento toma unos 88 segundos.

Escribe este fragmento

Paso 1 de 3 en Arreglos; paso 4 de 27 en Fundamentos del lenguaje.

← Anterior Siguiente →