LMU/musrfit
LMU/musrfit
5
0
Fork 0
Code Issues 6 Pull Requests Actions Packages Projects Releases 3 Activity

newly added

Browse Source
This commit is contained in:
nemu 2009-12-15 08:12:03 +00:00
parent 8f817c6cbc
commit 5a622da07e
1 changed files with 45 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
src/tests/t0NotEqFirstGoodData/testPoisson.C Normal file
View File

@ -0,0 +1,45 @@
/***************************************************************************
testPoisson.C
Author: Andreas Suter
e-mail: andreas.suter@psi.ch
$Id$
***************************************************************************/
/***************************************************************************
* Copyright (C) 2009 by Andreas Suter *
* andreas.suter@psi.ch *
* *
* This program is free software; you can redistribute it and/or modify *
* it under the terms of the GNU General Public License as published by *
* the Free Software Foundation; either version 2 of the License, or *
* (at your option) any later version. *
* *
* This program is distributed in the hope that it will be useful, *
* but WITHOUT ANY WARRANTY; without even the implied warranty of *
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
* GNU General Public License for more details. *
* *
* You should have received a copy of the GNU General Public License *
* along with this program; if not, write to the *
* Free Software Foundation, Inc., *
* 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
***************************************************************************/
{
gSystem->Load("$ROOTSYS/lib/libPAddPoissonNoise");
PAddPoissonNoise *apn = new PAddPoissonNoise();
const Double_t mean = 10.0;
TH1F *h = new TH1F("h", "h", 31, -0.5, 30.5);
for (UInt_t i=0; i<1e6; i++) {
h->Fill(apn->AddNoise(mean));
}
h->Draw();
}