Hello,
The mgdrawBDX.f file has some implementation mistakes:
You are comparing the character*8 strings MRGNAM* (*= ,1,2,3,4,5) to strings of other lengths, e.g.
NRGNAM1 .EQ. "FLOOR"
you may correct that by adding blanks or by specifying the range, e.g. NRGNAM1(1:5).EQ."FLOOR"
Besides that, it would be more efficient to use GEON2R at the initialization phase and store in integer variables the region numbers associated to "CEILING", "FLOOR", etc. Then compare MREG to those stored integer variables (instead of comparing the strings MRGNAM... to other strings). That way, you would spare FLUKA from performing all those GEOR2N conversions in each boundary crossing during runtime.
Also, I am not sure what you are coding in your source routine, but it reads as a spherical source. If so, please note that there is a built-in card for that. It is encouraged to use built-in features to minimize errors and increase efficiency. Please take a look at the links below to see if you can make use of anything already existing:
https://agenda.infn.it/event/20624/contributions/105889/attachments/68617/84988/AdvancedSources2019.pdf
Sources - Agenda (Indico)<
https://agenda.infn.it/event/20624/contributions/105889/attachments/68617/84988/AdvancedSources2019.pdf>
8 Extended sources –Cylindrical shell source Input card: BEAMPOS If SDUM= CYLI-VOL: defines a spatially extended source in a cylindrical shell with the height parallel to the z-axis of the beam frame
agenda.infn.it
-M
________________________________
From: owner-fluka-discuss_at_mi.infn.it <owner-fluka-discuss_at_mi.infn.it> on behalf of ashishsingh_at_barctara.gov.in <ashishsingh_at_barctara.gov.in>
Sent: Sunday, July 12, 2020 9:07 PM
To: fluka-discuss_at_fluka.org <fluka-discuss_at_fluka.org>
Subject: [Fwd: [fluka-discuss]: FLUKA: USERDUMP Card and magdrawBDX.f]
---------------------------- Original Message ----------------------------
Subject: [fluka-discuss]: FLUKA: USERDUMP Card and magdrawBDX.f
From: ashishsingh_at_barctara.gov.in
Date: Thu, July 9, 2020 11:03 am
To: fluka-discuss_at_fluka.org
--------------------------------------------------------------------------
Dear FLUKA experts,
For evaluation of free air Kerma rate inside a house i need to use
userdump card for which i have modified magdrawBDX.f file according to my
problem. I have already modified source.f which is giving desirable
result. But when i have compile magdrawBDX.f along with source.f,
compilation was successful but after running for 1000 histories, Out of
five only first cycle gives the desired files but that files were blank.
Here i have attached my input files. Please give your valuable suggestions
to solve this problem.
Thanks & Regards
--
Ashish Kumar Singh
email id- ashishsingh_at_barctara.gov.in
--
Ashish Kumar Singh
Scientific Officer,(C)
WIP,BARC
Tarapur
Ph. No.-66174
__________________________________________________________________________
You can manage unsubscription from this mailing list at https://www.fluka.org/fluka.php?id=acc_info
Received on Mon Jul 13 2020 - 19:33:49 CEST