PDGFromId: protection against intfluka = 0.
authormorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 13 Dec 2002 09:38:53 +0000 (09:38 +0000)
committermorsch <morsch@f7af4fe6-9843-0410-8265-dc069ae4e863>
Fri, 13 Dec 2002 09:38:53 +0000 (09:38 +0000)
TFluka/TFluka.cxx

index b2ececc..241d277 100644 (file)
@@ -15,6 +15,9 @@
 
 /*
 $Log$
+Revision 1.9  2002/12/06 12:41:29  morsch
+Mess from last merge cleaned up.
+
 Revision 1.8  2002/12/06 12:28:44  morsch
 Region to media mapping corrected and improved.
 
@@ -497,11 +500,17 @@ Int_t TFluka::PDGFromId(Int_t id) const
 {
   //
   // Return PDG code and pseudo ENDF code from Fluka code
+  // IPTOKP array goes from official to internal
+
+    Int_t intfluka = GetFlukaIPTOKP(id);
 
-  //IPTOKP array goes from official to internal
-  Int_t intfluka = GetFlukaIPTOKP(id);
-  //MPKDHA() goes from internal to PDG
-  return mpdgha(intfluka);
+    if (! intfluka) {
+       printf("\n Warning PDGFromId: internal id of %d is zero \n", id);
+       return -1;
+    }
+    
+    //MPKDHA() goes from internal to PDG
+    return mpdgha(intfluka);
 }
 
 //_____________________________________________________________________________