COSMOS v7.655  COSMOSv7655
(AirShowerMC)
Zmagfield.h
Go to the documentation of this file.
1 ! #ifndef Zmagfield_
2 ! #define Zmagfield_
3 #include "Zunionmap.h"
4 !
5  type magfield
6  sequence
7 ! Note that position vector where the magnetic field is given
8 ! is not included here.
9 ! unit of field strength is in T (1 gauss = 10**-4 T)
10 #ifdef UNIONMAP
11  union
12  map
13 #endif
14  real*8 x, ! in earth_center coordinate
15  * y, !
16  * z !
17 
18 #ifdef UNIONMAP
19  endmap !
20  map
21  real(8):: F(3)
22  endmap ! same as x,y,z
23 
24  map
25  real*8 n, ! north com.
26  * e, ! east comp.
27  * d ! down com.
28  endmap ! 'ned' this is for geomag
29  map
30  real*8 h, ! horizontal comp.
31  * v, ! vertical comp.(down is +)
32  * a ! deflection angle (deg. east is +)
33 
34  endmap
35  endunion
36 #endif
37 !
38  character*4 sys ! which system. 'xyz', 'ned', 'hva'
39  end type magfield
40 ! #endif /* Zmagfield.h */
nodes z
struct @0 com
float real
Definition: Zdef.h:2
dE dx *! Nuc Int sampling table e
Definition: cblkMuInt.h:130
*Zfirst p fm *Zfirst p Zfirst p Zfirst p *Zfirst p *Zfirst pos xyz Zfirst pos xyz sys
Definition: ZavoidUnionMap.h:1
real(4), dimension(:), allocatable, save h
Definition: cNRLAtmos.f:28
! Parameters used for hadronic cascade shower is generated newline ! For you may give as as or em as(order/case/separator insensitive) is to generate EM-cascade and AS. \newline ! Generate
! Zobs h header file for observation sites definition ! integer horizontal
Definition: Zobs.h:4
max ptcl codes in the system(except krare) integer kphoton
dE dx *! Nuc Int sampling table d
Definition: cblkMuInt.h:130
! type magfield sequence ! Note that position vector where the magnetic field is given ! is not included here ! unit of field strength is in T(1 gauss=10 **-4 T) union map real *8 x
real(4), save a
Definition: cNRLAtmos.f:20
! type magfield sequence ! Note that position vector where the magnetic field is given ! is not included here ! unit of field strength is in ! in earth_center coordinate * y
Definition: Zmagfield.h:15
Definition: Zpos.h:16
*Zfirst p fm *Zfirst p Zfirst p Zfirst p *Zfirst p *Zfirst pos xyz Zfirst pos xyz *Zfirst pos *Zfirst pos Zfirst pos *Zfirst pos *Zfirst Zfirst vec w *Zfirst vec w Zfirst vec *Zfirst Zfirst where
Definition: ZavoidUnionMap.h:1
! constants used for pair brem in Air real *mbtoPX0 ! mbtoPgrm x X0g If multiplied to sigma in ! we obtain probability radation length real *X0g ! radiation length in g cm real *cScrC1 ! const which appears in the complete screening ! crossection real *cScrC2 ! the other such one real too **media Zeff **Z **real *BrScrE ! below this
Definition: ZbpCnst.h:20
program geomag
Definition: Geomag.f:3
integer n
Definition: Zcinippxc.h:1
block data cblkIncident data *Za1ry is
Definition: cblkIncident.h:5
! structure defining a particle at production ! Basic idea of what is to be contained in ! the particle structue is that dynamical ones should be included those derivable from the particle code ! is not included ******************************************************type fmom momentum sequence union map real e endmap map real * x
Definition: Zptcl.h:21
block data cblkElemag data *AnihiE ! Eposi< 1 TeV, anihilation considered *X0/365.667/, ! radiation length of air in kg/m2 *Ecrit/81.e-3/, ! critical energy of air in GeV *MaxComptonE/1./, ! compton is considered below 1 GeV *MaxPhotoE/1.e-3/, ! above this, PhotoElectric effect neg. *MinPhotoProdE/153.e-3/, ! below 153 MeV, no gp --> hadrons ! scattering const Note
Definition: cblkElemag.h:7