88 {
90 Gaudi::svcLocator()->service(
"MessageSvc",
msgSvc );
91 MsgStream log(
msgSvc,
"MdcCalConstMgr" );
92 log << MSG::WARNING << "read calibration data directly from run directory" << endmsg;
93
94 TFile fconst( "MdcCalibConst.root" );
95 log << MSG::INFO << "open file" << endmsg;
96
97
98 int i;
100 double xtpar;
101 int entry;
102 TTree* xttree = (TTree*)fconst.Get( "XtTree" );
103 xttree->SetBranchAddress(
"xtkey", &
key );
104 xttree->SetBranchAddress( "xtpar", &xtpar );
105 entry = (int)xttree->GetEntries();
106 for ( i = 0; i < entry; i++ )
107 {
108 xttree->GetEntry( i );
110 }
111 log << MSG::INFO << "read XTtree" << endmsg;
112
113
114 double t0;
115 double delt0;
116 TTree* t0tree = (TTree*)fconst.Get( "T0Tree" );
117 t0tree->SetBranchAddress( "t0", &t0 );
118 t0tree->SetBranchAddress( "delt0", &delt0 );
119 entry = (int)t0tree->GetEntries();
120 for ( i = 0; i < entry; i++ )
121 {
122 t0tree->GetEntry( i );
125 }
126 log << MSG::INFO << "read XTtree" << endmsg;
127
128
129 double qtpar0;
130 double qtpar1;
131 TTree* qttree = (TTree*)fconst.Get( "QtTree" );
132 qttree->SetBranchAddress( "qtpar0", &qtpar0 );
133 qttree->SetBranchAddress( "qtpar1", &qtpar1 );
134 entry = (int)qttree->GetEntries();
135 for ( i = 0; i < entry; i++ )
136 {
137 qttree->GetEntry( i );
140 }
141
142
143 double sdpar;
144 TTree* sdtree = (TTree*)fconst.Get( "SdTree" );
145 sdtree->SetBranchAddress(
"sdkey", &
key );
146 sdtree->SetBranchAddress( "sdpar", &sdpar );
147 entry = sdtree->GetEntries();
148 for ( i = 0; i < entry; i++ )
149 {
150 sdtree->GetEntry( i );
152 }
153
154 fconst.Close();
155
156 log << MSG::INFO << "read MdcCalibConst over" << endmsg;
157}
*************DOUBLE PRECISION m_pi *DOUBLE PRECISION m_HvecTau2 DOUBLE PRECISION m_HvClone2 DOUBLE PRECISION m_gamma1 DOUBLE PRECISION m_gamma2 DOUBLE PRECISION m_thet1 DOUBLE PRECISION m_thet2 INTEGER m_IFPHOT *COMMON c_Taupair $ !Spin Polarimeter vector first Tau $ !Spin Polarimeter vector second Tau $ !Clone Spin Polarimeter vector first Tau $ !Clone Spin Polarimeter vector second Tau $ !Random Euler angle for cloning st tau $ !Random Euler angle for cloning st tau $ !Random Euler angle for cloning st tau $ !Random Euler angle for cloning nd tau $ !Random Euler angle for cloning nd tau $ !Random Euler angle for cloning nd tau $ !phi of HvecTau1 $ !theta of HvecTau1 $ !phi of HvecTau2 $ !theta of HvecTau2 $ !super key
void fillXtpar(int key, double val)
void fillQtpar0(double val)
void fillQtpar1(double val)
void fillDelT0(double val)
void fillSdpar(int key, double val)