fortran 显式接口是什么意思啊？

发布网友 发布时间：2022-03-05 16:46

我来回答

共2个回答

热心网友 时间：2022-03-05 18:15

在主程序里面写上
program test
implicit none
interface
subroutine sub(a,b)
integer::a(2)
integer::b
end interface

integer,target::a(2)=(/1,2/)
integer,pointer::p(:)
integer::b=0

p=>a
print*,p
pause

call sub(p,b)
pause
end

热心网友 时间：2022-03-05 19:33

你这个子程序调用的变量a是整形数组，但是主程序里p是指针那