前几天做一个c转fortran的程序，在windows下编译的，能跑出结果，没想到在lunix中跑出来的结果是错的。找了好久，原以为全局变量的原因，没想到是do while中初值的问题。integer nnew我在wndows上没设初值，但是运行的正确，在lunix中不知道设的是初值是什么。同时，fortran中do while和c中的运行还不一样，反正自己弄通了，具体的原因就不知道了，希望大家不要犯同样的错误。
do while (nnew > 0)
nnew = 0
do inew=1,ncur,1
xcn = nmatx(inew)
ycn = nmaty(inew)
zcn = nmatz(inew)