Mysterious code fragment

Dear FLUKA experts,

I've found the following mysterious fragment in the SODRAW entry of MGDRAW:

* +-------------------------------------------------------------------*
* | (Radioactive) isotope: it works only for 1 source particle on
* | the stack for the time being
       IF ( ILOFLK (NPFLKA) .GE. 100000 .AND. LRADDC (NPFLKA) ) THEN
          IARES = MOD ( ILOFLK (NPFLKA), 100000 ) / 100
          IZRES = MOD ( ILOFLK (NPFLKA), 10000000 ) / 100000
          IISRES = ILOFLK (NPFLKA) / 10000000

The variables IARES, IZRES and IISRES aren't used in MGDRAW and they
aren't declared in FLUKA commons. What is a meaning of the code above?

Regards,

Vassili
Received on Fri Apr 09 2010 - 15:01:34 CEST