//*CMZ : 2.00/00 17/04/99 07.50.09 by Rene Brun
//*CMZ : 1.03/09 07/12/97 16.44.34 by Fons Rademakers
//*-- Author : Rene Brun 03/10/95
//*KEEP,CopyRight,T=C.
/*************************************************************************
* Copyright(c) 1995-1999, The ROOT System, All rights reserved. *
* Authors: Rene Brun, Fons Rademakers. *
* For list of contributors see $ROOTSYS/AA_CREDITS. *
* *
* Permission to use, copy, modify and distribute this software and its *
* documentation for non-commercial purposes is hereby granted without *
* fee, provided that the above copyright notice appears in all copies *
* and that both the copyright notice and this permission notice appear *
* in the supporting documentation. The authors make no claims about the *
* suitability of this software for any purpose. It is provided "as is" *
* without express or implied warranty. *
*************************************************************************/
//*KEND.
//*KEEP,TMixture.
#include "TMixture.h"
//*KEEP,TMath.
#include "TMath.h"
//*KEND.
ClassImp(TMixture)
//______________________________________________________________________________
//
// Manages a detector mixture. See class TGeometry.
//
//______________________________________________________________________________
TMixture::TMixture()
{
//*-*-*-*-*-*-*-*-*-*-*Mixture default constructor*-*-*-*-*-*-*-*-*-*-*-*
//*-* ============================
fAmixt = 0;
fZmixt = 0;
fWmixt = 0;
}
//______________________________________________________________________________
TMixture::TMixture(Text_t *name, Text_t *title, Int_t nmixt)
:TMaterial(name,title,0,0,0)
{
//*-*-*-*-*-*-*-*-*-*-*Mixture normal constructor*-*-*-*-*-*-*-*-*-*-*-*-*
//*-* ============================
//*-*
//*-* Defines mixture OR COMPOUND as composed by
//*-* the basic nmixt materials defined later by DefineElement.
//*-*
//*-* If nmixt > 0 then Wmixt contains the PROPORTION BY WEIGHTS
//*-* of each basic material in the mixture.
//*-*
//*-* If nmixt < 0 then Wmixt contains the number of atoms
//*-* of a given kind into the molecule of the COMPOUND
//*-* In this case, Wmixt is changed to relative weights. *
//*-*
//*-* nb : the radiation length is computed according
//*-* the EGS manual slac-210 uc-32 June-78
//*-* formula 2-6-8 (37)
//*-*
//*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
if (nmixt == 0) {
fAmixt = 0;
fZmixt = 0;
fWmixt = 0;
fNmixt = 0;
Error("TMixture", "mixture number is 0");
return;
}
Int_t nm = TMath::Abs(nmixt);
fNmixt = nmixt;
fAmixt = new Float_t[nm];
fZmixt = new Float_t[nm];
fWmixt = new Float_t[nm];
}
//______________________________________________________________________________
TMixture::~TMixture()
{
//*-*-*-*-*-*-*-*-*-*-*Mixture default destructor*-*-*-*-*-*-*-*-*-*-*-*-*
//*-* ============================
delete [] fAmixt;
delete [] fZmixt;
delete [] fWmixt;
fAmixt = 0;
fZmixt = 0;
fWmixt = 0;
}
//______________________________________________________________________________
void TMixture::DefineElement(Int_t n, Float_t a, Float_t z, Float_t w)
{
//*-*-*-*-*-*-*-*-*-*-*Define one mixture element*-*-*-*-*-*-*-*-*-*-*-*-*-*
//*-* ==========================
if (n < 0 || n >= TMath::Abs(fNmixt)) return;
fAmixt[n] = a;
fZmixt[n] = z;
fWmixt[n] = w;
}
//_______________________________________________________________________
void TMixture::Streamer(TBuffer &b)
{
//*-*-*-*-*-*-*-*-*Stream a class object*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
//*-* =========================================
if (b.IsReading()) {
b.ReadVersion(); //Version_t v = b.ReadVersion();
TMaterial::Streamer(b);
b >> fNmixt;
fAmixt = new Float_t[fNmixt];
fZmixt = new Float_t[fNmixt];
fWmixt = new Float_t[fNmixt];
b.ReadArray(fAmixt);
b.ReadArray(fZmixt);
b.ReadArray(fWmixt);
} else {
b.WriteVersion(TMixture::IsA());
TMaterial::Streamer(b);
b << fNmixt;
b.WriteArray(fAmixt, fNmixt);
b.WriteArray(fZmixt, fNmixt);
b.WriteArray(fWmixt, fNmixt);
}
}
ROOT page - Class index - Top of the page
This page has been automatically generated. If you have any comments or suggestions about the page layout send a mail to ROOT support, or contact the developers with any questions or problems regarding ROOT.