Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/processes/hadronic/models/im_r_matrix/src/G4PartialWidthTable.cc

Version: [ ReleaseNotes ] [ 1.0 ] [ 1.1 ] [ 2.0 ] [ 3.0 ] [ 3.1 ] [ 3.2 ] [ 4.0 ] [ 4.0.p1 ] [ 4.0.p2 ] [ 4.1 ] [ 4.1.p1 ] [ 5.0 ] [ 5.0.p1 ] [ 5.1 ] [ 5.1.p1 ] [ 5.2 ] [ 5.2.p1 ] [ 5.2.p2 ] [ 6.0 ] [ 6.0.p1 ] [ 6.1 ] [ 6.2 ] [ 6.2.p1 ] [ 6.2.p2 ] [ 7.0 ] [ 7.0.p1 ] [ 7.1 ] [ 7.1.p1 ] [ 8.0 ] [ 8.0.p1 ] [ 8.1 ] [ 8.1.p1 ] [ 8.1.p2 ] [ 8.2 ] [ 8.2.p1 ] [ 8.3 ] [ 8.3.p1 ] [ 8.3.p2 ] [ 9.0 ] [ 9.0.p1 ] [ 9.0.p2 ] [ 9.1 ] [ 9.1.p1 ] [ 9.1.p2 ] [ 9.1.p3 ] [ 9.2 ] [ 9.2.p1 ] [ 9.2.p2 ] [ 9.2.p3 ] [ 9.2.p4 ] [ 9.3 ] [ 9.3.p1 ] [ 9.3.p2 ] [ 9.4 ] [ 9.4.p1 ] [ 9.4.p2 ] [ 9.4.p3 ] [ 9.4.p4 ] [ 9.5 ] [ 9.5.p1 ] [ 9.5.p2 ] [ 9.6 ] [ 9.6.p1 ] [ 9.6.p2 ] [ 9.6.p3 ] [ 9.6.p4 ] [ 10.0 ] [ 10.0.p1 ] [ 10.0.p2 ] [ 10.0.p3 ] [ 10.0.p4 ] [ 10.1 ] [ 10.1.p1 ] [ 10.1.p2 ] [ 10.1.p3 ] [ 10.2 ] [ 10.2.p1 ] [ 10.2.p2 ] [ 10.2.p3 ] [ 10.3 ] [ 10.3.p1 ] [ 10.3.p2 ] [ 10.3.p3 ] [ 10.4 ] [ 10.4.p1 ] [ 10.4.p2 ] [ 10.4.p3 ] [ 10.5 ] [ 10.5.p1 ] [ 10.6 ] [ 10.6.p1 ] [ 10.6.p2 ] [ 10.6.p3 ] [ 10.7 ] [ 10.7.p1 ] [ 10.7.p2 ] [ 10.7.p3 ] [ 10.7.p4 ] [ 11.0 ] [ 11.0.p1 ] [ 11.0.p2 ] [ 11.0.p3, ] [ 11.0.p4 ] [ 11.1 ] [ 11.1.1 ] [ 11.1.2 ] [ 11.1.3 ] [ 11.2 ] [ 11.2.1 ] [ 11.2.2 ] [ 11.3.0 ]

  1 //
  2 // ********************************************************************
  3 // * License and Disclaimer                                           *
  4 // *                                                                  *
  5 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
  6 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
  7 // * conditions of the Geant4 Software License,  included in the file *
  8 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
  9 // * include a list of copyright holders.                             *
 10 // *                                                                  *
 11 // * Neither the authors of this software system, nor their employing *
 12 // * institutes,nor the agencies providing financial support for this *
 13 // * work  make  any representation or  warranty, express or implied, *
 14 // * regarding  this  software system or assume any liability for its *
 15 // * use.  Please see the license in the file  LICENSE  and URL above *
 16 // * for the full disclaimer and the limitation of liability.         *
 17 // *                                                                  *
 18 // * This  code  implementation is the result of  the  scientific and *
 19 // * technical work of the GEANT4 collaboration.                      *
 20 // * By using,  copying,  modifying or  distributing the software (or *
 21 // * any work based  on the software)  you  agree  to acknowledge its *
 22 // * use  in  resulting  scientific  publications,  and indicate your *
 23 // * acceptance of all terms of the Geant4 Software license.          *
 24 // ********************************************************************
 25 //
 26 //
 27 // -------------------------------------------------------------------
 28 //      GEANT4 Class file
 29 //
 30 //      For information related to this code contact:
 31 //
 32 //      File name:     G4PartialWidthTable
 33 //
 34 //      Author:        
 35 // 
 36 //      Creation date: 15 April 1999
 37 //
 38 //      Modifications: 
 39 //      
 40 // -------------------------------------------------------------------
 41 
 42 #include "globals.hh"
 43 #include "G4SystemOfUnits.hh"
 44 #include "G4HadronicException.hh"
 45 #include "G4ios.hh"
 46 #include "G4PartialWidthTable.hh"
 47 #include "G4KineticTrack.hh"
 48 
 49 G4PartialWidthTable::G4PartialWidthTable(const G4double* energies, G4int entries) : nEnergies(entries)
 50 { 
 51   // Fill the vector with tabulated energies
 52   G4int i;
 53   for (i=0; i<entries; i++)
 54     {
 55       G4double e = *(energies + i) * GeV;
 56       energy.push_back(e);
 57     }
 58 }
 59 
 60 
 61 G4PartialWidthTable::~G4PartialWidthTable()
 62 { }
 63 
 64 
 65 G4bool G4PartialWidthTable::operator==(const G4PartialWidthTable &right) const
 66 {
 67   return (this == (G4PartialWidthTable *) &right);
 68 }
 69 
 70 
 71 G4bool G4PartialWidthTable::operator!=(const G4PartialWidthTable &right) const
 72 {
 73   return (this != (G4PartialWidthTable *) &right);
 74 }
 75 
 76 
 77 G4int G4PartialWidthTable::NumberOfChannels() const
 78 {
 79   return (G4int)widths.size();
 80 }
 81 
 82 
 83 const G4PhysicsVector* G4PartialWidthTable::Width(const G4String& name1, const G4String& name2) const
 84 {
 85   // Returned pointer is not owned by the client
 86   G4PhysicsVector* width = 0;
 87   std::size_t n = 0;
 88   std::size_t entries = widths.size();
 89   for (std::size_t i=0; i<entries; ++i)
 90     {
 91       if ( (daughter1[i] == name1 && daughter2[i] == name2) ||
 92      (daughter2[i] == name1 && daughter1[i] == name2) )
 93   {
 94     width = (G4PhysicsVector*) (widths[i]);
 95     ++n;
 96   }
 97     }
 98   if (n > 1) throw G4HadronicException(__FILE__, __LINE__, "G4PartialWidthTable::Width - ambiguity");
 99 
100   return width;
101 }
102 
103 
104 void G4PartialWidthTable::AddWidths(const G4double* channelWidth, 
105             const G4String& name1, const G4String& name2)
106 {
107   G4PhysicsFreeVector* width = new G4PhysicsFreeVector(nEnergies);
108   G4int i;
109   for (i=0; i<nEnergies; i++)
110     {
111       G4double value = *(channelWidth+ i) * GeV;
112       G4double e = energy[i];
113       width->PutValue(i,e,value);
114     }             
115 
116   widths.push_back(width);
117   daughter1.push_back(name1);
118   daughter2.push_back(name2);
119 
120   return;
121 }
122 
123 
124 void G4PartialWidthTable::Dump() const
125 {
126   std::size_t entries = widths.size();
127 
128   for (std::size_t i=0; i<entries; ++i)
129     {
130       G4cout << " Channel " << i  << ": " 
131              << daughter1[i] << " " << daughter2[i] << G4endl;
132       G4PhysicsFreeVector* width = widths[i];
133       for (G4int j=0; j<nEnergies; ++j)
134   {
135     G4bool dummy = false;
136     G4double e = energy[i];
137     G4double w = width->GetValue(e,dummy);
138     G4cout << j << ") Energy = " << e << ", Width = " << w << G4endl;
139   }
140     }
141   return;
142 }
143