1 /**************************************************************************
2 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
4 * Author: The ALICE Off-line Project. *
5 * Contributors are mentioned in the code where appropriate. *
7 * Permission to use, copy, modify and distribute this software and its *
8 * documentation strictly for non-commercial purposes is hereby granted *
9 * without fee, provided that the above copyright notice appears in all *
10 * copies and that both the copyright notice and this permission notice *
11 * appear in the supporting documentation. The authors make no claims *
12 * about the suitability of this software for any purpose. It is *
13 * provided "as is" without express or implied warranty. *
14 **************************************************************************/
18 //-------------------------------------------------------------------------
20 // symmetric space frame without holes
22 //-------------------------------------------------------------------------
25 #include <TVirtualMC.h>
27 #include "AliFRAMEv1.h"
32 //_____________________________________________________________________________
33 AliFRAMEv1::AliFRAMEv1()
38 //_____________________________________________________________________________
39 AliFRAMEv1::AliFRAMEv1(const char *name, const char *title)
40 : AliFRAME(name,title)
43 AliDebugClass(1,"Create FRAMEv1 object");
44 fEuclidGeometry="$(ALICE_ROOT)/Euclid/frame1099i.euc";
45 fEuclidMaterial="$(ALICE_ROOT)/Euclid/frame.tme";
49 //___________________________________________
50 void AliFRAMEv1::CreateGeometry()
54 <img src="picts/frame.gif">
61 <img src="picts/tree_frame.gif">
70 filetmp = gSystem->ExpandPathName(fEuclidGeometry.Data());
71 FILE *file = fopen(filetmp,"r");
75 AliDebugClass(1,"Reading FRAME geometry");
76 ReadEuclid(fEuclidGeometry.Data(),topvol);
78 Fatal("CreateGeometry","The Euclid file %s does not exist!\n",
79 fEuclidGeometry.Data());
81 // --- Place the FRAME ghost volume (B010) in its mother volume (ALIC)
82 // and make it invisible
84 // AliMatrix(idrotm[2001],90.,0.,90.,90.,180.,0.);
86 gMC->Gspos(topvol,1,"ALIC",0,0,0,0,"ONLY");
88 gMC->Gsatt(topvol, "SEEN", 0);
92 //___________________________________________
93 void AliFRAMEv1::CreateMaterials()
95 // Create materials and media (from Euclid file)
97 AliDebugClass(1,"Create FRAMEv1 materials\n");
98 filetmp = gSystem->ExpandPathName(fEuclidMaterial.Data());
99 FILE *file = fopen(filetmp,"r");
103 ReadEuclidMedia(fEuclidMaterial.Data());
105 Warning("CreateMaterials","The material file %s does not exist!\n",
106 fEuclidMaterial.Data());
111 //_____________________________________________________________________________
112 void AliFRAMEv1::Init()
115 // Initialise the module after the geometry has been defined
118 if(AliLog::GetGlobalDebugLevel()>0) {
119 printf("%s: **************************************"
121 "**************************************\n",ClassName());
122 printf("\n%s: Version 1 of FRAME initialised, symmetric FRAME\n\n",ClassName());
123 printf("%s: **************************************"
125 "**************************************\n",ClassName());