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 Revision 1.7 1999/11/01 20:42:42 fca
19 FRAME version 1 is now the symmetric one.
21 Revision 1.6 1999/09/29 09:24:30 fca
22 Introduction of the Copyright and cvs Log
26 ////////////////////////////////////////////////
27 // space frame class /
28 ////////////////////////////////////////////////
30 #include "AliFRAMEv1.h"
36 //_____________________________________________________________________________
37 AliFRAMEv1::AliFRAMEv1()
41 //_____________________________________________________________________________
42 AliFRAMEv1::AliFRAMEv1(const char *name, const char *title)
43 : AliFRAME(name,title)
45 printf("Create FRAMEv1 object\n");
46 fEuclidGeometry="$(ALICE_ROOT)/Euclid/frame1099i.euc";
47 fEuclidMaterial="$(ALICE_ROOT)/Euclid/frame.tme";
51 //___________________________________________
52 void AliFRAMEv1::CreateGeometry()
56 <img src="picts/frame.gif">
63 <img src="picts/tree_frame.gif">
72 filetmp = gSystem->ExpandPathName(fEuclidGeometry.Data());
73 FILE *file = fopen(filetmp,"r");
77 printf(" Reading FRAME geometry\n");
78 ReadEuclid(fEuclidGeometry.Data(),topvol);
80 Warning("CreateGeometry","The Euclid file %s does not exist!\n",
81 fEuclidGeometry.Data());
85 // --- Place the FRAME ghost volume (B010) in its mother volume (ALIC)
86 // and make it invisible
88 // AliMatrix(idrotm[2001],90.,0.,90.,90.,180.,0.);
90 gMC->Gspos(topvol,1,"ALIC",0,0,0,0,"ONLY");
92 gMC->Gsatt(topvol, "SEEN", 0);
96 //___________________________________________
97 void AliFRAMEv1::CreateMaterials()
100 printf("Create FRAMEv1 materials\n");
101 filetmp = gSystem->ExpandPathName(fEuclidMaterial.Data());
102 FILE *file = fopen(filetmp,"r");
106 ReadEuclidMedia(fEuclidMaterial.Data());
108 Warning("CreateMaterials","The material file %s does not exist!\n",
109 fEuclidMaterial.Data());
114 //_____________________________________________________________________________
115 void AliFRAMEv1::Init()
118 // Initialise the module after the geometry has been defined
121 printf("**************************************"
123 "**************************************\n");
124 printf("\n Version 1 of FRAME initialised, symmetric FRAME\n\n");
125 printf("**************************************"
127 "**************************************\n");