2 const float PI=2*acos(0);
11 plWana(
int page=13,
int pl=0,
char *core0=
"R10096140",
char *iPath=
"",
char *oPath=
""){
15 iPath=
"/star/data05/scratch/balewski/2009-Wana-SL10j-aW/data/";
37 char *nameA[]={
"muStatEve",
"muStatTrk",
"muStatBtow"};
38 char *nameB[]={
"muVRf",
"muZv",
"muNV",
"mubX48"};
39 char *nameC[]={
"mubX7",
"mubX7v"};
40 char *nameD[]={
"muDsm1",
"muDsm2",
"muDsm3",
"muDsm4"};
41 char *nameE[]={
"muTrNfit",
"muTrFitFrac",
"muTrch2",
"muTrRxyIn",
"muTrRxyOut",
"muTrch2b"};
42 char *nameF[]={
"muTr2D1",
"muTrPt1",
"muTrPt1N",
"muTrPt1Pr",
"muTrPt1NPr"};
43 char *nameG[]={
"muBmaxAdc",
"muBtotAdc",
"muBclAdcPt",
"muBclET"};
44 char *nameH[]={
"muBclET24",
"muBclE242D",
"muBclET24R"};
46 char *nameJ[]={
"muBdist1",
"muBdist2",
"muBdist3",
"muBdist4"};
47 char *nameK[]={
"muBjetETR",
"muTjetBjet2D",
"muTBjetET"};
48 char *nameL[]={
"muBjetET",
"muBclEjetE2D",
"muTjetET"};
49 char *nameM[]={
"muTwayET",
"muBwayET",
"muBclETPt",
"muEwayET"};
51 char *nameW[]={
"muTotwayET2D",
"musPtBalance_clust",
"muWET",
"muW2D1"};
52 char *namePB[]={
"musPtBalance_clust",
"musPtBalance_awayTot",
"muWeta"};
53 char *nameB1[]={
"muSEadc1",
"muSPadc1"};
54 char *nameN[]={
"muTrdEdX",
"muWdedx"};
55 char *nameO[]={
"muWglDca",
"muWglDcaSP",
"muWglDcaSN"};
57 char *nameP[]={
"muETlive0",
"muETlive1",
"muETlive2",
"muETlive3",
"muWcar1",
"muWcar2",
"muWcar3"};
59 char *nameQ[]={
"pubJoe1",
"pubJoe2",
"pubJoe3",
"pubJoe4",
"pubJoe5",
"pubJoe6",
"pubJoe7",
"pubJoe8"};
61 char *nameR1[]={
"pubStatEve",
"pubCrR",
"pubWET",
"pubchEtaCP",
"pubchEtaCN"};
62 char *nameR2[]={
"pubchRecPNg",
"pubchRecPNp"};
63 char *nameR3[]={
"pubchWETPg" ,
"pubchWETPp",
"pubchCFP0" ,
"pubchWETNp",
"pubchWETNg" ,
"pubchCFN0"};
65 char *nameS1[]={
"spinStatEve",
"spins4mon",
"spinbX48",
"spinbX7",
"spinbX48c",
"spinbX7c"};
66 char *nameS5[]={
"spinET_P",
"spinET_N",
"spinQpT",
"spinQpT2"};
67 char *nameS2[]={
"spinY0",
"spinY1",
"spinY2_P",
"spinY2_N"};
68 char *nameS3[]={,
"spinY3_P",
"spinY3_N",
"spinY4_P",
"spinY4_N"};
69 char *nameS4[]={
"spinY5_P",
"spinY5_N",
"spinLepEta"};
74 TString fullInpName=iPath; fullInpName+=core0;
75 fullInpName+=
".wana.hist.root";
76 fd=
new TFile(fullInpName);
78 printf(
"EROR: input histo file not found, quit\n",fullInpName.Data());
81 printf(
"Opened: %s\n",fullInpName.Data());
85 h0=(TH1*)fd->Get(
"muStatEve"); assert(h0);
86 printf(
"%s: ",h0->GetName());
87 for(
int k=1;k<=10;k++) printf(
"%.0f, ",h0->GetBinContent(k));
90 if(page>=23 && page<=25 && fd->Get(
"AspinStatEve")==0)
return;
92 gStyle->SetPalette(1,0);
93 gStyle->SetOptStat(0);
95 sprintf(padTit,
"%s",core0);
100 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
101 c->Divide(1,2);gStyle->SetOptStat(0);
103 for(
int i=0;i<2;i++) {
104 printf(
"->%s<\n",nameX[i]);
105 h=(TH1*)fd->Get(nameX[i]); assert(h);
106 c->cd(i+1); h->Draw();
107 if(i==0) h->Draw(
"h text");
109 c->GetPad(1)->SetLogy();
110 c->GetPad(2)->SetLogy();
114 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
115 c->Divide(2,2);gStyle->SetOptStat(1110);
117 for(
int i=0;i<4;i++) {
118 printf(
"->%s<\n",nameX[i]);
119 h=(TH1*)fd->Get(nameX[i]); assert(h);
120 c->cd(i+1); h->Draw();
121 if(i==1) h->Fit(
"gaus",
"",
"hR",-50,50);
123 c->GetPad(1)->SetLogy();
124 c->GetPad(3)->SetLogy();
129 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
130 c->Divide(1,2);gStyle->SetOptStat(10);
134 for(
int i=0;i<2;i++) {
135 printf(
"->%s<\n",nameX[i]);
136 hA[i]=(TH1F*)fd->Get(nameX[i]); assert(hA[i]);
137 if(i==0) hA[i]->Draw();
138 else hA[i]->Draw(
"same");
143 hA[0]->SetFillColor(0);
145 TH1 *hEf=(TH1F*) hA[1]->Clone();
146 hEf->SetTitle(
"Vertex effi vs. bXing");
147 hEf->SetName(
"muVefbx");
148 hEf->SetFillColor(0); hEf->SetLineColor(kMagenta);
151 hEf->Draw(); hEf->SetMaximum(1.1);
152 hEf->Fit(
"pol0",
"",
"Rh",50,100);
157 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
158 c->Divide(2,2);gStyle->SetOptStat(1001111);
160 for(
int i=0;i<4;i++) {
161 printf(
"->%s<\n",nameX[i]);
162 h=(TH1*)fd->Get(nameX[i]); assert(h);
163 c->cd(i+1); h->Draw();
165 h->SetFillColor(kBlue);
170 c->GetPad(1)->SetLogy();
171 c->GetPad(2)->SetLogy();
172 c->GetPad(3)->SetLogy();
175 case 5:{ sprintf(padTit,
"Track selection cuts, %s",core0);
176 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
177 c->Divide(3,2);gStyle->SetOptStat(110);
179 for(
int i=0;i<6;i++) {
180 printf(
"->%s<\n",nameX[i]);
181 h=(TH1*)fd->Get(nameX[i]); assert(h);
182 c->cd(i+1); h->Draw();
183 if(i==5) h->Draw(
"colz");
191 case 6:{ sprintf(padTit,
"Selected high PT tracks, %s",core0);
192 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c0=makeTitle(can,padTit,page);
193 TPad *cL,*cR; splitPadX(0.4,&cL,&cR);
195 cR->Divide(2,2);gStyle->SetOptStat(10);
198 for(
int i=0;i<5;i++) {
199 printf(
"->%s<\n",nameX[i]);
200 h=(TH1*)fd->Get(nameX[i]); assert(h);
203 for(
float eta=-0.8; eta<.6; eta+=1.4)
204 for(
float x=-PI-.1; x<PI; x+=PI/6) {
205 int sec=tpcSec(x, eta);;
207 sprintf(txt,
"sec %d",sec);
208 tx=
new TText(eta,x,txt); tx->Draw();
212 if(i==1 || i==3) {cR->cd(1+i/2); h1=h; h->Draw(); h->SetMinimum(.1);}
213 if(i==4) h->SetFillColor(9);
214 if(i==2 || i==4) { h2=h; h->Draw(
"same"); cR->cd(2+i/2);
215 h=(TH1F*) h2->Clone(); h->SetTitle(
"Ratio Negtive/all");h->Divide(h1); h->Draw();
216 h->SetMinimum(0.2); h->SetMaximum(0.7);
218 if(i>0) h->SetAxisRange(0,50);
220 cR->GetPad(1)->SetLogy();
221 cR->GetPad(2)->SetLogy();
224 case 7:{ sprintf(padTit,
"BTOW response, %s",core0);
225 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
226 c->Divide(2,2);gStyle->SetOptStat(1000110);
228 for(
int i=0;i<4;i++) {
229 printf(
"->%s<\n",nameX[i]);
230 h=(TH1*)fd->Get(nameX[i]); assert(h);
231 c->cd(i+1); h->Draw();
232 if(i==2 ) h->Draw(
"colz");
233 if(i==2) h->SetMaximum(0.6* h->GetMaximum());
235 c->GetPad(1)->SetLogy();
236 c->GetPad(2)->SetLogy();
237 c->GetPad(3)->SetLogz();
238 c->GetPad(4)->SetLogy();
241 case 8:{ sprintf(padTit,
"2x2 / 4x4 cluster isolation cut, %s",core0);
242 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
243 c->Divide(2,2);gStyle->SetOptStat(10);
245 for(
int i=0;i<3;i++) {
246 printf(
"->%s<\n",nameX[i]);
247 h=(TH1*)fd->Get(nameX[i]); assert(h);
248 c->cd(i+1); h->Draw();
249 if(i==1 ) h->Draw(
"colz");
251 c->GetPad(1)->SetLogy();
252 c->GetPad(2)->SetLogz();
255 case 9:{ sprintf(padTit,
"3D distance between track & cluster, %s",core0);
256 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
257 c->Divide(2,2);gStyle->SetOptStat(10);
259 for(
int i=0;i<4;i++) {
260 printf(
"->%s<\n",nameX[i]);
261 h=(TH1*)fd->Get(nameX[i]); assert(h);
264 else h->Draw(
"colz");
268 case 10:{ sprintf(padTit,
"separted near jet in BOW & TPC, %s",core0);
269 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
270 c->Divide(2,2);gStyle->SetOptStat(10);
272 for(
int i=0;i<3;i++) {
273 printf(
"->%s<\n",nameX[i]);
274 h=(TH1*)fd->Get(nameX[i]); assert(h);
275 c->cd(i+1); h->Draw();
276 if(i==1 ) h->Draw(
"colz");
278 c->GetPad(1)->SetLogy();
279 c->GetPad(2)->SetLogz();
280 c->GetPad(3)->SetLogy();
284 case 11:{ sprintf(padTit,
"TPC+BTOW near jet ET, %s",core0);
285 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
286 c->Divide(2,2);gStyle->SetOptStat(10);
288 for(
int i=0;i<3;i++) {
289 printf(
"->%s<\n",nameX[i]);
290 h=(TH1*)fd->Get(nameX[i]); assert(h);
291 c->cd(i+1); h->Draw();
292 if(i==1 ) h->Draw(
"colz");
295 c->GetPad(2)->SetLogz();
299 case 12:{ sprintf(padTit,
"away ET veto, %s",core0);
300 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
301 c->Divide(2,2);gStyle->SetOptStat(10);
303 for(
int i=0;i<4;i++) {
304 printf(
"->%s<\n",nameX[i]);
305 h=(TH1*)fd->Get(nameX[i]); assert(h);
306 c->cd(i+1); h->Draw();
307 if(i==2) h->SetAxisRange(0,60);
312 c->GetPad(1)->SetLogy();
313 c->GetPad(2)->SetLogy();
314 c->GetPad(4)->SetLogy();
319 case 13:{ sprintf(padTit,
"best W selection, %s",core0);
320 can=
new TCanvas(
"aa",
"aa",900,800); TPad *c=makeTitle(can,padTit,page);
321 c->Divide(2,2);gStyle->SetOptStat(10);
323 for(
int i=0;i<4;i++) {
325 printf(
"->%s<\n",nameX[i]);
326 h=(TH1*)fd->Get(nameX[i]); assert(h);
328 float sum=h->GetEntries();
329 sprintf(txt,
"%.0f eve >thres",sum);
330 tx=
new TText(30,55,txt); tx->Draw();
333 c->cd(i+1); h->Draw();
334 if(i<3) h->SetAxisRange(0,60);
335 if(i!=2 ) h->Draw(
"colz");
336 if(i==0 ) h->SetAxisRange(0,60,
"y");
337 if(i==1 ) {h->SetAxisRange(0,60,
"x");h->SetAxisRange(-40,60,
"y");}
339 h->Draw(
"eh"); h->SetAxisRange(0,60);
346 case 14: { sprintf(padTit,
"pT-Balance plots (out of order) %s",core0);
347 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
348 c->Divide(2,2);gStyle->SetOptStat(10);
350 for(
int i=0;i<3;i++) {
351 printf(
"->%s<\n",nameX[i]);
352 h=(TH1*)fd->Get(nameX[i]); assert(h);
354 if(i<2) h->Draw(
"colz");
356 if(i==2) h->Rebin(4);
362 case 15:{ sprintf(padTit,
"BSMD raw spectra, %s",core0);
363 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
364 c->Divide(1,2);gStyle->SetOptStat(10);
366 for(
int i=0;i<2;i++) {
367 printf(
"->%s<\n",nameX[i]);
368 h=(TH1*)fd->Get(nameX[i]); assert(h);
369 c->cd(i+1); h->Draw();
371 c->GetPad(1)->SetLogy();
372 c->GetPad(2)->SetLogy();
376 case 16:{ sprintf(padTit,
"TPC dEdx for all & W tracks, %s",core0);
377 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
378 c->Divide(2,1);gStyle->SetOptStat(10);
380 for(
int i=0;i<2;i++) {
381 printf(
"->%s<\n",nameX[i]);
382 h=(TH1*)fd->Get(nameX[i]); assert(h);
383 c->cd(i+1); h->Draw(
"colz");
385 c->GetPad(1)->SetLogz();
388 case 17:{ sprintf(padTit,
"TPC global DCA to Vertex for W tracks, %s",core0);
389 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
390 c->Divide(2,2);gStyle->SetOptStat(10);
392 for(
int i=0;i<3;i++) {
393 printf(
"->%s<\n",nameX[i]);
394 h=(TH1*)fd->Get(nameX[i]); assert(h);
395 c->cd(i+1); h->Draw(
"colz");
396 h->SetAxisRange(0,60); h->SetAxisRange(-2.,2.,
"y");
402 case 18:{ sprintf(padTit,
"electron candidate ET vs. condition, %s",core0);
403 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
404 gStyle->SetOptStat(10);
406 c->cd(); TPad *cL,*cR; splitPadX(0.5,&cL,&cR);
407 cL->cd(); cR->Divide(1,3);
408 for(
int i=0;i<7;i++) {
409 printf(
"->%s<\n",nameX[i]);
410 h=(TH1*)fd->Get(nameX[i]); assert(h);
411 if(i==0) { h->Draw(); h->SetAxisRange(0,60);}
412 if(i>0 && i<4) h->Draw(
"same");
413 if(i==1) h->SetFillColor(kBlue);
414 if(i==2) h->SetFillColor(8);
415 if(i==3) h->SetFillColor(kRed);
416 if(i==4) { cR->cd(1); h->Draw(); h->SetAxisRange(0,5); }
417 if(i==5) { cR->cd(2); h->Draw();}
418 if(i==6) { cR->cd(3); h->Draw(); h->Fit(
"gaus",
"",
"Rh",-100,80); h->GetXaxis()->SetTitle(
"Z (cm)");}
420 h->GetXaxis()->SetTitleOffset(0.9);
421 h->GetXaxis()->SetLabelSize(0.06); h->GetXaxis()->SetTitleSize(0.05); h->SetMinimum(0.8);}
424 cL->GetPad(0)->SetLogy();
425 cR->GetPad(1)->SetLogy();
429 case 19:{ sprintf(padTit,
"Background study for Joe, %s",core0);
430 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
431 c->Divide(3,3);gStyle->SetOptStat(10);
433 for(
int i=0;i<8;i++) {
434 printf(
"->%s<\n",nameX[i]);
435 h=(TH1*)fd->Get(nameX[i]); assert(h);
436 c->cd(i+1); h->Draw();
437 h->SetFillColor(30+i*5);
438 if(i==7) h->Draw(
"colz");
440 c->GetPad(1)->SetLogy();
444 case 20:{ sprintf(padTit,
"pub-maker misc, %s",core0);
445 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
446 c->Divide(2,2);gStyle->SetOptStat(10);
448 for(
int i=0;i<3;i++) {
449 printf(
"->%s<\n",nameX[i]);
450 h=(TH1*)fd->Get(nameX[i]); assert(h);
455 c->cd(i+1); h->Draw();
456 if(i==1) h->Draw(
"colz");
457 if(i==0) h->Draw(
"h text");
459 c->GetPad(2)->SetLogz();
460 c->GetPad(1)->SetLogy();
464 case 21:{ sprintf(padTit,
"charge separation, %s",core0);
465 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
466 c->Divide(2,1);gStyle->SetOptStat(10);
468 for(
int i=0;i<2;i++) {
469 printf(
"->%s<\n",nameX[i]);
470 h=(TH1*)fd->Get(nameX[i]); assert(h);
471 c->cd(i+1); h->Draw(
"colz");
476 case 22:{ sprintf(padTit,
"charge separation, %s",core0);
477 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
478 c->Divide(3,2);gStyle->SetOptStat(10);
480 for(
int i=0;i<6;i++) {
481 printf(
"->%s<\n",nameX[i]);
482 h=(TH1*)fd->Get(nameX[i]); assert(h);
483 c->cd(i+1); h->Draw();
489 case 23:{ sprintf(padTit,
"bXing & spin QA, %s",core0);
490 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,spinPre+padTit,page);
491 c->Divide(2,3);gStyle->SetOptStat(1000010);
493 for(
int i=0;i<6;i++) {
494 printf(
"->%s<\n",nameX[i]);
495 h=(TH1*)fd->Get(spinPre+nameX[i]); assert(h);
496 c->cd(i+1); h->Draw();
497 if(i==1) { h->Draw(
"colz");}
499 c->GetPad(1)->SetLogy();
504 case 24:{ sprintf(padTit,
"Final Ws for spin analysis, %s",core0);
505 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,spinPre+padTit,page);
506 c->Divide(2,2);gStyle->SetOptStat(10);
508 for(
int i=0;i<4;i++) {
509 printf(
"->%s<\n",nameX[i]);
510 h=(TH1*)fd->Get(spinPre+nameX[i]); assert(h);
511 c->cd(i+1); h->Draw();
512 if(i==2) { hx=(TH1*) h->Clone(); h->SetFillColor(9); hx->SetFillColor(46);
513 hx->SetAxisRange(0,1); hx->Draw(
"same");
516 if(i==3) { h->Draw(
"colz"); ((TH2F*)h)->Rebin2D(1,2);}
518 if(i<2||i==3) h->SetAxisRange(0,70);
527 { sprintf(padTit,
"spin sorting: lumi & Ws, %s",core0);
529 if(page==26) { nameX=nameS3;sprintf(padTit,
"spin sorting: QCD background, %s",core0);}
530 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,spinPre+padTit,page);
531 c->Divide(2,2);gStyle->SetOptStat(1000010);
533 for(
int i=0;i<4;i++) {
534 printf(
"->%s<\n",nameX[i]);
535 h=(TH1*)fd->Get(spinPre+nameX[i]); assert(h);
536 c->cd(i+1); h->Draw(
"h text");
540 case 27:{ sprintf(padTit,
"charge & ET vs. spin state, %s",core0);
541 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,spinPre+padTit,page);
542 c->Divide(2,2);gStyle->SetOptStat(10);
544 for(
int i=0;i<3;i++) {
545 printf(
"->%s<\n",nameX[i]);
546 h=(TH1*)fd->Get(spinPre+nameX[i]); assert(h);
547 c->cd(i+1); h->Draw(
"colz");
568 int iCut=(page-30)/2;
569 int sec1=1, sec2=12;
if(iew) sec1=13, sec2=24;
570 char *titA[]={
"stats",
"nFitPoints",
" nFit/nPossible",
"1st hit Rxy",
"last hit Rxy",
"dE/dX"};
571 char *titB[]={
"Stat",
"TrNfit",
"TrFitFrac",
"TrRxyIn",
"TrRxyOut",
"TrdEdX"};
572 sprintf(padTit,
"TPC %s sectors[%d,%d], %s",titA[iCut],sec1,sec2,core0);
573 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
574 c->Divide(4,3);gStyle->SetOptStat(10);
575 for(
int i=0;i<12;i++) {
577 sprintf(name,
"sec%d_%s",i+sec1,titB[iCut]);
578 printf(
"->%s<\n",name);
579 h=(TH1*)fd->Get(name); assert(h);
586 h->SetFillColor(col);
592 case 42:{ sprintf(padTit,
"TPC accepted tracks, %s",core0);
593 can=
new TCanvas(
"aa",
"aa",800,600); TPad *c=makeTitle(can,padTit,page);
594 c->Divide(2,1);gStyle->SetOptStat(10);
596 c->cd(1); h2->Draw(
"colz");
599 for(
int i=0;i<24;i++) {
601 sprintf(name,
"sec%d_Tr2D1",i+1);
602 printf(
"->%s<\n",name);
603 h=(TH1*)fd->Get(name); assert(h); h->SetLineColor(30+i);
604 if(i==0) h->Draw(
"box");
605 else h->Draw(
"box same");
611 printf(
"page=%d NOT defined\n",page);
616 sprintf(text,
"%s%s_page%03d",oPath,core0,page);
622 if(pl&1) can->Print(tit+
".gif");
623 if(pl&2) can->Print(tit+spinPre+
".ps");
628 void splitPadX(
float x, TPad **cL, TPad **cR) {
629 (*cL) =
new TPad(
"padL",
"apdL",0.0,0.,x,0.95);
631 (*cR) =
new TPad(
"padL",
"apdL",x+0.005,0.,1.0,0.95);
636 void splitPadY(
float y, TPad **cU, TPad **cD) {
637 (*cU) =
new TPad(
"padD",
"apdD",0,y+0.005,1.0,1.);
639 (*cD) =
new TPad(
"padU",
"apdU",0.0,0.,1.,y);
649 int tpcSec(
float phiRad,
float etaDet){
651 float phi=phiRad/PI*180;
659 sec=13+(int)( x/30.);
661 printf(
"phi/deg=%.1f, x=%.1f\n",phi,x);
666 TPad *makeTitle(TCanvas *c,
char *core,
int page) {
668 TPad *pad0 =
new TPad(
"pad0",
"apd0",0.0,0.95,1.,1.);
672 TPaveText *pt =
new TPaveText(0,0.,1,1,
"br");
685 pad =
new TPad(
"pad1",
"apd1",0.0,0.0,1,.95);
692 for(
int i=1;i<=27;i++) {
696 for(
int i=30;i<=42;i++) plWana(i,2);
702 for(
int i=1;i<=23;i++){
709 for(
int i=30;i<=42;i++) plWana(i,2);