Sample test data source

	Sample test data source

// The internal test data source is a set of 5 gaussian distributions which
// produce a fixed size event.
// The distributions are defined below:

//                              Cent.  Sigma  Largest allowed value.
static CGaussianDistribution d1(512.0, 128.0, 1024.0);
static CGaussianDistribution d2(256.0,  64.0, 1024.0);
static CGaussianDistribution d3(128.0,  32.0, 1024.0);
static CGaussianDistribution d4( 64.0,  16.0, 1024.0);
static CGaussianDistribution d5( 32.0,   8.0, 1024.0);

void 
CTclGrammerApp::SetupTestDataSource()  
{
  CTestFile* pTestSource = new CTestFile;
  pTestSource->AddDistribution(d1);
  pTestSource->AddDistribution(d2);
  pTestSource->AddDistribution(d3);
  pTestSource->AddDistribution(d4);
  pTestSource->AddDistribution(d5);

  pTestSource->Open("Testing", kacRead);

  gpEventSource = pTestSource;