Currently, the files for Fritiof are:

fritiof_7.02 
aiadne_402r.f
jetset_73B.f
pythia_55.f

Version info. was dropped from the  original file name.


Zlujets.h must present in Particle/Event/Interface, too.
The same common as /arjetx/ given in Zarjetx.h must be
given in fritiof.f;  the igredient names must be different
so that it can interface /lujets/.
function rlu in jetset has been replaced by rndc so that
the random number generation be  controled by Cosmos.

When using 'new1/2', one must be careful that if the
energy and 'fixt' or 'cms' specifications are the same
as the previous call, Fritiof judges that the input
parameters are the same as the previous call even if
the contents of 'new1/2' is changed.

+++++++++++++++++++++
chaging pythia external namaes
  
xxxxxx --> xxxxxC


awk -f modpythia.awk pythia.f > firstdata

supress top blanks

sort firstdata | uniq > seconddata

awk '$2=="common"' seconddata > commondata

awk '$2!="common"' seconddata | awk '{print length($1), $0}' | sort -k1 -n -r | awk '{print $2, $3}' > forsuborbdata


drop ludat* in commondata


gawk -f repcommon.awk pythia.f > pythia1.f

There is no ^/^/^/^/ line in result.   If there is, it is > 72.

 

gawk -f replsubetc.awk pythia1.f > pythia2.f

edit pythia2.f and modify the line with ^/^/.




gawk -f repcommon.awk 
gawk -f replsubetc.awk 
must be applied for jetset.f ariadone.f fritiof.f
similarly.


In 
ariadone2.f
replace all leptou  by leptouC; name confilict with
dpmjet
 
mv fritiof.f  fritiof.fOrig
  etc

mv fritiof2.f  fritiof.f
etc


rm *1.f

In Particle/Event/Interface

	cfrevent.f:  common /pypars/  --> /pyparsC/
