返回首页
内部数组操作函数
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))