2 10mu extrusions corrected.
[u/mrichter/AliRoot.git] / STRUCT / DrawDIPO.C
1 void DrawDIPO()
2 {
3    gMC->Gsatt("*", "seen", -1);
4    gMC->Gsatt("alic", "seen", 0);
5    gROOT->LoadMacro("ViewDIPO.C");
6    gInterpreter->ProcessLine("ViewDIPO()");
7    gMC->Gdopt("hide", "on");
8    gMC->Gdopt("shad", "on");
9    gMC->Gsatt("*", "fill", 7);
10    gMC->SetClipBox(".");
11 //   gMC->SetClipBox("*", 0, 1000, -1000, 1000, -3000, 3000);
12    gMC->DefaultRange();
13    gMC->Gdraw("alic", 30, 30, 0, 17, 13.5, .019, .019);
14    gMC->Gdhead(1111, "Magnetic Dipole");
15    gMC->Gdman(16, 4, "MAN");
16 }