UltraFresnelLens Class Reference

#include <UltraFresnelLens.hh>

Collaboration diagram for UltraFresnelLens:

Public Member Functions
	UltraFresnelLens (G4double Diameter, G4int nGrooves, G4Material *Material, G4VPhysicalVolume *MotherPV, G4ThreeVector Pos)
	~UltraFresnelLens ()
G4VPhysicalVolume *	GetPhysicalVolume ()
G4Material *	GetMaterial ()
G4double	GetDiameter ()
G4double	GetThickness ()
G4double	GetGrooveWidth ()
G4int	GetNumberOfGrooves ()
G4double	GetSagita (G4double)

Private Member Functions
void	BuildLens (G4VPhysicalVolume *)

Private Attributes
G4double	LensDiameter
G4int	NumberOfGrooves
G4Material *	LensMaterial
G4ThreeVector	LensPosition
G4double	GrooveWidth
G4double	LensThickness
G4VPhysicalVolume *	LensPhysicalVolume

Detailed Description

Definition at line 54 of file UltraFresnelLens.hh.

Constructor & Destructor Documentation

UltraFresnelLens()

UltraFresnelLens::UltraFresnelLens	(	G4double	Diameter,
		G4int	nGrooves,
		G4Material *	Material,
		G4VPhysicalVolume *	MotherPV,
		G4ThreeVector	Pos
	)

Definition at line 59 of file UltraFresnelLens.cc.

{

 LensMaterial    = Material ;
 LensDiameter    = Diameter ;
 NumberOfGrooves = nGrooves;
 GrooveWidth     = (Diameter/2.0)/nGrooves ;
 LensPosition    = Pos ;

 if( GrooveWidth <= 0 ){
   G4Exception("UltraFresnelLens::UltraFresnelLens()","AirSh001",FatalException,
           "UltraFresnelLens constructor: GrooveWidth<=0");
   }


G4double  Rmin1 = (NumberOfGrooves-1)*(GrooveWidth) ;
G4double  Rmax1 = (NumberOfGrooves-0)*(GrooveWidth) ;
LensThickness   = GetSagita(Rmax1)-GetSagita(Rmin1) ; // Height of the highest groove 

BuildLens(MotherPV) ;

}

Here is the call graph for this function:

~UltraFresnelLens()

UltraFresnelLens::~UltraFresnelLens

(

)

Definition at line 83 of file UltraFresnelLens.cc.

{;}

Member Function Documentation

BuildLens()

void UltraFresnelLens::BuildLens ( G4VPhysicalVolume *  MotherPV )

private

Definition at line 88 of file UltraFresnelLens.cc.

                                                           {

G4double StartPhi = 0.0 ;
G4double DeltaPhi = twopi ;

G4double  LensMotherDz = LensThickness ;


G4Tubs *LensMotherCylinder 
    = new G4Tubs("LensMotherCylinder",0.0*mm,LensDiameter/2.0,LensMotherDz/2.0,StartPhi,DeltaPhi);

G4Material *LensMotherMaterial = MotherPV->GetLogicalVolume()->GetMaterial() ;
G4LogicalVolume *LensMotherLV 
    = new G4LogicalVolume(LensMotherCylinder,LensMotherMaterial,"LensMotherLV",0,0,0);
G4VPhysicalVolume *LensMotherPV 
    = new G4PVPlacement(0,LensPosition,"LensMotherPV",LensMotherLV,MotherPV,false,0);

LensMotherLV->SetVisAttributes (G4VisAttributes::Invisible);


G4Cons *solidGroove 
  = new G4Cons("Groove",40.0*mm,50.0*mm,40.0*mm,40.001*mm,1.0*mm,StartPhi,DeltaPhi);

G4LogicalVolume *logicalGroove 
    = new G4LogicalVolume(solidGroove,LensMaterial,"Groove_log",0,0,0);

G4VPVParameterisation *FresnelLensParam = new UltraFresnelLensParameterisation(this);

LensPhysicalVolume = 
 new G4PVParameterised("LensPV",logicalGroove,LensMotherPV,kZAxis,NumberOfGrooves,FresnelLensParam) ;

}

Here is the call graph for this function:

Here is the caller graph for this function:

GetDiameter()

G4double UltraFresnelLens::GetDiameter ( )

inline

Definition at line 64 of file UltraFresnelLens.hh.

{return LensDiameter ;}

GetGrooveWidth()

G4double UltraFresnelLens::GetGrooveWidth ( )

inline

Definition at line 66 of file UltraFresnelLens.hh.

{return GrooveWidth ;}

Here is the caller graph for this function:

GetMaterial()

G4Material* UltraFresnelLens::GetMaterial ( )

inline

Definition at line 63 of file UltraFresnelLens.hh.

{return LensMaterial ;}

GetNumberOfGrooves()

G4int UltraFresnelLens::GetNumberOfGrooves ( )

inline

Definition at line 67 of file UltraFresnelLens.hh.

{return NumberOfGrooves ;} 

Here is the call graph for this function:

Here is the caller graph for this function:

GetPhysicalVolume()

G4VPhysicalVolume* UltraFresnelLens::GetPhysicalVolume ( )

inline

Definition at line 62 of file UltraFresnelLens.hh.

{return LensPhysicalVolume ;}

Here is the caller graph for this function:

GetSagita()

G4double UltraFresnelLens::GetSagita

(

G4double

radius

)

Definition at line 123 of file UltraFresnelLens.cc.

{

  G4double Conic = -1.0;
  G4double Curvature = 0.00437636761488/mm ;
  G4double Aspher[8] = {      4.206739256e-05/(mm),
                                9.6440152e-10/(mm3),
                               -1.4884317e-15/(mm2*mm3),
                              0.0/(mm*mm3*mm3),
                              0.0/(mm3*mm3*mm3),
                              0.0/(mm2*mm3*mm3*mm3),
                              0.0/(mm*mm3*mm3*mm3*mm3),
                              0.0/(mm*3*mm3*mm3*mm3*mm3)
                            };

  G4double TotAspher = 0.0*mm ;

  for(G4int k=1;k<9;k++){
    TotAspher += Aspher[k-1]*std::pow(radius,2*k) ;
  }

  G4double ArgSqrt = 1.0-(1.0+Conic)*std::pow(Curvature,2)*std::pow(radius,2) ; 

  if (ArgSqrt < 0.0){
    G4Exception("UltraFresnelLens::GetSagita()","AirSh002",
        FatalException,
        "UltraFresnelLensParameterisation::Sagita: Square Root of <0 !");
  }
  G4double Sagita_value = Curvature*std::pow(radius,2)/(1.0+std::sqrt(ArgSqrt)) + TotAspher;

  return Sagita_value ;

                             
}

Here is the call graph for this function:

Here is the caller graph for this function:

GetThickness()

G4double UltraFresnelLens::GetThickness ( )

inline

Definition at line 65 of file UltraFresnelLens.hh.

{return LensThickness ;}

Here is the caller graph for this function:

Member Data Documentation

GrooveWidth

G4double UltraFresnelLens::GrooveWidth

private

Definition at line 81 of file UltraFresnelLens.hh.

LensDiameter

G4double UltraFresnelLens::LensDiameter

private

Definition at line 76 of file UltraFresnelLens.hh.

LensMaterial

G4Material* UltraFresnelLens::LensMaterial

private

Definition at line 78 of file UltraFresnelLens.hh.

LensPhysicalVolume

G4VPhysicalVolume* UltraFresnelLens::LensPhysicalVolume

private

Definition at line 85 of file UltraFresnelLens.hh.

LensPosition

G4ThreeVector UltraFresnelLens::LensPosition

private

Definition at line 79 of file UltraFresnelLens.hh.

LensThickness

G4double UltraFresnelLens::LensThickness

private

Definition at line 82 of file UltraFresnelLens.hh.

NumberOfGrooves

G4int UltraFresnelLens::NumberOfGrooves

private

Definition at line 77 of file UltraFresnelLens.hh.

---

The documentation for this class was generated from the following files:

• UltraFresnelLens.hh
• UltraFresnelLens.cc