#include "Stntuple/run1/StnRun1InitDataBlocks.hh"
#include "Stntuple/run1/TStnRun1Event.hh"
#include "Stntuple/obj/TStnVertex.hh"
#include "Stntuple/obj/TStnVertexBlock.hh"


//_____________________________________________________________________________
Int_t StnRun1InitVertex(TStnVertex* Vert, StnVertexBlock_t* R1v, Int_t Iv) 
{
  // init vertex object from a UC standard Ntuple

  Vert->fVClass = R1v->Vclass[Iv];
  Vert->fVertex.SetXYZ(0,0,R1v->Vz[Iv]);
  Vert->fQ      = R1v->Vq[Iv];

  return 0;
}



//_____________________________________________________________________________
int StnRun1InitVertexBlock(TStnDataBlock* Block, TStnEvent* Event, int Mode) 
{
  // initialize vertex data block starting from Run1 UC Stntuple

  TStnRun1Event* event = (TStnRun1Event*) Event;

  TStnVertexBlock* blk = (TStnVertexBlock*) Block;
  blk->Clear();

  StnVertexBlock_t* r1v = event->VertexBlock();

  blk->fPtnov     = r1v->ptnov;   
  blk->fVzev      = r1v->vzev;   
  blk->fVclassev  = r1v->vclassev;
  blk->fVxprim.SetXYZ(r1v->Vxprim[0],r1v->Vxprim[1],r1v->Vxprim[2]);

  for (int i=0; i<r1v->Npvert; i++) {
    TStnVertex* v = blk->NewVertex();
    StnRun1InitVertex(v,r1v,i);
  }
  return 0;
}
//_____________________________________________________________________________