Fortran - Fonctions d'enquête

Le tableau suivant décrit les fonctions d'interrogation -

Sr.Non Description de la fonction
1

allocated(array)

C'est une fonction logique qui indique si le tableau est alloué.
2

lbound(array, dim)

Il renvoie la limite de dimension inférieure du tableau. Si dim (la dimension) n'est pas donnée comme argument, vous obtenez un vecteur entier, si dim est inclus, vous obtenez la valeur entière avec exactement cette limite de dimension inférieure, pour laquelle vous avez demandé.
3

shape(source)

Il renvoie la forme d'une source de tableau sous forme de vecteur entier.
4

size(array, dim)

Il renvoie le nombre d'éléments dans un tableau. Si dim n'est pas indiqué, et le nombre d'éléments dans la dimension appropriée si dim est inclus.
5

ubound(array, dim)

Il renvoie les limites dimensionnelles supérieures.

Exemple

L'exemple suivant illustre le concept -

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

Lorsque le code ci-dessus est compilé et exécuté, il produit le résultat suivant -

1
3
3 2
3