Use gMC and not pMC everywhere
[u/mrichter/AliRoot.git] / STRUCT / AliFRAMEv0.cxx
1 ////////////////////////////////////////////////
2 //  space frame class                            /
3 ////////////////////////////////////////////////
4
5 #include <stdio.h> 
6 #include <TMath.h>
7 #include <TRandom.h>
8 #include <TVector.h>
9 #include "AliFRAMEv0.h"
10 #include "AliRun.h"
11 #include "stdlib.h"
12 #include "AliMC.h"
13 #include "TSystem.h"
14  
15 ClassImp(AliFRAMEv0)
16  
17 //_____________________________________________________________________________
18 AliFRAMEv0::AliFRAMEv0()
19 {
20 }
21
22 //_____________________________________________________________________________
23 AliFRAMEv0::AliFRAMEv0(const char *name, const char *title)
24   : AliFRAME(name,title)
25 {
26   printf("Create FRAMEv0 object");  
27 }
28
29  
30 //___________________________________________
31 void AliFRAMEv0::CreateGeometry()
32 {
33   printf("Create FRAMEv0 geometry ");
34 //Begin_Html
35 /*
36 <img src="picts/frame.gif">
37 */
38 //End_Html
39
40
41 //Begin_Html
42 /*
43 <img src="picts/tree_frame.gif">
44 */
45 //End_Html
46
47   char *filetmp;
48   const char *framename = "$(ALICE_ROOT)/Euclid/frame0399.euc";
49   char topvol[5];
50   printf("Create FRAMEv0 geometry ");
51   
52 //
53 // The Space frame
54   filetmp = gSystem->ExpandPathName(framename);
55   FILE *file = fopen(filetmp,"r");
56   delete [] filetmp;
57   if(file) {
58     fclose(file);
59     printf(" Reading FRAME \n");
60     gAlice->ReadEuclid(framename,this,topvol);
61   } else {
62     Warning("CreateGeometry","The Euclid file %s does not exist!\n",framename);
63     exit(1);
64   }
65 //
66 // --- Place the FRAME ghost volume (B010) in its mother volume (ALIC)
67 //    and make it invisible
68 // 
69 //  AliMatrix(idrotm[2001],90.,0.,90.,90.,180.,0.);
70   
71   gMC->Gspos("B010",1,"ALIC",0,0,0,0,"ONLY");
72
73   gMC->Gsatt("B010", "SEEN", 0);
74 }
75
76  
77 //___________________________________________
78 void AliFRAMEv0::CreateMaterials()
79 {
80   char *filetmp;
81   printf("Create FRAMEv0 materials");
82   const char *name = "$(ALICE_ROOT)/Euclid/frame.tme";
83   filetmp = gSystem->ExpandPathName(name);
84   FILE *file = fopen(filetmp,"r");
85   delete [] filetmp;
86   if(file) {
87     fclose(file);
88     gAlice->ReadEuclidMedia(name,this);
89   } else {
90     Warning("CreateMaterials","The material file %s does not exist!\n",name);
91     exit(1);
92   }
93 }
94
95
96
97
98
99
100
101
102
103
104
105
106
107