Fortran查询函数
下表描述了查询功能：
| 函数 | 描述 |
|---|---|
| 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
