Thank you Jose . That was the typo in the email.
Yes I did WRITE(97,*) with the intent that I want to produce the file with 97.
I thought there was something with the unit number so I did 97 and 99 just to see but nothing worked.
Thank you
From: Jose Antonio Briz Monago
Sent: 12 December 2017 11:37
To: David Sangcheol Lee <david.sangcheol.lee_at_cern.ch>
Subject: Re: [fluka-discuss]: problem of writing a file from source routine
Hi David,
I don’t usually check the Fluka-discuss mailing list since I am not responsible for that but I follow the list just to learn about FLUKA and today I saw your email.
To produce the *fort.99 file you have to modify your code to something like “WRITE(99,*)” instead of “WRITE(97,*)”. As is is now your source routine should produce *fort.97 files with the info that you want to output. Check it and let me know.
Cheers,
Jose
-------------------------------------------------
Jose Antonio Briz Monago
EN-STI-FDA, CERN
Office 864-2-D03
CH-1211 Geneva 23
Switzerland
Phone: +41-22 767 7987
Email: ja.briz_at_cern.ch<mailto:ja.briz_at_cern.ch>
-------------------------------------------------
El 12 dic 2017, a las 10:04, David Sangcheol Lee <david.sangcheol.lee_at_cern.ch<mailto:david.sangcheol.lee_at_cern.ch>> escribió:
Dear fluka expert
I have added few extra lines in the source.f for the parabolic beam distribution. I
n order to make sure that the beam coordinates are correct, I placed WRITE(97,*) XFLK (NPFLKA) , YFLK (NPFLKA), ZFLK (NPFLKA)
Where XFLK (NPFLKA) = rad*sin(theta)
YFLK (NPFLKA) = rad*cos(theta)
ZFLK (NPFLKA) = ZBEAM
However, after multiple times, there is no fort file with unit 99 created and I cannot figure out why it is not producing the file.
Could someone explain it to me what I did wrong?
I enclose the source file in this.
Thank you
Kind regards
Cordialement
<image001.jpg> David Sangcheol Lee
CERN / HSE-RP
European Organisation for Nuclear Research
1211 Geneva 23, Switzerland
Email: david.sangcheol.lee_at_cern.ch<mailto:david.sangcheol.lee_at_cern.ch>
<source_changed.f>
__________________________________________________________________________
You can manage unsubscription from this mailing list at
https://www.fluka.org/fluka.php?id=acc_info
Received on Tue Dec 12 2017 - 13:05:28 CET