| Geant4 Cross Reference |
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 # <<BEGIN-copyright>>
28 # <<END-copyright>>
29 */
30 #include <string.h>
31 #include <iostream>
32 #include <string>
33 #include <vector>
34 #include <statusMessageReporting.h>
35 #include <MCGIDI.h>
36 #include <MCGIDI_misc.h>
37 #include "G4GIDI_Misc.hh"
38 using namespace std;
39 using namespace GIDI;
40
41 /*
42 ***************************************************************
43 */
44 char *G4GIDI_Misc_Z_A_m_ToName( int iZ, int iA, int im ) {
45
46 const char *Z = MCGIDI_misc_ZToSymbol( iZ );
47 char S[128], mS[32], *name;
48
49 if( Z == NULL ) return( NULL );
50 if( iA == 0 ) {
51 if( im != 0 ) return( NULL );
52 snprintf( S, sizeof S, "%s_natural", Z ); }
53 else {
54 snprintf( S, sizeof S, "%s%d", Z, iA );
55 if( im != 0 ) {
56 //snprintf( mS, sizeof mS, "_m%d", im );
57 //TK 170509
58 //Fix inconsistency of name of excited isomer between data and code
59 snprintf( mS, sizeof mS, "m%d", im );
60 strcat( S, mS );
61 }
62 }
63 name = (char *) smr_malloc2( NULL, strlen( S ) + 1, 0, "name" );
64 if( name != NULL ) strcpy( name, S );
65 return( name );
66 }
67 /*
68 ***************************************************************
69 */
70 char *G4GIDI_Misc_channelCompound( char *particle1, char *particle2 ) {
71
72 int Z1, A1, m1, Z2, A2, m2, level1, level2;
73
74 if( MCGIDI_miscNameToZAm( NULL, particle1, &Z1, &A1, &m1, &level1 ) ) return( NULL );
75 if( MCGIDI_miscNameToZAm( NULL, particle2, &Z2, &A2, &m2, &level2 ) ) return( NULL );
76 if( A1 == 0 ) A2 = 0;
77 if( A2 == 0 ) A1 = 0;
78 return( G4GIDI_Misc_Z_A_m_ToName( Z1 + Z2, A1 + A2, 0 ) );
79 }
80 #if 0
81 /*
82 ***************************************************************
83 */
84 int G4GIDI_Misc_channelProductsCompare( tpia_channel *channel, int nProducts, char **productNames ) {
85
86 int i;
87 tpia_product *product;
88
89 if( channel->decayChannel.numberOfProducts != nProducts ) return( 0 );
90 for( product = tpia_channel_getFirstProduct( channel ), i = 0; product != NULL; product = tpia_decayChannel_getNextProduct( product ), i++ ) {
91 if( strcmp( product->productID->name, productNames[i] ) ) return( 0 );
92 }
93 return( 1 );
94 }
95 #endif
96 /*
97 ***************************************************************
98 */
99 int getNamesOfAvailableTargets_walker( MCGIDI_mapEntry *entry, int /*level*/, void *userData ) {
100
101 vector<string> *listOfTargets = (vector<string> *) userData;
102 vector<string>::iterator iter;
103
104 if( entry->type != MCGIDI_mapEntry_type_target ) return( 0 );
105 for( iter = listOfTargets->begin( ); iter != listOfTargets->end( ); iter++ ) {
106 if( entry->targetName == iter->c_str( ) ) return( 0 );
107 }
108 listOfTargets->push_back( entry->targetName );
109 return( 0 );
110 }
111