Fortran - Funciones de consulta

La siguiente tabla describe las funciones de consulta:

No Señor	Función descriptiva
1	allocated(array) Es una función lógica que indica si la matriz está asignada.
2	lbound(array, dim) Devuelve el límite de dimensión inferior de la matriz. Si dim (la dimensión) no se proporciona como argumento, obtiene un vector entero, si se incluye dim, obtiene el valor entero con exactamente ese límite de dimensión inferior, que solicitó.
3	shape(source) Devuelve la forma de una fuente de matriz como un vector entero.
4	size(array, dim) Devuelve el número de elementos de una matriz. Si no se proporciona dim, y se incluye el número de elementos en la dimensión relevante si dim.
5	ubound(array, dim) Devuelve los límites dimensionales superiores.

Ejemplo

El siguiente ejemplo demuestra el concepto:

program arrayInquiry

   real, dimension(3,2) :: a 
   a = reshape( (/5,9,6,10,8,12/), (/3,2/) ) 
   
   Print *, lbound(a, dim = 1)
   Print *, ubound(a, dim = 1)
   Print *, shape(a)
   Print *, size(a,dim = 1)
   
end program arrayInquiry

Cuando el código anterior se compila y ejecuta, produce el siguiente resultado:

↰ Previous page