我在读一些Fortran代码,以前的程序员每次都会在语句'n = n'中引发。这样做的目的是什么?一些示例代码:'n = n'的目的是什么?
if (cmult.lt.5.) then
kx = 0
do k=ipd(ii),lpd(ii)
kx = kx + 1
p1(kx) = epp_rfc(ipp,k)
epp_rfc(ipp,k) = cmult*epp_rfc(ipp,k) + x
zero(ix)
p2(kx) = epp_rfc(ipp,k)
n = n
enddo
if (cmult.gt.0.) then
n = n
endif
else
nk = lpd(ii) - ipd(ii) + 1
do k=ipd(ii),lpd(ii)
kx = kx + 1
p1(kx) = epp_rfc(ipp,k)
epp_rfc(ipp,k) = pp(imem) + zero(ix)
p2(kx) = epp_rfc(ipp,k)
n = n
enddo
endif
你是怎么知道这件事的?这非常有趣。 – tofutim 2011-05-25 14:20:55
+1,@tofutim大多数FORTRAN调试器都不如.Net那么好,所以这些“黑客”很多都很常见。我已经在大多数语言中看到这些结构,其中'write' /'printf'调试很常见。 – user7116 2011-06-03 13:42:53