Zitat:

mecej4 wrote:

Quote:

For example, I change k as 'k=1', it is still the former value.

How did you check this? If you used a symbolic debugger to do so, note that if you have optimization enabled some variables may be handled entirely in registers, or the value in memory and the value in a register may not be synchronized.

 I just debug the program in VS2010 and use the watch window to monitor their values. Sometimes it can not be changed. For a short programm, it will always work well. But for a long one, this mistake will happen occassionally.

Zitat:

mecej4 wrote:

Quote:

For example, I change k as 'k=1', it is still the former value.

How did you check this? If you used a symbolic debugger to do so, note that if you have optimization enabled some variables may be handled entirely in registers, or the value in memory and the value in a register may not be synchronized.

 I just debug the program in VS2010 and use the watch window to monitor their values. Sometimes it can not be changed. For a short programm, it will always work well. But for a long one, this mistake will happen occassionally.

Zitat:

Andrew Smith wrote:

Can we see a complete code example showing the problem please

the program is for numerical simulation and it too long. it also need the data file to run smoothly. I use another complier to debug the program, the mistake disappeared. So maybe i did not install the complier properly.

Zitat:

TimP (Intel) wrote:

Fortran doesn't permit changing a loop control variable inside the loop.  Ideally, the compiler gives you a diagnosis when you attempt to violate the rule.  If you succeed in changing it without being caught, the program behavior is undefined.

As others hinted, it would be important to give an example to clarify your meaning.

i did not change the a loop control variable inside the loop.  i just mean it did not increase an it will be. 

module aaa                                                                                                                                                                                                                     subroutine b1                                                                                                                                                                                                                  integer i,j,k                                                                                                                                                                                                        do i=1,30...                                                                                                                                                                                                    end subroutine                                                                                                                                                                                                                     subroutine b2                                                                                                                                                                                                                  integer i,j,k                                                                                                                                                                                                        do i=1,30...                                                                                                                                                                                                    end subroutine                                                                                                                                                                                                                     subroutine b3                                                                                                                                                                                                                  integer i,j,k                                                                                                                                                                                                        do i=1,30...                                                                                                                                                                                                    end subroutine                                                                                                                                                                                                                  end module                                                                                                                                                                                                               

When i called subroutine b1,everything is ok, but when i called b2, the value of 'i' is still the previous value obtained when return form b1.  Even if i use 'i=1', the value of 'i' still can not be changed.

Thank you for your insightful comments. Maybe the code is too simple to find out the ture reason,and i have solved this porblem by changing the version of my complier. So if i come acorss the problem again, i will give a more detail codes. Thank you very much.