以文本方式查看主题

-  Fortran中文网  (http://fortran.cn/bbs/index.asp)
--  Fortran语言开发经验交流  (http://fortran.cn/bbs/list.asp?boardid=3)
----  [求助]请教怎样释放子程序的变量内存(不是数组,是一般的变量!)  (http://fortran.cn/bbs/dispbbs.asp?boardid=3&id=1370)

--  作者:klonio
--  发布时间:2008/3/22 15:37:46

--  [求助]请教怎样释放子程序的变量内存(不是数组,是一般的变量!)
估计是CVF 编译器的问题 ,我用的是CVF PRO 6.5,子程序里面的变量不会自己释放,重复计算后会累加,想请教怎样释放子程序的变量内存(不是数组,是一般的变量!)附代码,现在输出的结果是 0  2 想请教如何不在子程序SUB1中添加N=0的语句 使输出的结果为0 0

program try

implicit none

CALL SUB1()

CALL SUB2()

end

SUBROUTINE SUB1()

INTEGER N

WRITE(*,*)N

N=N+2

END SUBROUTINE SUB1

SUBROUTINE SUB2()


京ICP备05056801号