Fortran - 查询函数

下表描述了查询功能 -

序号	函数和说明
1	allocated(array) 这是一个逻辑函数，表示是否分配了数组。
2	lbound(array, dim) 它返回数组的下维限制。如果没有将 dim（维度）作为参数给出，则会得到一个整数向量；如果包含了 dim，则会得到具有完全相同下维限制的整数值，即你所询问的。
3	shape(source) 它将数组源的形状作为整数向量返回。
4	size(array, dim) 它返回数组中的元素数量。如果没有给出 dim，则返回相关维度中的元素数量；如果包含了 dim，则返回该维度中的元素数量。
5	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

编译并执行上述代码后，它会生成以下结果 -

fortran_arrays.htm

打印页面