COSMOS v7.655  COSMOSv7655
(AirShowerMC)
Zmagfield.h
Go to the documentation of this file.
1 /*
2 #include "Zunionmap.h"
3 c
4  structure /magfield/
5 c Note that position vector where the magnetic field is given
6 c is not included here.
7 c unit of field strength is in T (1 gauss = 10**-4 T)
8 #ifdef UNIONMAP
9  union
10  map
11 #endif
12  real*8 x, ! in earth_center coordinate
13  * y, !
14  * z !
15 
16 #ifdef UNIONMAP
17  endmap ! 'hva'. this is for geomag.
18  map
19  real*8 n, ! north com.
20  * e, ! east comp.
21  * d ! down com.
22  endmap ! 'ned' this is for geomag
23  map
24  real*8 h, ! horizontal comp.
25  * v, ! vertical comp.(down is +)
26  * a ! deflection angle (deg. east is +)
27 
28  endmap
29  endunion
30 #endif
31 c
32  character*4 sys ! which system. 'xyz', 'ned', 'hva'
33  end structure
34 
35 */
36 
37 
38 
39 struct magfield {
40  double x;
41  double y;
42  double z;
43  char sys[4];
44  DUMMYCHAR
45 };
46 
47 
#define DUMMYCHAR
Definition: Zdef.h:8
double x
Definition: Zmagfield.h:40
double z
Definition: Zmagfield.h:42
double y
Definition: Zmagfield.h:41
char sys[4]
Definition: Zmagfield.h:43