下表描述了查询功能：

函数	描述
allocated(array)	它是一个逻辑功能，它指示该阵列被分配。
lbound(array, dim)	它返回的数组的维数较低的限制。如果dim(尺寸)不给出一个参数，会得到一个整数向量，如果dim计算在内，得到的整数值正好具有较低维数的限制。
shape(source)	它返回一个阵列源为一个整数向量的形状。
size(array, dim)	它返回在数组元素的数目。如果dim没有给出，并在相关维数的元素个数，如果dim也包括在内。
ubound(array, dim)	它返回尺寸的限制。

例子

下面的例子演示了这一概念：

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

当上述代码被编译和执行时，它产生了以下结果：

1
3
3 2
3

纠错/补充 收藏