72 TTRAP::TTRAP(
const char *name, 
const char *title, 
const char *material, Float_t dz, Float_t theta, Float_t phi,
 
   73              Float_t h1, Float_t bl1, Float_t tl1, Float_t alpha1, Float_t h2,
 
   74              Float_t bl2, Float_t tl2, Float_t alpha2) : TBRIK(name, title,material,theta,phi,dz)
 
   96 void TTRAP::SetPoints(Double_t *points)
 const 
   98    const Float_t pi = Float_t (TMath::Pi());
 
   99    Float_t alpha1 = fAlpha1    * pi/180.0;
 
  100    Float_t alpha2 = fAlpha2    * pi/180.0;
 
  101    Float_t theta  = TBRIK::fDx * pi/180.0;
 
  102    Float_t phi    = TBRIK::fDy * pi/180.0;
 
  103    Float_t tth    = TMath::Tan(theta);
 
  104    Float_t tx     = tth*TMath::Cos(phi);
 
  105    Float_t ty     = tth*TMath::Sin(phi);
 
  106    Float_t tth1   = TMath::Tan(alpha1);
 
  107    Float_t tth2   = TMath::Tan(alpha2);
 
  110       points[ 0] = -fDz*tx-tth1*fH1-fBl1 ; points[ 1] = -fH1-fDz*ty ; points[ 2] = -fDz;
 
  111       points[ 3] = -fDz*tx+tth1*fH1-fTl1 ; points[ 4] =  fH1-fDz*ty ; points[ 5] = -fDz;
 
  112       points[ 6] = -fDz*tx+tth1*fH1+fTl1 ; points[ 7] =  fH1-fDz*ty ; points[ 8] = -fDz;
 
  113       points[ 9] = -fDz*tx-tth1*fH1+fBl1 ; points[10] = -fH1-fDz*ty ; points[11] = -fDz;
 
  114       points[12] =  fDz*tx-tth2*fH2-fBl2 ; points[13] = -fH2+fDz*ty ; points[14] = fDz;
 
  115       points[15] =  fDz*tx+tth2*fH2-fTl2 ; points[16] =  fH2+fDz*ty ; points[17] = fDz;
 
  116       points[18] =  fDz*tx+tth2*fH2+fTl2 ; points[19] =  fH2+fDz*ty ; points[20] = fDz;
 
  117       points[21] =  fDz*tx-tth2*fH2+fBl2 ; points[22] = -fH2+fDz*ty ; points[23] = fDz;