[u/mrichter/AliRoot.git] / STRUCT / AliSHIL.cxx

/**************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

/*
$Log$
Revision 1.7  2000/01/12 15:37:57  morsch
Base class only

Revision 1.6  1999/09/29 09:24:30  fca
Introduction of the Copyright and cvs Log

*/

///////////////////////////////////////////////////////////////////////////////
//                                                                           //
//  Muon Shield Class                                                        //
//  This class contains a description of the muon shield                     //
//                                                                           //
//Begin_Html
/*
<img src="picts/AliSHILClass.gif">
*/
//End_Html
//                                                                           //
//                                                                           //
///////////////////////////////////////////////////////////////////////////////

#include "AliSHIL.h"
#include "AliRun.h"
#include "AliConst.h"

ClassImp(AliSHIL)
 
//_____________________________________________________________________________
AliSHIL::AliSHIL()
{
  //
  // Default constructor for muon shield
  //
}
 
//_____________________________________________________________________________
AliSHIL::AliSHIL(const char *name, const char *title)
  : AliModule(name,title)
{
  //
  // Standard constructor for muon shield
  //
  SetMarkerColor(7);
  SetMarkerStyle(2);
  SetMarkerSize(0.4);
}
 
//_____________________________________________________________________________
void AliSHIL::CreateGeometry()
{
  //
  // Build muon shield geometry
  //
}

//_____________________________________________________________________________
void AliSHIL::CreateMaterials()
{
  //
  // Defines materials for the muon shield
  //
  Int_t   ISXFLD = gAlice->Field()->Integ();
  Float_t SXMGMX = gAlice->Field()->Max();
// Steel  
  Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
  Float_t zsteel[4] = { 26.,24.,28.,14. };
  Float_t wsteel[4] = { .715,.18,.1,.005 };
// PbW
  Float_t apbw[2]   = { 207.2,183.85 };
  Float_t zpbw[2]   = { 82.,74. };
  Float_t wpbw[2]   = { .5,.5 };
// Concrete
  Float_t aconc[10] = { 1.,12.01,15.994,22.99,24.305,26.98,
			28.086,39.1,40.08,55.85 };
  Float_t zconc[10] = { 1.,6.,8.,11.,12.,13.,14.,19.,20.,26. };
  Float_t wconc[10] = { .01,.001,.529107,.016,.002,.033872,
			.337021,.013,.044,.014 };
// Ni-Cu-W alloy
  Float_t aniwcu[3] ={58.6934, 183.84, 63.546};
  Float_t zniwcu[3] ={28., 74., 29};
  Float_t wniwcu[3] ={0.015,0.95,0.035};
//
// Insulation powder
//                    Si         O       Ti     Al
  Float_t ains[4] ={28.0855, 15.9994, 47.867,  26.982};
  Float_t zins[4] ={14.,      8.    , 22.   ,  13.   };
  Float_t wins[4] ={ 0.3019,  0.4887,  0.1914,  0.018};

  Float_t epsil, stmin, tmaxfd, deemax, stemax;
  
  //     STEEL 
  
  
  //     LEAD/TUNGSTEN MIXTURE 
  
  
  // --- Define the various materials for GEANT --- 
  //     Aluminum 
  AliMaterial(9,  "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
  AliMaterial(29, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
  AliMaterial(49, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
  
  //     Iron 
  AliMaterial(10, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
  AliMaterial(30, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);
  AliMaterial(50, "IRON$     ", 55.85, 26., 7.87, 1.76, 17.1);

  //
  //     Copper
  AliMaterial(11, "COPPER$   ", 63.55, 29., 8.96, 1.43, 15.1);
  AliMaterial(31, "COPPER$   ", 63.55, 29., 8.96, 1.43, 15.1);
  AliMaterial(51, "COPPER$   ", 63.55, 29., 8.96, 1.43, 15.1);
  
  //     Tungsten 
  AliMaterial(12, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
  AliMaterial(32, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
  AliMaterial(52, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
  
  //     Lead 
  AliMaterial(13, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
  AliMaterial(33, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
  AliMaterial(53, "LEAD$     ", 207.19, 82., 11.35, .56, 18.5);
  
  //     Air 
  AliMaterial(15, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500);
  AliMaterial(35, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500);
  AliMaterial(55, "AIR$      ", 14.61, 7.3, .001205, 30423.24, 67500);
  
  //     Vacuum 
  AliMaterial(16, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
  AliMaterial(36, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
  AliMaterial(56, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
  
  //     Stainless Steel 
  AliMixture(19, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
  AliMixture(39, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
  AliMixture(59, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
  
  //     Lead/Tungsten 
  AliMixture(20, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
  AliMixture(40, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
  AliMixture(60, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);

  //     Ni-W-Cu 
  AliMixture(21, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
  AliMixture(41, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
  AliMixture(61, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);

  //     Concrete 
  AliMixture(17, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
  AliMixture(37, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
  AliMixture(57, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);

  //     Insulation powder 
  AliMixture(14, "INSULATION$", ains, zins, 0.41, 4, wins);
  AliMixture(34, "INSULATION$", ains, zins, 0.41, 4, wins);
  AliMixture(54, "INSULATION$", ains, zins, 0.41, 4, wins);
  
  // **************** 
  //     Defines tracking media parameters. 
  //     Les valeurs sont commentees pour laisser le defaut 
  //     a GEANT (version 3-21, page CONS200), f.m. 
  epsil  = .001;  // Tracking precision, 
  stemax = -1.;   // Maximum displacement for multiple scat 
  tmaxfd = -20.;  // Maximum angle due to field deflection 
  deemax = -.3;   // Maximum fractional energy loss, DLS 
  stmin  = -.8;
  // *************** 
  
  //    Aluminum 
  AliMedium(9,  "ALU_C0          ", 9, 0,  ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(29, "ALU_C1          ", 29, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(49, "ALU_C2          ", 49, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Iron 
  AliMedium(10, "FE_C0           ", 10, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(30, "FE_C1           ", 30, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(50, "FE_C2           ", 50, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);

  //    Iron 
  AliMedium(11, "Cu_C0           ", 11, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(31, "Cu_C1           ", 31, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(51, "Cu_C2           ", 51, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Tungsten 
  AliMedium(12, "W_C0            ", 12, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(32, "W_C1            ", 32, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(52, "W_C2            ", 52, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Lead 
  AliMedium(13, "PB_C0           ", 13, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(33, "PB_C1           ", 33, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(53, "PB_C2           ", 53, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);

  //    Insulation Powder 
  AliMedium(14, "INS_C0          ", 14, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(34, "INS_C1          ", 34, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(54, "INS_C2          ", 54, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Air 
  AliMedium(15, "AIR_C0          ", 15, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(35, "AIR_C1          ", 35, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(55, "AIR_C2          ", 55, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Vacuum 
  AliMedium(16, "VA_C0           ", 16, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(36, "VA_C1           ", 36, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(56, "VA_C2           ", 56, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Steel 
  AliMedium(19, "ST_C0           ", 19, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(39, "ST_C1           ", 39, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(59, "ST_C3           ", 59, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  
  //    Lead/Tungsten 
  AliMedium(20, "PB/W0           ", 20, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(40, "PB/W1           ", 40, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(60, "PB/W3           ", 60, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);

  //    Ni/Tungsten 
  AliMedium(21, "Ni/W0           ", 21, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(41, "Ni/W1           ", 41, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(61, "Ni/W3           ", 61, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);

//    Concrete 
  AliMedium(17, "CC_C0           ", 17, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(37, "CC_C1           ", 37, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
  AliMedium(57, "CC_C2           ", 57, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);

}

//_____________________________________________________________________________
void AliSHIL::DrawModule () 
{
 
}

//_____________________________________________________________________________
void AliSHIL::Init()
{
  //
  // Initialise the muon shield after it has been built
  //
  Int_t i;
  //
  printf("\n");
  for(i=0;i<35;i++) printf("*");
  printf(" SHIL_INIT ");
  for(i=0;i<35;i++) printf("*");
  printf("\n");
  //
  // Here the SHIL initialisation code (if any!)
  for(i=0;i<80;i++) printf("*");
  printf("\n");
}
Commit	Line	Data
4c039060	1	/**************************************************************************
	2	* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
	3	* *
	4	* Author: The ALICE Off-line Project. *
	5	* Contributors are mentioned in the code where appropriate. *
	6	* *
	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	**************************************************************************/
	15
	16	/*
	17	$Log$
9af0a493	18	Revision 1.7 2000/01/12 15:37:57 morsch
	19	Base class only
	20
3f4d1718	21	Revision 1.6 1999/09/29 09:24:30 fca
	22	Introduction of the Copyright and cvs Log
	23
4c039060	24	*/
4c039060	25
fe4da5cc	26	///////////////////////////////////////////////////////////////////////////////
	27	// //
	28	// Muon Shield Class //
	29	// This class contains a description of the muon shield //
	30	// //
	31	//Begin_Html
	32	/*
1439f98e	33	<img src="picts/AliSHILClass.gif">
fe4da5cc	34	*/
	35	//End_Html
	36	// //
	37	// //
	38	///////////////////////////////////////////////////////////////////////////////
	39
	40	#include "AliSHIL.h"
fe4da5cc	41	#include "AliRun.h"
fe4da5cc	42	#include "AliConst.h"
	43
	44	ClassImp(AliSHIL)
	45
	46	//_____________________________________________________________________________
	47	AliSHIL::AliSHIL()
	48	{
	49	//
	50	// Default constructor for muon shield
	51	//
	52	}
	53
	54	//_____________________________________________________________________________
	55	AliSHIL::AliSHIL(const char name, const char title)
b8032157	56	: AliModule(name,title)
fe4da5cc	57	{
	58	//
	59	// Standard constructor for muon shield
	60	//
	61	SetMarkerColor(7);
	62	SetMarkerStyle(2);
	63	SetMarkerSize(0.4);
	64	}
	65
fe4da5cc	66	//_____________________________________________________________________________
	67	void AliSHIL::CreateGeometry()
	68	{
	69	//
	70	// Build muon shield geometry
	71	//
fe4da5cc	72	}
	73
	74	//_____________________________________________________________________________
	75	void AliSHIL::CreateMaterials()
	76	{
	77	//
	78	// Defines materials for the muon shield
	79	//
fe4da5cc	80	Int_t ISXFLD = gAlice->Field()->Integ();
fe4da5cc	81	Float_t SXMGMX = gAlice->Field()->Max();
3f4d1718	82	// Steel
fe4da5cc	83	Float_t asteel[4] = { 55.847,51.9961,58.6934,28.0855 };
	84	Float_t zsteel[4] = { 26.,24.,28.,14. };
	85	Float_t wsteel[4] = { .715,.18,.1,.005 };
3f4d1718	86	// PbW
fe4da5cc	87	Float_t apbw[2] = { 207.2,183.85 };
	88	Float_t zpbw[2] = { 82.,74. };
	89	Float_t wpbw[2] = { .5,.5 };
3f4d1718	90	// Concrete
	91	Float_t aconc[10] = { 1.,12.01,15.994,22.99,24.305,26.98,
	92	28.086,39.1,40.08,55.85 };
	93	Float_t zconc[10] = { 1.,6.,8.,11.,12.,13.,14.,19.,20.,26. };
	94	Float_t wconc[10] = { .01,.001,.529107,.016,.002,.033872,
	95	.337021,.013,.044,.014 };
	96	// Ni-Cu-W alloy
	97	Float_t aniwcu[3] ={58.6934, 183.84, 63.546};
	98	Float_t zniwcu[3] ={28., 74., 29};
	99	Float_t wniwcu[3] ={0.015,0.95,0.035};
	100	//
	101	// Insulation powder
9af0a493	102	// Si O Ti Al
	103	Float_t ains[4] ={28.0855, 15.9994, 47.867, 26.982};
	104	Float_t zins[4] ={14., 8. , 22. , 13. };
	105	Float_t wins[4] ={ 0.3019, 0.4887, 0.1914, 0.018};
	106
fe4da5cc	107	Float_t epsil, stmin, tmaxfd, deemax, stemax;
	108
	109	// STEEL
	110
	111
	112	// LEAD/TUNGSTEN MIXTURE
	113
	114
	115	// --- Define the various materials for GEANT ---
	116	// Aluminum
	117	AliMaterial(9, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
	118	AliMaterial(29, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
	119	AliMaterial(49, "ALUMINIUM$", 26.98, 13., 2.7, 8.9, 37.2);
	120
	121	// Iron
	122	AliMaterial(10, "IRON$ ", 55.85, 26., 7.87, 1.76, 17.1);
	123	AliMaterial(30, "IRON$ ", 55.85, 26., 7.87, 1.76, 17.1);
	124	AliMaterial(50, "IRON$ ", 55.85, 26., 7.87, 1.76, 17.1);
9af0a493	125
	126	//
	127	// Copper
	128	AliMaterial(11, "COPPER$ ", 63.55, 29., 8.96, 1.43, 15.1);
	129	AliMaterial(31, "COPPER$ ", 63.55, 29., 8.96, 1.43, 15.1);
	130	AliMaterial(51, "COPPER$ ", 63.55, 29., 8.96, 1.43, 15.1);
fe4da5cc	131
	132	// Tungsten
	133	AliMaterial(12, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
	134	AliMaterial(32, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
	135	AliMaterial(52, "TUNGSTEN$ ", 183.85, 74., 19.3, .35, 10.3);
	136
	137	// Lead
	138	AliMaterial(13, "LEAD$ ", 207.19, 82., 11.35, .56, 18.5);
	139	AliMaterial(33, "LEAD$ ", 207.19, 82., 11.35, .56, 18.5);
	140	AliMaterial(53, "LEAD$ ", 207.19, 82., 11.35, .56, 18.5);
	141
	142	// Air
	143	AliMaterial(15, "AIR$ ", 14.61, 7.3, .001205, 30423.24, 67500);
	144	AliMaterial(35, "AIR$ ", 14.61, 7.3, .001205, 30423.24, 67500);
	145	AliMaterial(55, "AIR$ ", 14.61, 7.3, .001205, 30423.24, 67500);
	146
	147	// Vacuum
	148	AliMaterial(16, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
	149	AliMaterial(36, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
	150	AliMaterial(56, "VACUUM$ ", 1e-16, 1e-16, 1e-16, 1e16, 1e16);
	151
3f4d1718	152	// Stainless Steel
fe4da5cc	153	AliMixture(19, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
	154	AliMixture(39, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
	155	AliMixture(59, "STAINLESS STEEL$", asteel, zsteel, 7.88, 4, wsteel);
	156
	157	// Lead/Tungsten
	158	AliMixture(20, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
	159	AliMixture(40, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
	160	AliMixture(60, "LEAD/TUNGSTEN$", apbw, zpbw, 15.325, 2, wpbw);
3f4d1718	161
	162	// Ni-W-Cu
	163	AliMixture(21, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
	164	AliMixture(41, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
	165	AliMixture(61, "Ni-W-Cu$", aniwcu, zniwcu, 18.78, 3, wniwcu);
	166
	167	// Concrete
	168	AliMixture(17, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
	169	AliMixture(37, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
	170	AliMixture(57, "CONCRETE$", aconc, zconc, 2.35, 10, wconc);
	171
	172	// Insulation powder
9af0a493	173	AliMixture(14, "INSULATION$", ains, zins, 0.41, 4, wins);
	174	AliMixture(34, "INSULATION$", ains, zins, 0.41, 4, wins);
	175	AliMixture(54, "INSULATION$", ains, zins, 0.41, 4, wins);
fe4da5cc	176
	177	// ****************
	178	// Defines tracking media parameters.
	179	// Les valeurs sont commentees pour laisser le defaut
	180	// a GEANT (version 3-21, page CONS200), f.m.
	181	epsil = .001; // Tracking precision,
	182	stemax = -1.; // Maximum displacement for multiple scat
	183	tmaxfd = -20.; // Maximum angle due to field deflection
	184	deemax = -.3; // Maximum fractional energy loss, DLS
	185	stmin = -.8;
	186	// ***************
	187
	188	// Aluminum
3f4d1718	189	AliMedium(9, "ALU_C0 ", 9, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
ad51aeb0	190	AliMedium(29, "ALU_C1 ", 29, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
ad51aeb0	191	AliMedium(49, "ALU_C2 ", 49, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	192
fe4da5cc	193	// Iron
ad51aeb0	194	AliMedium(10, "FE_C0 ", 10, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	195	AliMedium(30, "FE_C1 ", 30, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	196	AliMedium(50, "FE_C2 ", 50, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
9af0a493	197
	198	// Iron
	199	AliMedium(11, "Cu_C0 ", 11, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	200	AliMedium(31, "Cu_C1 ", 31, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	201	AliMedium(51, "Cu_C2 ", 51, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	202
fe4da5cc	203	// Tungsten
ad51aeb0	204	AliMedium(12, "W_C0 ", 12, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	205	AliMedium(32, "W_C1 ", 32, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	206	AliMedium(52, "W_C2 ", 52, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	207
fe4da5cc	208	// Lead
ad51aeb0	209	AliMedium(13, "PB_C0 ", 13, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	210	AliMedium(33, "PB_C1 ", 33, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	211	AliMedium(53, "PB_C2 ", 53, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
3f4d1718	212
	213	// Insulation Powder
	214	AliMedium(14, "INS_C0 ", 14, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	215	AliMedium(34, "INS_C1 ", 34, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	216	AliMedium(54, "INS_C2 ", 54, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	217
fe4da5cc	218	// Air
ad51aeb0	219	AliMedium(15, "AIR_C0 ", 15, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	220	AliMedium(35, "AIR_C1 ", 35, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	221	AliMedium(55, "AIR_C2 ", 55, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	222
fe4da5cc	223	// Vacuum
ad51aeb0	224	AliMedium(16, "VA_C0 ", 16, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	225	AliMedium(36, "VA_C1 ", 36, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	226	AliMedium(56, "VA_C2 ", 56, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	227
fe4da5cc	228	// Steel
ad51aeb0	229	AliMedium(19, "ST_C0 ", 19, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	230	AliMedium(39, "ST_C1 ", 39, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	231	AliMedium(59, "ST_C3 ", 59, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
fe4da5cc	232
fe4da5cc	233	// Lead/Tungsten
ad51aeb0	234	AliMedium(20, "PB/W0 ", 20, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	235	AliMedium(40, "PB/W1 ", 40, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	236	AliMedium(60, "PB/W3 ", 60, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
3f4d1718	237
	238	// Ni/Tungsten
	239	AliMedium(21, "Ni/W0 ", 21, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	240	AliMedium(41, "Ni/W1 ", 41, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	241	AliMedium(61, "Ni/W3 ", 61, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	242
	243	// Concrete
	244	AliMedium(17, "CC_C0 ", 17, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	245	AliMedium(37, "CC_C1 ", 37, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	246	AliMedium(57, "CC_C2 ", 57, 0, ISXFLD, SXMGMX, tmaxfd, stemax, deemax, epsil, stmin);
	247
fe4da5cc	248	}
	249
	250	//_____________________________________________________________________________
b8032157	251	void AliSHIL::DrawModule ()
fe4da5cc	252	{
3f4d1718	253
fe4da5cc	254	}
	255
	256	//_____________________________________________________________________________
	257	void AliSHIL::Init()
	258	{
	259	//
	260	// Initialise the muon shield after it has been built
	261	//
	262	Int_t i;
	263	//
	264	printf("\n");
	265	for(i=0;i<35;i++) printf("*");
	266	printf(" SHIL_INIT ");
	267	for(i=0;i<35;i++) printf("*");
	268	printf("\n");
	269	//
3f4d1718	270	// Here the SHIL initialisation code (if any!)
fe4da5cc	271	for(i=0;i<80;i++) printf("*");
	272	printf("\n");
	273	}
	274
	275