error in mgdraw.f

This is a multi-part message in MIME format.

------_=_NextPart_001_01C8C61E.17D8F777
Content-Type: text/plain;
        charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

Dear Fluka users,

I am facing the following error when using BXDRAW entry
in the user routine mgdraw.f .

>>>>>>>>>
Subscript out of range on file line 135, procedure src/mgdraw.f/.
Attempt to access the -7-th element of variable am.
>>>>>>>>>

and the corresponding code at line 135 is

>>>>>>>
line 134: c--- Particle surviving
line 135: IF(ETRACK.GT.AM(JTRACK)) THEN
>>>>>>>

So should i test first the variable JTRACK before calling AM(JTRACK)??
=20
                                  thanks in advance ,
                                              Denis Bertini
Received on Wed Jun 4 20:58:51 2008