新人关于指针的问题

lwq1834515 · 发表于 2015-4-11 09:22:26

指针可以指向一个一维数组吗（不是数组中的一个数，是整个数组）？我想对整个数组进行矢量计算。刚刚接触FORTRAN，很多不明白的地方，请多指教。

li913 · 发表于 2015-4-11 10:24:48

[Fortran] 纯文本查看 复制代码

program test
    integer,target:: n(3)=(/1,2,3/)
    integer,pointer::p(:)
    p => n
    print*,p
    pause
end program

针对数组运算，ivf编译器会自动矢量化，用不着采用指针。

lwq1834515 · 发表于 2015-4-11 13:25:06

li913 发表于 2015-4-11 10:24
[mw_shl_code=fortran,true]program test
integer,target:: n(3)=(/1,2,3/)
integer,pointer::p(:) ...

谢谢解答，再请教一下。
integer,pointer::p(:)的话，不就是三个指针了吗？
最初的想法是把一些向量存在二维数组里，知道行和列的话就可以取出这个向量，指针是不是实现不好？定义成四维的数组会好一点吗？

fcode · 发表于 2015-4-11 14:22:54

integer,pointer::p(:)

是一个指针，不是三个指针。

Fortran 只有“指向数组的指针”，而没有“指向变量的指针数组”。

知道行列，取出向量，不需要指针既可实现。

integer :: a(2,2) = reshape( [1,2,3,4] , [2,2] )
a(:,1) 就是第一行
a(:,2) 就是第二行
a(1,:) 就是第一列
a(2,:) 就是第二列

lwq1834515 · 发表于 2015-4-11 16:45:40

fcode 发表于 2015-4-11 14:22
integer,pointer::p(:)

是一个指针，不是三个指针。

啊，我明白了，是一个指针。多谢指教，十分感激。

[指针] 新人关于指针的问题

美女勋章

热心勋章

星光勋章

新人勋章

贡献勋章

管理勋章

帅哥勋章

爱心勋章

规矩勋章

元老勋章

水王勋章