Sorry to answer to my own mail :
the problem is solved :
I used construction :
REAL PMAS
IF (JTRACK .LT. -6) THEN
PMAS = AMNHEA (-JTRACK)
ELSE
PMAS = AM (JTRACK)
END IF
Now replace REAl --> REAL(8)
and E kinematic > 0 now
Vladimir
07.08.2021 14:30, babintsev пишет:
> Dear experts,
> these days I have met strange situation:
>
> my program does not work : arithmetic error
> BUT 1-2 months ago this program worked very well... !
> - the same program and the same FLUKA version !
>
>
> With gdb help I observed the following :
> E kinematic = Etotal - M < 0 ! -> for neutrons (very slow neutrons)
>
> and there are a lot of such cases...
>
> Can you please give some explanation :
>
> 1) how is it possible ? program worked before ...?
> 2) could you please give correct definition of Ekinematic ?
>
> thank you
> Vladimir
>
> //========================
>
__________________________________________________________________________
You can manage unsubscription from this mailing list at
https://www.fluka.org/fluka.php?id=acc_info
Received on Mon Aug 09 2021 - 09:34:00 CEST