source: Sophya/branches/Reza/AddOn/TAcq/traidf.cc@ 3537

Last change on this file since 3537 was 3537, checked in by ansari, 17 years ago

Ajout du module AddOn/TAcq (programmes test pour acquisition BAORadio) ds cvs sophya (sous-repertoire AddOn/) , Reza 22/10/2008

File size: 365 bytes
RevLine 
[3537]1int SZ = 25000;
2int N = 10;
3
4{
5 Timer tm("traid.cc");
6 TArray<int_4> ia(SZ,0,0);
7 ia = RegularSequence();
8 tm.Split("ia-OK");
9 char flnm[128];
10 for(int i=0; i<N; i++) {
11 sprintf(flnm, "!traid%d.fits",i);
12 string ss = flnm;
13 cout << i << "-----> Creating file " << flnm << endl;
14 FitsOutFile fo(ss);
15 fo << ia;
16 tm.Split("Write-Done");
17 }
18}
Note: See TracBrowser for help on using the repository browser.