十一、数组函数和变长数组

返回首页

内部数组操作函数

1.矩阵乘积函数

matmul(A,B)

2.向量点乘函数
dot_product(A,B)

3.矩阵转置函数
transpose(A)

4.元素求和函数
sum(/4,5,6/) sum(A,dim=1) sum(A,mask=A>0.0)

5.元素连乘求积函数
product(/4,5,6/) product(A,dim=1) product(A,mask=A>0.0)

6.数组定位函数
maxloc(/3,8,5,8/) minloc(/3,8,5,8/)

变长数组

先声明再分配大小,如下:

integer,allocatable A(:,:) integer i,j read(*,*) i,j allocate (A(i,j))