UltraFresnelLens Class Reference

#include <UltraFresnelLens.hh>

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)

Detailed Description

Definition at line 54 of file UltraFresnelLens.hh.

Constructor & Destructor Documentation

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

Definition at line 59 of file UltraFresnelLens.cc.

References FatalException, G4Exception(), and GetSagita().

{

 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) ;

}

UltraFresnelLens::~UltraFresnelLens

(

)

Definition at line 83 of file UltraFresnelLens.cc.

{;}

Member Function Documentation

G4double UltraFresnelLens::GetDiameter ( )

inline

Definition at line 64 of file UltraFresnelLens.hh.

{return LensDiameter ;}

G4double UltraFresnelLens::GetGrooveWidth ( )

inline

Definition at line 66 of file UltraFresnelLens.hh.

Referenced by UltraFresnelLensParameterisation::UltraFresnelLensParameterisation().

{return GrooveWidth ;}

G4Material* UltraFresnelLens::GetMaterial ( )

inline

Definition at line 63 of file UltraFresnelLens.hh.

{return LensMaterial ;}

G4int UltraFresnelLens::GetNumberOfGrooves ( )

inline

Definition at line 67 of file UltraFresnelLens.hh.

Referenced by UltraFresnelLensParameterisation::UltraFresnelLensParameterisation().

{return NumberOfGrooves ;} 

G4VPhysicalVolume* UltraFresnelLens::GetPhysicalVolume ( )

inline

Definition at line 62 of file UltraFresnelLens.hh.

{return LensPhysicalVolume ;}

G4double UltraFresnelLens::GetSagita

(

G4double

radius

)

Definition at line 123 of file UltraFresnelLens.cc.

References FatalException, G4Exception(), python.hepunit::mm, python.hepunit::mm2, and python.hepunit::mm3.

Referenced by UltraFresnelLens(), and UltraFresnelLensParameterisation::UltraFresnelLensParameterisation().

{

  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 ;

                             
}

G4double UltraFresnelLens::GetThickness ( )

inline

Definition at line 65 of file UltraFresnelLens.hh.

{return LensThickness ;}

---

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

• UltraFresnelLens.hh
• UltraFresnelLens.cc