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