forrtl: severe (174): SIGSEGV, segmentation fault occurred

[milenko1976]

I have compiled with heap-arrays
milenko@milenkons:~/ircg1$ ifort -c -g -traceback -heap-arrays -O2 arej.for
milenko@milenkons:~/ircg1$ ifort -o arej -g -traceback -heap-arrays -O2 arej.for
milenko@milenkons:~/ircg1$ ./arej
forrtl: severe (174): SIGSEGV, segmentation fault occurred
Image PC Routine Line Source
arej 0804A0AB MAIN__ 14 arej.for
arej 08049D14 Unknown Unknown Unknown
libc.so.6 00417BD6 Unknown Unknown Unknown
arej 08049C21 Unknown Unknown Unknown

[albert]

Had a quick look at the code, but what is the stopping condition of the do loop?
Compilation with boundary checking might give a clue.

Albert