/[PAMELA software]/PamVMC/trk/include/f77/gpstripspe.inc
ViewVC logotype

Contents of /PamVMC/trk/include/f77/gpstripspe.inc

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1.5 - (show annotations) (download)
Fri Jun 12 18:39:54 2009 UTC (15 years, 5 months ago) by pam-rm2
Branch: MAIN
CVS Tags: v1r0, HEAD
Changes since 1.1: +14 -10 lines 
- Introduced user-defined names of output files and random seeds number.
Users can do it use options of PamVMCApplication constructor:
PamVMCApplication(const char* name,  const char *title, const char*
filename="pamtest", Int_t seed=0).
The Random object that I use is TRandom3 object which has astronomical
large period (in case of default initialization 0). All random generators
in the code use this object by calling of gRandom singleton which keeps
it.

- Corrected TOF digitization routine. No problems with TDC hits due to
hadronic interactions anymore.

- Some small changes was done to compile code under Root 5.23. +
geant4_vmc v. 2.6 without any warnings

- Some classes of PamG4RunConfiguartion was changed for geant4_vmc v.
2.6.Some obsolete classes was deleted as soon as developers implemented
regions.

- Navigation was changed from "geomRootToGeant4" to "geomRoot", because on
VMC web page written that as soon as Geant4 has no option ONLY/MANY
translation of overlapped geometry to Geant4 through VGM could be wrong.
I'd like to stay with Root navigation:
http://root.cern.ch/root/vmc/Geant4VMC.html. This should be default
option.

- New Tracker digitization routine written by Sergio was implemented

- PamVMC again became compatible with geant4_vmc v.2.5 and ROOT 5.20.
 The problem was that ROOT developers introduced in TVirtualMC class a new
method SetMagField and new base class:TVirtualMagField from which
user-defined classes shoukd be derived
1
2 ***********************def parametri di gpudiffusion.F********************************
3
4
5 parameter (pitchx=0.00255) ! X-side implantation pitch
6 parameter (pitchy=0.00665) ! Y-side read-out pitch
7 parameter (hallmob=304.5) ! Hall mobility (Peisert)
8 c parameter (bfield=0.0) ! no magnetic field
9 parameter (ebias=67/0.03) ! (effective) electric field in V/cm
10 parameter (psy1=45.) ! parabolic behaviour of sigmaY
11 parameter (psy2=0.0015) ! parabolic behaviour of sigmaY
12
13 *** used in function sig
14 parameter (eis=1.6022e-19) ! charge of the electron (I.S.)
15 parameter (boltis=1.3807e-23) ! Boltzmann's constant (I.S.)
16 parameter (temperature=300.) ! Temperature in Kelvin
17 parameter (dsigma=1.1e-6) ! spread of the energy release (m)
18
19
20
21
22 ***********************def parametri di gpucollection.F*********************************
23 PARAMETER(F1=0.043,F2=0.018,F3=0.013,F4=0.011)
24 parameter (cdec=20.0) ! decoupling capacitance (pF) -- FIXED
25 parameter (cistrx=0.35) ! X interstrip capacitance (pF)
26 parameter (cistrx2=0.6*cistrx)! 2nd neigh. interstrip cap. (X) (pF)
27 parameter (cistry=0.45) ! Y interstrip capacitance (pF)
28 ccc parameter (shiftmask=0.020) ! shift of the intermediate strip (X side)
29 parameter (shiftmask=0.000) ! shift of the intermediate strip (X side)
30 parameter (effcoupl=0.81) ! eff. in charge sharing on X strips(*)
31 parameter (xcalib=2565.) ! calib. factor (ADC/MeV) on X side
32 parameter (ycalib=1840.) ! calib. factor (ADC/MeV) on Y side
33
34 parameter (nviews=12) ! number of views
35 parameter (nplanes=nviews/2) ! number of planes
36 parameter (nladd=3) ! number of ladders per view
37 parameter (nva1=8) ! number of va1 per ladder
38 parameter (ntotva1=nva1*nladd*nviews) ! total number of va1
39 parameter (nsensors=6) ! number of sensors
40 parameter (nstrips_view=1024) ! number of strip readed/view/sensor
41 parameter (nstripx=2048) ! number of strip x
42 parameter (nstripy=1024) ! number of strip y
43
44 real proxtanti,proytanti,globstripx,globstripy
45 common/diffusione/proxtanti(nplanes,nsensors,nstripx),
46 + proytanti(nplanes,nsensors,nstripy),
47 + globstripx(nplanes,nsensors,nstripx),
48 + globstripy(nplanes,nsensors,nstripy)
49 INTEGER BADVA1
50 COMMON/BAD/BADVA1(nviews,nladd,nva1)
51
52 INTEGER MAXSTR
53 PARAMETER(MAXSTR=1000)
54 INTEGER NSTRPX,NSTRPY,ISTRIPX,ISTRIPY,NPSTRIPX,NPSTRIPY,
55 + NTSTRIPX,NTSTRIPY
56 REAL QSTRIPX,QSTRIPY,XSTRIPX,XSTRIPY,YSTRIPX,YSTRIPY,
57 + ZSTRIPX,ZSTRIPY
58 COMMON/GPSSPE/NSTRPX,NSTRPY,ISTRIPX(MAXSTR),ISTRIPY(MAXSTR),
59 + QSTRIPX(MAXSTR),QSTRIPY(MAXSTR),
60 + XSTRIPX(MAXSTR),YSTRIPY(MAXSTR),
61 + NPSTRIPX(MAXSTR),NPSTRIPY(MAXSTR),
62 + NTSTRIPX(MAXSTR),NTSTRIPY(MAXSTR)
  ViewVC Help
Powered by ViewVC 1.1.23