size(x)：数组大小

返回数组 x 的大小。

声明

语法

retval = size(A[, dim[, kind]])
integer function size(x)

参数

A 为任何类型或维度的输入数组。

dim 可选维度，如果存在，size 返回此维度的大小。

kind 可选返回值的种类。

返回值

n 数组的大小（整型）。

描述

size 内部函数返回数组的大小。它返回所有维度的乘积，除非指定了 dim 参数，在这种情况下，它只返回这个特定维度的大小。 kind 参数可用于指定结果的整数类型。

类型

支持的参数类型是整型。

示例

program intrinsics_size
    implicit none
    real :: A(3, 4)
    print *, size(A)
    print *, size(A, 2)
end program

结果：

12
4

也可以看看

shape，reshape。