source: Sophya/branches/Reza/AddOn/TAcq/traidp.cc@ 3755

Last change on this file since 3755 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: 363 bytes
Line 
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.ppf",i);
12 string ss = flnm;
13 cout << i << "-----> Creating file " << flnm << endl;
14 POutPersist po(ss);
15 po << ia;
16 tm.Split("Write-Done");
17 }
18}
Note: See TracBrowser for help on using the repository browser.