Fortran-inquiry

Fortran-照会関数

次の表は、照会機能について説明しています-

Sr.No	Function & Description
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

上記のコードをコンパイルして実行すると、次の結果が生成されます-

1
3
3 2
3