--- DarthVader/CalorimeterLevel2/src/CaloLevel0.cpp	2014/01/16 15:29:08	1.34
+++ DarthVader/CalorimeterLevel2/src/CaloLevel0.cpp	2014/06/06 14:18:15	1.35
@@ -1942,6 +1942,47 @@
   ClearTrkVar();
 }
 
+void CaloLevel0::FillTrkVar(TClonesArray *tcl, Int_t nutrk){
+  //
+  CaloTrkVar *t_ca = new CaloTrkVar();
+  //
+  t_ca->trkseqno = trkseqno; 
+  t_ca->ncore = (Int_t)clevel2->ncore; 
+  t_ca->qcore = clevel2->qcore;
+  t_ca->noint = (Int_t)clevel2->noint;
+  t_ca->ncyl = (Int_t)clevel2->ncyl;
+  t_ca->qcyl = clevel2->qcyl;
+  t_ca->qtrack = clevel2->qtrack;
+  t_ca->qtrackx = clevel2->qtrackx;
+  t_ca->qtracky = clevel2->qtracky;
+  t_ca->dxtrack = clevel2->dxtrack;
+  t_ca->dytrack = clevel2->dytrack;
+  t_ca->qlast = clevel2->qlast;
+  t_ca->nlast = (Int_t)clevel2->nlast;
+  t_ca->qpre = clevel2->qpre;
+  t_ca->npre = (Int_t)clevel2->npre;
+  t_ca->qpresh = clevel2->qpresh;
+  t_ca->npresh = (Int_t)clevel2->npresh;
+  t_ca->qtr = clevel2->qtr;
+  t_ca->ntr = (Int_t)clevel2->ntr;
+  t_ca->planetot = (Int_t)clevel2->planetot;
+  t_ca->qmean = clevel2->qmean;
+  t_ca->dX0l = clevel2->dX0l;
+  t_ca->qlow = clevel2->qlow;
+  t_ca->nlow = (Int_t)clevel2->nlow;
+  //
+  memcpy(t_ca->tibar,clevel2->tibar,sizeof(clevel2->tibar));
+  memcpy(t_ca->tbar,clevel2->tbar,sizeof(clevel2->tbar));
+  //
+  // 
+  TClonesArray &t = *tcl;
+  new(t[nutrk]) CaloTrkVar(*t_ca);
+  //
+  delete t_ca;
+  //
+  ClearTrkVar();
+}
+
 void CaloLevel0::GetCommonVar(){
   calol2cm();
 }