Ahmed-Naceur / dragon5

Three-Dimensional Discrete Ordinates Neutron, Photon, Electron and Positron Transport Code
7 stars 1 forks source link

HEAT: bug with dose in 1D #3

Closed Ahmed-Naceur closed 2 years ago

Ahmed-Naceur commented 2 years ago

<|DEPOS := HEAT: EEDIT EEDITcopy :: EDIT 99 ; |<0101 ->@BEGIN MODULE : HEAT: ->@DESCRIPTION : Compute the energy and charge deposition values ->@CREDITS : A. Hebert ->@COPYRIGHTS : ECOLE POLYTECHNIQUE DE MONTREAL GNU LESSER GENERAL PUBLIC LICENSE 1 1 3.1564719850213705 2 1 3.5234638995730858 3 1 3.7598442275413437 4 1 3.9388792536116419 5 1 4.0853519356826453 6 1 4.2094934908015791 7 1 4.3160994020879979 8 1 4.4079193703557680 9 1 4.4869087828697714 10 1 4.5544940597204260 11 1 4.6118191719473387 12 1 4.6596375717994665 13 1 4.6986003235756550 14 1 4.7292024961369856 15 1 4.7517502261256075 16 1 4.7665581655511646 17 1 4.7737671181648649 18 1 4.7733763801944837 19 1 4.7653953071556110 20 1 4.7497119955645921 21 1 4.7260673657222823 22 1 4.6942738110221223 23 1 4.6538535977242894 24 1 4.6042373608431202 

Ahmed-Naceur commented 2 years ago

This error is located in HEAT.f before:

   60 CALL HEADRV(IPDEP,NENTRY-1,KENTRY(2),NBMIX,NGRP,ZNORM,IMPX,ESUM,
     1 CSUM,DSUM)