
This directory containes programs to make a random sampling of 
detector response when an electron or gamma ray falls in a
detector consising of Pb0.5cm + Fe0.1cm + Scintillator3.5cm
(that is, Tibet detector).  You can get energy deposit in the
scintillator and its equivalent particle numbers (in terms of
a minimum ionizing vertical muon response).  Such sampling
should be performed very quickly so that we cannot do a
M.C simulation of cascade in the detector for each particle.
In stead, such  M.C simulations were performed for a wide 
range of energies and angles for gamma rays  and electrons
beforehand.  I made a sampling tables based on such simulations.
This was used when I made GENAS sampling table.


cedP5F1S35.f is the main subroutine which you may call, others
will be called automatically from this routine.

cedP5F1S35Test.f is a sample test program.  If you want to see
response for electrons, give k = 2; if for gamma, k =1.
Note it is important to give the incident angle (in cos) of
each particle to the detector.  The subroutines need some
Cosmos library, so that you may use the test program by

f77 (fort77 for HP) *.f -L$COSMOSTOP -lcosmos



