Main Page | Namespace List | Class Hierarchy | Class List | File List | Class Members | File Members | Related Pages

endl_formats.cpp

Go to the documentation of this file.
00001 /*
00002  * ******** fete: From ENDF To ENDL *********
00003  * 
00004  * Copyright (c) 2006, The Regents of the University of California. 
00005  * All rights reserved.
00006  * 
00007  * Produced at the Lawrence Livermore National Laboratory. 
00008  * Written by David A. Brown, Gerry Hedstrom, Tony Hill
00009  * 
00010  * This file is part of fete v1.0  (UCRL-CODE-218718)
00011  * 
00012  * Please read the COPYING file for "Our Notice and GNU General 
00013  * Public License" in the root of this software distribution.  
00014  * 
00015  * This program is free software; you can redistribute it and/or modify 
00016  * it under the terms of the GNU General Public License (as published by 
00017  * the Free Software Foundation) version 2, dated June 1991. 
00018  * 
00019  * This program is distributed in the hope that it will be useful, 
00020  * but WITHOUT ANY WARRANTY; without even the IMPLIED WARRANTY OF 
00021  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the terms 
00022  * and conditions of the GNU General Public License for more details. 
00023  * 
00024  * You should have received a copy of the GNU General Public License along 
00025  * with this program; if not, write to the Free Software Foundation, Inc., 
00026  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA 
00027  * 
00028  * $Revision: 1887 $
00029  * $Date: 2006-08-23 11:34:44 -0700 (Wed, 23 Aug 2006) $
00030  * $Author: dbrown $
00031  * $Id: endl_formats.cpp 1887 2006-08-23 18:34:44Z dbrown $
00032  * 
00033  * ******** fete: From ENDF To ENDL *********
00034  */
00035 
00036 // Implementation of writing routines
00037 #include "endl_formats.hpp"
00038 #include "global_params.hpp"
00039 #include "messaging.hpp"
00040 
00041 extern bdflsClass bdfls;
00042 extern GlobalParameterClass Global;
00043 extern map< MTCPair, YoList > yoMap;
00044 
00045 #define ENDL_FIELD_WIDTH     ENDL_DATA_PRECISION+7
00046 
00047 // --------------- constructor -------------------
00048 ENDLClass::ENDLClass()
00049 {
00050   //Set some defaults
00051   incident_particle = 0;
00052   twelve = ENDL_FIELD_WIDTH;
00053   excitation_level = 0;
00054   atomic_weight = 0.0;
00055   lifetime = 0.0;
00056   temp = 0.0;
00057   zero = 0.0;
00058   C=0;I=0;S=0;T=0;LR=0;
00059   X[0]=0.0;  //Typically the Q value
00060   X[1]=0.0;
00061   X[2]=0.0;
00062   X[3]=0.0;
00063   X[4]=0.0;
00064   intermediate_C = 0;
00065 
00066   //Create the ENDL end_of_file string - 71 spaces then a 1
00067   string s_eof(71,' ');
00068   string s_one="1";
00069   eof_line=s_eof+s_one;
00070 
00071   // set up the yoList <-> MT,C map
00072   fill_yoMap();
00073 }
00074 
00075 // --------------- destructor -------------------
00076 ENDLClass::~ENDLClass()
00077 {
00078 }
00079 
00080 // --------------- global -------------------
00081 // The global function is called to convert the global ENDF data
00082 // used by ENDL into acceptable units.
00083 // This routine should be called only once per evaluation.
00084 void ENDLClass::global(int eZA, double eAWR, double eTEMP, double eELIS, int yi, int Date )
00085 {
00086   //First we set up some conversion factors
00087   eV2MeV = 1.0e-6;      //eV to MeV conversion
00088   K2MeV = bdfls.nuclear_constants[10];
00089   N2AMU = 1.00866492;   //unit neutron to AMU
00090 
00091   ZA=eZA;
00092   date=Date;
00093   atomic_weight=eAWR*N2AMU;      // Convert the atomic weight to AMU
00094   temp=eTEMP*K2MeV;              // Convert the temperature to MeV
00095   excitation_level=eELIS*eV2MeV; // Convert the excitation level to MeV
00096 
00097   // Set the maximum incident energy
00098   incident_particle = yi;
00099   // fix for elastic reactions
00100   for (int i=0;i<8;++i) {
00101     yoMap[MTCPair( 2, 10 )].yos[i]=0;
00102     if (i==incident_particle) yoMap[MTCPair( 2, 10 )].yos[i]=1;
00103   }
00104 
00105   switch ( incident_particle )
00106   {
00107     case 1 : //incident neutron
00108       Max_E_in = Global.Value( "Max_n_energy" );
00109       break;
00110     case 2 :
00111       Max_E_in = Global.Value( "Max_cp_energy" );
00112       break;
00113     case 3 :
00114       Max_E_in = Global.Value( "Max_cp_energy" );
00115       break;
00116     case 4 :
00117       Max_E_in = Global.Value( "Max_cp_energy" );
00118       break;
00119     case 5 :
00120       Max_E_in = Global.Value( "Max_cp_energy" );
00121       break;
00122     case 6 :
00123       Max_E_in = Global.Value( "Max_cp_energy" );
00124       break;
00125     case 7 : //incident gamma, but might also be decay data 
00126       Max_E_in = Global.Value( "Max_g_energy" );
00127       break;
00128     default:
00129       SevereError("ENDLClass::global","Invalid incoming particle!");
00130   }      
00131 
00132   //Now we get the target mass and life
00133   mass_life_list::iterator MassLifePtr;  
00134   bool found = bdfls.Mass_Life.at(ZA, MassLifePtr);
00135   if(!found || (MassLifePtr->Mass() < 0.0) || (MassLifePtr->LifeTime() < 0.0))
00136   {
00137     FatalError("ENDLClass::global",
00138         pastenum("missing mass or lifetime for ZA: ",ZA));
00139   }
00140   lifetime = MassLifePtr->LifeTime();
00141   target_mass = MassLifePtr->Mass();
00142 
00143   //Now we get the mass of the incident particle
00144   found = bdfls.Mass_Life.at( yi, MassLifePtr );
00145   if( !found )
00146   {
00147     FatalError( "ENDLClass::global",
00148         pastenum( "missing mass or lifetime for yi: ", yi ) );
00149   }
00150   projectile_mass = MassLifePtr->Mass( );
00151   if( ( yi > 1 ) && ( yi < 7 ) )
00152   {
00153     Warning( "ENDLClass::global",
00154          "do you want to subtract off the mass of the electrons?" );
00155   }
00156 }
00157 
00158 // ---------------------- reaction -------------------------
00159 //! The reaction function is called to convert the ENDF data
00160 //! used by ENDL for each reaction into acceptable units.
00161 //! This routine should be called only once per reaction product, 
00162 //! during the processing of the MF=3 file.
00163 void ENDLClass::reaction(int lr, double eQM, double eQI)
00164 {
00165   // The cross section file gives the Q values
00166   if ( F != 3 ) Warning("ENDLClass::reaction","Should only be called when reading MF=3 files");
00167   
00168   //Convert the T number to ENDL C and S numbers
00169   set_c_number( );
00170   set_LR( lr );
00171   set_s_number( );
00172   if ( LR > 0 ) adjust_c_number_for_breakup();
00173 
00174   //Determine whether to write an ENDL file or not...
00175   write_file = true ;
00176   if ( C == -1 ) //Flag to turn off ENDL file writing
00177   {
00178     Info("ENDLClass::reaction","Reaction has no ENDL equivalent, will not write an ENDL file");
00179     write_file = false ;
00180     return;
00181   }
00182   else if ( C < -1 ) //More serious flag to turn off ENDL file writing
00183   {
00184     write_file = false ;
00185     Warning("ENDLClass::reaction",
00186       pastenum("Illegal C number :",C)+", will not write an ENDL file");
00187     return;
00188   }
00189 
00190   //Convert the Q value to MeV
00191   QM=eQM*eV2MeV;
00192   QI=eQI*eV2MeV;
00193   //For cross sections there is no outgoing particle
00194   outgoing_particle = 0;
00195 
00196   set_QValue();
00197 
00198   if( threshold > Max_E_in ) {
00199     Info( "ENDLClass::reaction", 
00200         pastenum( "Threshold above Max_energy, will not write an ENDL file: threshold=", threshold )+
00201         pastenum( ", Max_E_in=", Max_E_in ) );
00202     write_file = false;
00203   }
00204 }
00205 
00206 // -------------------- set_outgoing_ZA ---------------------
00207 //! set the outgoing particle using its ZA
00208 void ENDLClass::set_outgoing_ZA( int eZAP )
00209 {
00210   set_yo( za_to_yo( eZAP ) );
00211 }
00212 
00213 // -------------------- za_to_yo ---------------------
00214 //! Get the particle number corresponding to given ZA
00215 int ENDLClass::za_to_yo( int za )
00216 {
00217   switch ( za )
00218   {
00219     case 1:
00220       return 1;
00221     case 1001:
00222       return 2;
00223     case 1002:
00224       return 3;
00225     case 1003:
00226       return 4;
00227     case 2003:
00228       return 5;
00229     case 2004:
00230       return 6;
00231     case 0:
00232       return 7;
00233     default:
00234       if (za<0) Warning("ENDLClass::za_to_yo",pastenum("Illegal residual ZA: ",za));
00235       Info("ENDLClass::za_to_yo",pastenum("Data for the residual ",za));
00236       write_file = false;
00237   }
00238   return 99;
00239 }
00240 
00241 // -------------------- yo_to_za ---------------------
00242 //! Get the ZA corresponding to particle number yo
00243 int ENDLClass::yo_to_za( int yo )
00244 {
00245   switch( yo )
00246   {
00247     case 1:
00248       return 1;
00249     case 2:
00250       return 1001;
00251     case 3:
00252       return 1002;
00253     case 4:
00254       return 1003;
00255     case 5:
00256       return 2003;
00257     case 6:
00258       return 2004;
00259     case 7:
00260       return 0;
00261     default:
00262       SevereError("ENDLClass::yo_to_za",pastenum("no ZA for yo: ", yo));
00263   }
00264   return -1;// should never get here
00265 }
00266 
00267 // -------------------- get_ZAP ---------------------
00268 //! Identify the outgoing particle from the mt number
00269 int ENDLClass::get_ZAP( int mt )
00270 {
00271   //The outgoing particles is almost always a neutron, except in a few
00272   //cases
00273   if      (( mt>=600 && mt<=649 ) || mt == 103)
00274   {
00275     return 1001;  //proton
00276   }
00277   else if (( mt>=650 && mt<=699 ) || mt == 104)
00278   {
00279     return 1002;  //deuteron
00280   }
00281   else if (( mt>=700 && mt<=749 ) || mt == 105)
00282   {
00283     return 1003;  //triton
00284   }
00285   else if (( mt>=750 && mt<=799 ) || mt == 106)
00286   {
00287     return 2003;  //helium-3
00288   } 
00289   else if (( mt>=800 && mt<=849 ) || mt == 107)
00290   {
00291     return 2004;  //alpha
00292   }
00293   else
00294   {
00295     return 1;     //neutron
00296   }
00297 }
00298 
00299 // -------------------- set_yo ---------------------
00300 void ENDLClass::set_yo( int yo )
00301 {
00302   outgoing_particle = yo;
00303 
00304   // the maximum outgoing particle energy
00305   switch ( yo ) {
00306     case 0 :
00307       Max_E_out = Max_E_in;
00308       break;
00309     case 1 :
00310       Max_E_out = Global.Value( "Max_n_energy" );
00311       break;
00312     case 2 :
00313       Max_E_out = Global.Value( "Max_cp_energy" );
00314       break;
00315     case 3 :
00316       Max_E_out = Global.Value( "Max_cp_energy" );
00317       break;
00318     case 4 :
00319       Max_E_out = Global.Value( "Max_cp_energy" );
00320       break;
00321     case 5 :
00322       Max_E_out = Global.Value( "Max_cp_energy" );
00323       break;
00324     case 6 :
00325       Max_E_out = Global.Value( "Max_cp_energy" );
00326       break;
00327     case 7 :
00328       Max_E_out = Global.Value( "Max_g_energy" );
00329       break;
00330     case 99 :
00331       // this is the phony yo for the residual
00332       break;
00333     default:
00334       SevereError("ENDLClass::set_yo","Invalid outgoing particle!");
00335   }      
00336 }
00337 
00338 // -------------------- get_resid ---------------------
00339 //! Calculates the residual ZA and the compound nucleus
00340 int ENDLClass::get_resid( )
00341 {
00342   int ZA_in = yo_to_za( incident_particle );
00343   current_za = ZA + ZA_in;
00344 
00345   // special for charged-particle scattering
00346   if( C == 9 )
00347   {
00348     res_za = ZA;
00349   }
00350   else
00351   {
00352     // initialize
00353     res_za = current_za;
00354     // subtract off the outgoing particle ZAs
00355     for( int yout = 1; yout < 7; ++yout )
00356     {
00357       int ZA_out = yo_to_za( yout );
00358       res_za -= ZA_out * yoMap[ MTCPair(T,C) ][ yout ];
00359     }
00360   }
00361   return res_za;
00362 }
00363   
00364 // -------------------- set_I_number ---------------------
00365 void ENDLClass::set_I_number( int eI )
00366 {
00367   I=eI;
00368 
00369   //We can generate the ENDL file name
00370   file_name=endl_file_name(outgoing_particle,C,I,S);
00371 
00372   //Now we can build the header lines
00373   ostringstream os_1;
00374 
00375   os_1.setf(ios::right);
00376   os_1.setf(ios::scientific);
00377   os_1<<
00378     setw(6)<<ZA<<
00379     setw(3)<<incident_particle<<
00380     setw(3)<<outgoing_particle<<
00381     setw(13)<<setprecision(5)<<atomic_weight<<
00382     setw(7)<<date<<
00383     setw(3)<<ENDL_FIELD_WIDTH<<
00384     setw(13)<<setprecision(5)<<excitation_level<<
00385     setw(13)<<setprecision(5)<<lifetime<<
00386     setw(13)<<setprecision(5)<<temp;  
00387 
00388   header_line_1=os_1.str(); // Copy output string stream to normal string
00389 
00390   //remove the "e" of the exponent
00391   for( int i=0; i<header_line_1.length(); i++ )
00392     {
00393       if ( header_line_1.at(i)=='e' )
00394     {                    
00395       header_line_1.erase(i,1) ;
00396     }
00397     }
00398   
00399   ostringstream os_2;
00400 
00401   os_2.setf(ios::right);
00402   os_2.setf(ios::scientific);
00403   os_2<<
00404     setw(2)<<C<<
00405     setw(3)<<I<<
00406     setw(3)<<S ;
00407   //The format is dependant on the sign of the number.
00408   //We only consider the issue for X[0] since all other
00409   //header values SHOULD be positive.
00410   if ( X[0] < 0.0 ) os_2<<setw(13)<<setprecision(4)<<X[0];
00411   if ( X[0] >=0.0 ) os_2<<setw(13)<<setprecision(5)<<X[0];
00412   if ( X[1] < 0.0 ) os_2<<setw(13)<<setprecision(4)<<X[1];
00413   if ( X[1] >=0.0 ) os_2<<setw(13)<<setprecision(5)<<X[1];
00414   if ( X[2] < 0.0 ) os_2<<setw(13)<<setprecision(4)<<X[2];
00415   if ( X[2] >=0.0 ) os_2<<setw(13)<<setprecision(5)<<X[2];
00416   if ( X[3] < 0.0 ) os_2<<setw(13)<<setprecision(4)<<X[3];
00417   if ( X[3] >=0.0 ) os_2<<setw(13)<<setprecision(5)<<X[3];
00418   if ( X[4] < 0.0 ) os_2<<setw(13)<<setprecision(4)<<X[4];
00419   if ( X[4] >=0.0 ) os_2<<setw(13)<<setprecision(5)<<X[4];
00420 
00421   header_line_2=os_2.str(); // Copy output string stream to normal string
00422 
00423   //remove the "e" of the exponent
00424   for( int i=0; i<header_line_2.length(); i++ )
00425     {
00426       if ( header_line_2.at(i)=='e' )
00427     {
00428       header_line_2.erase(i,1) ;
00429     }
00430     }
00431 
00432 }
00433 // -------------------- new_file -------------------------------
00434 bool ENDLClass::new_file( )
00435 {
00436   return !( append || S==9 || S==1 );
00437 }
00438 
00439 // ------------------------- set_s_number ---------------------------
00440 void ENDLClass::set_s_number( )
00441 {
00442   if ( ( LR > 0 ) && ( LR != 31 ) ) S = 9;
00443   else
00444   {
00445     if ( T>=50  && T<91  || //yi,nprime cross sections to specific states
00446          T>=600 && T<649 || //yi,p cross sections to specific states
00447          T>=650 && T<699 || //yi,d cross sections to specific states
00448          T>=700 && T<749 || //yi,t cross sections to specific states
00449          T>=750 && T<799 || //yi,3He cross sections to specific states
00450          T>=800 && T<849  ) //yi,alpha cross sections to specific states
00451     {
00452       S = 1;
00453     }
00454     else         
00455     {
00456       S = 0;
00457     }
00458   }
00459 }
00460 
00461 // ------------------------- set_QValue ---------------------------
00462 void ENDLClass::set_QValue( )
00463 {
00464   // ENDL uses mass difference Q value of target's ground state, 
00465   // ENDF uses mass difference Q value of target's actual state
00466   double effQM = QM-excitation_level;
00467   X[2]=0; 
00468   X[3]=0;
00469   switch ( S )
00470   {
00471     case 0:
00472       X[0]=effQM;
00473       X[1]=0;
00474       break;
00475     case 1:
00476       X[0]=effQM;
00477       X[1]=QM - QI;
00478       break;
00479     case 9:
00480       X[0]=effQM;
00481       X[1]=QM - QI;
00482       X[2]=intermediate_C; 
00483       break;
00484     default:
00485       X[0]=effQM;
00486       X[1]=0;
00487       break;
00488   }
00489   // some reactions should never have thresholds, no matter what the evaluator
00490   // may have put down
00491   if ( C == 1 || C == 10 ) 
00492   {
00493     X[0] = 0.0;
00494     X[1] = 0.0;
00495   }
00496   
00497   // Now set the threshold.  This might be overridden in later processing because the 
00498   // data may start at a higher energy.  This is our first, best, guess.
00499   threshold = max( 0.0, - effQM * ( 1.0 + projectile_mass/target_mass ) );
00500   
00501   return;
00502 }
00503 // ----------------------- set_c_number ------------------------
00504 void ENDLClass::set_c_number( )
00505 {
00506   for ( map< MTCPair, YoList >::iterator it = yoMap.begin(); it != yoMap.end(); ++it )
00507   {
00508     if ( it->first.MT == T )
00509     {
00510       C = it->first.C;
00511       if ( C < 0 ) Info("ENDLClass::set_c_number",
00512         pastenum("MT = ",T)+" is for "+it->second.reactionName+", so not translating it");
00513       if ( ( C == 11 ) && ( Global.Value("sum_inelastic") != 0.0 ) ) {
00514         Warning("ENDLClass::set_c_number","Using only total inelastic");
00515         C = -1; //Do not write this out - inelastic cross section
00516       }
00517       return;
00518     }   
00519   }
00520 
00521   // Oops, if we get here, we've got a problem
00522   C = -42; // make sure we don't process any thing else with this MT!
00523   Warning("ENDLClass::set_c_number",
00524         pastenum("MT is not valid ENDF value, MT =",T) );
00525 }
00526 
00527 // ----------------------- adjust_c_number_for_breakup ------------------------
00528 void ENDLClass::adjust_c_number_for_breakup()
00529 {
00530   // save the originally assigned C number of the reaction that resulted in the nucleus that breaks up
00531   intermediate_C = C;
00532 
00533   YoList correction;
00534   // Figure out the adjustment to the outgoing particle list
00535   switch ( LR )
00536   {
00537     case 1: // Hafta parse the MF6 file completely in this case
00538       SevereError( "ENDLClass::adjust_c_number_for_breakup", 
00539         "Cannot determine C number when LR = 1 for complex breakup reactions");
00540     case 22: // a
00541         correction[6]=1;
00542         break;
00543     case 23: // 3a
00544         correction[6]=3;
00545         break;
00546     case 24: // na
00547         correction[1]=1;
00548         correction[6]=1;
00549         break;
00550     case 25: // 2na
00551         correction[1]=2;
00552         correction[6]=1;
00553         break;
00554     case 28: // p
00555         correction[2]=1;
00556         break;
00557     case 29: // 2a
00558         correction[6]=2;
00559         break;
00560     case 30: // n2a
00561         correction[1]=1;
00562         correction[6]=2;
00563         break;
00564     case 31:   // g, this is a special case, hidden in the footnote 
00565         break; // on p. 3.6 of the endf manual
00566     case 32: // d
00567         correction[3]=1;
00568         break;
00569     case 33: // t
00570         correction[4]=1;
00571         break;
00572     case 34: // 3He
00573         correction[5]=1;
00574         break;
00575     case 35: // d2a
00576         correction[3]=1;
00577         correction[6]=2;
00578         break;
00579     case 36: // t2a
00580         correction[4]=1;
00581         correction[6]=2;
00582         break;
00583     case 39: // ic
00584       Unimplemented("ENDLClass::adjust_c_number_for_breakup",
00585         pastenum("Cannot process special breakup reactions, LR=",LR));
00586       return;
00587     case 40: // ep pair formation
00588       Unimplemented("ENDLClass::adjust_c_number_for_breakup",
00589         pastenum("Cannot process special breakup reactions, LR=",LR));
00590       return;
00591     case 0:  // no changes
00592       return;
00593     default:
00594       SevereError( "ENDLClass::adjust_c_number_for_breakup",
00595         pastenum("Cannot determine C number, illegal LR, LR = ",LR) );
00596       break;
00597   }
00598   // our correction becomes the new outgoing partile list.
00599   correction += yoMap[ MTCPair(T,C) ];
00600   // figure out it's MT & C number, if any
00601   for ( map< MTCPair, YoList >::iterator it = yoMap.begin(); it != yoMap.end(); ++it )
00602   {
00603     if ( it->second == correction )
00604     {
00605       C = it->first.C;
00606       T = it->first.MT;
00607       if ( C < 0 ) Info("ENDLClass::adjust_c_number_for_breakup",
00608         pastenum("MT = ",T)+" is for "+it->second.reactionName+", so not translating it");
00609       return;
00610     }
00611   }
00612   // oops, we couldn't find it.  We can't translate this data.
00613   Warning("ENDLClass::adjust_c_number_for_breakup", "Reaction products have no corresponding C or MT");
00614   C=-1;
00615 }
00616 
00617 // ----------------------- 1 data ------------------------
00618 string ENDLClass::data( double d )
00619 {
00620   string s_data;
00621   ostringstream os_data;
00622   os_data.setf(ios::right);
00623   os_data.setf(ios::scientific);
00624   os_data<<
00625     setw(ENDL_FIELD_WIDTH)<<setprecision(ENDL_DATA_PRECISION)<<d;    
00626 
00627   s_data=os_data.str();
00628   return( s_data );
00629 }
00630 // ----------------------- 2 data ------------------------
00631 string ENDLClass::data( double d1, double d2 )
00632 {
00633   string s_data;
00634   ostringstream os_data;
00635   os_data.setf(ios::right);
00636   os_data.setf(ios::scientific);
00637   os_data<<
00638     setw(ENDL_FIELD_WIDTH)<<setprecision(ENDL_DATA_PRECISION)<<d1<<" "<<
00639     setw(ENDL_FIELD_WIDTH)<<setprecision(ENDL_DATA_PRECISION)<<d2;    
00640 
00641   s_data=os_data.str();
00642   return( s_data );
00643 }
00644 
00645 // ----------------------- 3 data ------------------------
00646 string ENDLClass::data( double d1, double d2, double d3 )
00647 {
00648   string s_data = data( d1, d2 );
00649   ostringstream os_data;
00650   os_data.setf(ios::right);
00651   os_data.setf(ios::scientific);
00652   os_data<<
00653     s_data<<" "<<
00654     setw(ENDL_FIELD_WIDTH)<<setprecision(ENDL_DATA_PRECISION)<<d3;
00655 
00656   s_data=os_data.str();
00657   return( s_data );
00658 }
00659 
00660 // ----------------------- 4 data ------------------------
00661 string ENDLClass::data( double d1, double d2, double d3, double d4 )
00662 {
00663   string s_data = data( d1, d2, d3 );
00664   ostringstream os_data;
00665   os_data.setf(ios::right);
00666   os_data.setf(ios::scientific);
00667   os_data<<
00668     s_data<<" "<<
00669     setw(ENDL_FIELD_WIDTH)<<setprecision(ENDL_DATA_PRECISION)<<d4;    
00670 
00671   s_data=os_data.str();
00672   return( s_data );
00673 }
00674 
00675 // ----------------------- yo_mult ------------------------
00676 //! Function that returns the multiplicity of this outgoing particle.
00677 int ENDLClass::yo_mult( )
00678 {
00679   return yoMap[ MTCPair(T,C) ][ outgoing_particle ];
00680 }
00681 
00682 // ----------------------- get_Z ------------------------
00683 //! get the Z of the incident particle
00684 int ENDLClass::get_Z( int yi )
00685 {
00686   int Z;
00687   switch ( incident_particle )
00688   {
00689   case 1:
00690     Z = 0;
00691     break;
00692   case 2:
00693     Z = 1;
00694     break;
00695   case 3:
00696     Z = 1;
00697     break;
00698   case 4:
00699     Z = 1;
00700     break;
00701   case 5:
00702     Z = 2;
00703     break;
00704   case 6:
00705     Z = 2;
00706     break;
00707   case 7:
00708     Z = 0;
00709     break;
00710   default:
00711     FatalError( "ENDLClass::get_Z",
00712                pastenum( "bad incident particle", yi ) );
00713   }
00714   return Z;
00715 }
00716 
00717 // ----------------------- fill_yoMap ------------------------
00718 void ENDLClass::fill_yoMap()
00719 {
00720   if ( !yoMap.empty() ) return; // already filled
00721   yoMap[MTCPair( 1, 1 )] = YoList( "(n,total)" );
00722   yoMap[MTCPair( 2, 10 )] = YoList( "(z,elastic)" );
00723   yoMap[MTCPair( 3, 55 )] = YoList( "(z,non-elastic)" );
00724   yoMap[MTCPair( 4, -1 )] = YoList( "(z,n), redundant", 0, 1, 0, 0, 0, 0, 0, 0 );
00725   yoMap[MTCPair( 5, -1 )] = YoList( "(z,anything)" );
00726   yoMap[MTCPair( 10, -1 )] = YoList( "(z,continuum)" );
00727   yoMap[MTCPair( 11, 32 )] = YoList( "(n,2nd)", 0, 2, 0, 1, 0, 0, 0, 0 );
00728   yoMap[MTCPair( 16, 12 )] = YoList( "(z,2n)", 0, 2, 0, 0, 0, 0, 0, 0 );
00729   yoMap[MTCPair( 17, 13 )] = YoList( "(z,3n)", 0, 3, 0, 0, 0, 0, 0, 0 );
00730   yoMap[MTCPair( 18, 15 )] = YoList( "(z,f)", -1, 0, 0, 0, 0, 0, 0, 0 );
00731   yoMap[MTCPair( 19, -1 )] = YoList( "(n,f) -- $1^{st}$ chance fission.", -1, 0, 0, 0, 0, 0, 0, 0 );
00732   yoMap[MTCPair( 20, -1 )] = YoList( "(n,nf) -- $2^{nd}$ chance fission.", -1, 1, 0, 0, 0, 0, 0, 0 );
00733   yoMap[MTCPair( 21, -1 )] = YoList( "(n,2nf) -- $3^{rd}$ chance fission.", -1, 2, 0, 0, 0, 0, 0, 0 );
00734   yoMap[MTCPair( 22, 26 )] = YoList( "(z,na)", 0, 1, 0, 0, 0, 0, 1, 0 );
00735   yoMap[MTCPair( 23, 36 )] = YoList( "(z,n3a)", 0, 1, 0, 0, 0, 0, 3, 0 );
00736   yoMap[MTCPair( 24, 33 )] = YoList( "(z,2na)", 0, 2, 0, 0, 0, 0, 1, 0 );
00737   yoMap[MTCPair( 25, 16 )] = YoList( "(z,3na)", 0, 3, 0, 0, 0, 0, 1, 0 );
00738   yoMap[MTCPair( 27, -1 )] = YoList( "(n,abs)" );
00739   yoMap[MTCPair( 28, 20 )] = YoList( "(z,np)", 0, 1, 1, 0, 0, 0, 0, 0 );
00740   yoMap[MTCPair( 29, 27 )] = YoList( "(z,n2a)", 0, 1, 0, 0, 0, 0, 2, 0 );
00741   yoMap[MTCPair( 30, -1 )] = YoList( "(z,2n2a)", 0, 2, 0, 0, 0, 0, 2, 0 );
00742   yoMap[MTCPair( 32, 22 )] = YoList( "(z,nd)", 0, 1, 0, 1, 0, 0, 0, 0 );
00743   yoMap[MTCPair( 33, 24 )] = YoList( "(z,nt)", 0, 1, 0, 0, 1, 0, 0, 0 );
00744   yoMap[MTCPair( 34, 25 )] = YoList( "(z,nH)", 0, 1, 0, 0, 0, 1, 0, 0 );
00745   yoMap[MTCPair( 35, -1 )] = YoList( "(z,nd2a)", 0, 1, 0, 1, 0, 0, 2, 0 );
00746   yoMap[MTCPair( 36, -1 )] = YoList( "(z,nt2a)", 0, 1, 0, 0, 1, 0, 2, 0 );
00747   yoMap[MTCPair( 37, 14 )] = YoList( "(z,4n)", 0, 4, 0, 0, 0, 0, 0, 0 );
00748   yoMap[MTCPair( 38, -1 )] = YoList( "(n,3nf) -- $4^{th}$ chance fission.", -1, 3, 0, 0, 0, 0, 0, 0 );
00749   yoMap[MTCPair( 41, 29 )] = YoList( "(z,2np)", 0, 2, 1, 0, 0, 0, 0, 0 );
00750   yoMap[MTCPair( 42, 16 )] = YoList( "(z,3np)", 0, 3, 1, 0, 0, 0, 0, 0 );
00751   yoMap[MTCPair( 44, 17 )] = YoList( "(n,n2p)", 0, 1, 2, 0, 0, 0, 0, 0 );
00752   yoMap[MTCPair( 45, 34 )] = YoList( "(n,npa)", 0, 1, 1, 0, 0, 0, 1, 0 );
00753   yoMap[MTCPair( 50, 11 )] = YoList( "(z,n[0]) -- excitation of g.s.", 0, 1, 0, 0, 0, 0, 0, 0 );
00754   yoMap[MTCPair( 51, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00755   yoMap[MTCPair( 52, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00756   yoMap[MTCPair( 53, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00757   yoMap[MTCPair( 54, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00758   yoMap[MTCPair( 55, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00759   yoMap[MTCPair( 56, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00760   yoMap[MTCPair( 57, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00761   yoMap[MTCPair( 58, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00762   yoMap[MTCPair( 59, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00763   yoMap[MTCPair( 60, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00764   yoMap[MTCPair( 61, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00765   yoMap[MTCPair( 62, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00766   yoMap[MTCPair( 63, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00767   yoMap[MTCPair( 64, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00768   yoMap[MTCPair( 65, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00769   yoMap[MTCPair( 66, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00770   yoMap[MTCPair( 67, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00771   yoMap[MTCPair( 68, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00772   yoMap[MTCPair( 69, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00773   yoMap[MTCPair( 70, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00774   yoMap[MTCPair( 71, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00775   yoMap[MTCPair( 72, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00776   yoMap[MTCPair( 73, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00777   yoMap[MTCPair( 74, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00778   yoMap[MTCPair( 75, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00779   yoMap[MTCPair( 76, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00780   yoMap[MTCPair( 77, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00781   yoMap[MTCPair( 78, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00782   yoMap[MTCPair( 79, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00783   yoMap[MTCPair( 80, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00784   yoMap[MTCPair( 81, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00785   yoMap[MTCPair( 82, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00786   yoMap[MTCPair( 83, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00787   yoMap[MTCPair( 84, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00788   yoMap[MTCPair( 85, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00789   yoMap[MTCPair( 86, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00790   yoMap[MTCPair( 87, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00791   yoMap[MTCPair( 88, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00792   yoMap[MTCPair( 89, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00793   yoMap[MTCPair( 90, 11 )] = YoList( "(z,n[n]) -- excitation of n$^{th}$ excited state", 0, 1, 0, 0, 0, 0, 0, 0 );
00794   yoMap[MTCPair( 91, 11 )] = YoList( "(z,n[c]) -- excitation to continuum", 0, 1, 0, 0, 0, 0, 0, 0 );
00795   yoMap[MTCPair( 101, -1 )] = YoList( "(n,disappearance)" );
00796   yoMap[MTCPair( 102, 46 )] = YoList( "(z,g)", 0, 0, 0, 0, 0, 0, 0, 1 );
00797   yoMap[MTCPair( 103, 40 )] = YoList( "(z,p)", 0, 0, 1, 0, 0, 0, 0, 0 );
00798   yoMap[MTCPair( 104, 41 )] = YoList( "(z,d)", 0, 0, 0, 1, 0, 0, 0, 0 );
00799   yoMap[MTCPair( 105, 42 )] = YoList( "(z,t)", 0, 0, 0, 0, 1, 0, 0, 0 );
00800   yoMap[MTCPair( 106, 44 )] = YoList( "(z,H)", 0, 0, 0, 0, 0, 1, 0, 0 );
00801   yoMap[MTCPair( 107, 45 )] = YoList( "(z,a)", 0, 0, 0, 0, 0, 0, 1, 0 );
00802   yoMap[MTCPair( 108, 37 )] = YoList( "(z,2a)", 0, 0, 0, 0, 0, 0, 2, 0 );
00803   yoMap[MTCPair( 109, -1 )] = YoList( "(z,3a)", 0, 0, 0, 0, 0, 0, 3, 0 );
00804   yoMap[MTCPair( 111, 18 )] = YoList( "(z,2p)", 0, 0, 2, 0, 0, 0, 0, 0 );
00805   yoMap[MTCPair( 112, 48 )] = YoList( "(z,pa)", 0, 0, 1, 0, 0, 0, 1, 0 );
00806   yoMap[MTCPair( 113, 42 )] = YoList( "(z,t2a)", 0, 0, 0, 0, 1, 0, 2, 0 );
00807   yoMap[MTCPair( 114, -1 )] = YoList( "(z,d2a)", 0, 0, 0, 1, 0, 0, 2, 0 );
00808   yoMap[MTCPair( 115, 19 )] = YoList( "(z,pd)", 0, 0, 1, 1, 0, 0, 0, 0 );
00809   yoMap[MTCPair( 116, 39 )] = YoList( "(z,pt)", 0, 0, 1, 0, 1, 0, 0, 0 );
00810   yoMap[MTCPair( 117, 47 )] = YoList( "(z,da)", 0, 0, 0, 1, 0, 0, 1, 0 );
00811   yoMap[MTCPair( 151, -1 )] = YoList( "(n,resonance)" );
00812   yoMap[MTCPair( 201, -1 )] = YoList( "(z,Xn)", 0, -1, 0, 0, 0, 0, 0, 0 );
00813   yoMap[MTCPair( 202, -1 )] = YoList( "(z,Xg)", 0, 0, 0, 0, 0, 0, 0, -1 );
00814   yoMap[MTCPair( 203, 50 )] = YoList( "(z,Xp)", 0, 0, -1, 0, 0, 0, 0, 0 );
00815   yoMap[MTCPair( 204, 51 )] = YoList( "(z,Xd)", 0, 0, 0, -1, 0, 0, 0, 0 );
00816   yoMap[MTCPair( 205, 52 )] = YoList( "(z,Xt)", 0, 0, 0, 0, -1, 0, 0, 0 );
00817   yoMap[MTCPair( 206, 53 )] = YoList( "(z,XH)", 0, 0, 0, 0, 0, -1, 0, 0 );
00818   yoMap[MTCPair( 207, 54 )] = YoList( "(z,Xa)", 0, 0, 0, 0, 0, 0, -1, 0 );
00819   yoMap[MTCPair( 208, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00820   yoMap[MTCPair( 209, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00821   yoMap[MTCPair( 210, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00822   yoMap[MTCPair( 211, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00823   yoMap[MTCPair( 212, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00824   yoMap[MTCPair( 213, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00825   yoMap[MTCPair( 214, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00826   yoMap[MTCPair( 215, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00827   yoMap[MTCPair( 216, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00828   yoMap[MTCPair( 217, -1 )] = YoList( "Various meson and antiparticle production $sigma$'s" );
00829   yoMap[MTCPair( 251, -1 )] = YoList( "Various elastic neutrons scattering parameters." );
00830   yoMap[MTCPair( 252, -1 )] = YoList( "Various elastic neutrons scattering parameters." );
00831   yoMap[MTCPair( 253, -1 )] = YoList( "Various elastic neutrons scattering parameters." );
00832   yoMap[MTCPair( 301, -1 )] = YoList( "Energy release for total and partial $sigma$'s." );
00833   yoMap[MTCPair( 451, -1 )] = YoList( "Heading or title information, MF=1 only." );
00834   yoMap[MTCPair( 452, 15 )] = YoList( "(z,f) $bar{nu}$ total, i.e. prompt plus delayed, fission.", -1, 0, 0, 0, 0, 0, 0, 0 );
00835   yoMap[MTCPair( 454, 15 )] = YoList( "(z,f) Independent fission product yields.", -1, 0, 0, 0, 0, 0, 0, 0 );
00836   yoMap[MTCPair( 455, 15 )] = YoList( "(z,f) $bar{nu}$ for delayed fission.", -1, 0, 0, 0, 0, 0, 0, 0 );
00837   yoMap[MTCPair( 456, 15 )] = YoList( "(z,f) $bar{nu}$ for prompt fission.", -1, 0, 0, 0, 0, 0, 0, 0 );
00838   yoMap[MTCPair( 457, -1 )] = YoList( "(z,f) Radioactive decay data.", -1, 0, 0, 0, 0, 0, 0, 0 );
00839   yoMap[MTCPair( 458, 15 )] = YoList( "(z,f) Energy release in fission for incident $n$'s.", -1, 0, 0, 0, 0, 0, 0, 0 );
00840   yoMap[MTCPair( 459, 15 )] = YoList( "(z,f) Cumulative fission product yields.", -1, 0, 0, 0, 0, 0, 0, 0 );
00841   yoMap[MTCPair( 500, -1 )] = YoList( "Total charged particle stopping power." );
00842   yoMap[MTCPair( 501, 70 )] = YoList( "Total photon interaction $sigma$." );
00843   yoMap[MTCPair( 502, 71 )] = YoList( "Photon coherent scattering." );
00844   yoMap[MTCPair( 504, 72 )] = YoList( "Photon incoherent scattering." );
00845   yoMap[MTCPair( 505, -1 )] = YoList( "Imaginary scattering factor." );
00846   yoMap[MTCPair( 506, -1 )] = YoList( "Real scattering factor." );
00847   yoMap[MTCPair( 515, -1 )] = YoList( "Pair production, electron field." );
00848   yoMap[MTCPair( 516, 74 )] = YoList( "Pair production." );
00849   yoMap[MTCPair( 517, -1 )] = YoList( "Pair production, nuclear field." );
00850   yoMap[MTCPair( 522, 73 )] = YoList( "Photoelectric absorption." );
00851   yoMap[MTCPair( 534, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00852   yoMap[MTCPair( 535, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00853   yoMap[MTCPair( 536, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00854   yoMap[MTCPair( 537, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00855   yoMap[MTCPair( 538, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00856   yoMap[MTCPair( 539, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00857   yoMap[MTCPair( 540, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00858   yoMap[MTCPair( 541, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00859   yoMap[MTCPair( 542, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00860   yoMap[MTCPair( 543, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00861   yoMap[MTCPair( 544, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00862   yoMap[MTCPair( 545, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00863   yoMap[MTCPair( 546, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00864   yoMap[MTCPair( 547, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00865   yoMap[MTCPair( 548, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00866   yoMap[MTCPair( 549, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00867   yoMap[MTCPair( 550, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00868   yoMap[MTCPair( 551, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00869   yoMap[MTCPair( 552, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00870   yoMap[MTCPair( 553, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00871   yoMap[MTCPair( 554, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00872   yoMap[MTCPair( 555, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00873   yoMap[MTCPair( 556, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00874   yoMap[MTCPair( 557, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00875   yoMap[MTCPair( 558, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00876   yoMap[MTCPair( 559, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00877   yoMap[MTCPair( 560, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00878   yoMap[MTCPair( 561, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00879   yoMap[MTCPair( 562, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00880   yoMap[MTCPair( 563, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00881   yoMap[MTCPair( 564, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00882   yoMap[MTCPair( 565, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00883   yoMap[MTCPair( 566, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00884   yoMap[MTCPair( 567, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00885   yoMap[MTCPair( 568, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00886   yoMap[MTCPair( 569, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00887   yoMap[MTCPair( 570, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00888   yoMap[MTCPair( 571, -1 )] = YoList( "Various subshell photoelectric $sigma$'s." );
00889   yoMap[MTCPair( 600, 40 )] = YoList( "(z,p[0])", 0, 0, 1, 0, 0, 0, 0, 0 );
00890   yoMap[MTCPair( 601, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00891   yoMap[MTCPair( 602, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00892   yoMap[MTCPair( 603, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00893   yoMap[MTCPair( 604, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00894   yoMap[MTCPair( 605, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00895   yoMap[MTCPair( 606, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00896   yoMap[MTCPair( 607, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00897   yoMap[MTCPair( 608, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00898   yoMap[MTCPair( 609, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00899   yoMap[MTCPair( 610, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00900   yoMap[MTCPair( 611, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00901   yoMap[MTCPair( 612, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00902   yoMap[MTCPair( 613, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00903   yoMap[MTCPair( 614, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00904   yoMap[MTCPair( 615, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00905   yoMap[MTCPair( 616, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00906   yoMap[MTCPair( 617, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00907   yoMap[MTCPair( 618, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00908   yoMap[MTCPair( 619, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00909   yoMap[MTCPair( 620, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00910   yoMap[MTCPair( 621, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00911   yoMap[MTCPair( 622, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00912   yoMap[MTCPair( 623, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00913   yoMap[MTCPair( 624, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00914   yoMap[MTCPair( 625, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00915   yoMap[MTCPair( 626, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00916   yoMap[MTCPair( 627, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00917   yoMap[MTCPair( 628, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00918   yoMap[MTCPair( 629, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00919   yoMap[MTCPair( 630, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00920   yoMap[MTCPair( 631, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00921   yoMap[MTCPair( 632, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00922   yoMap[MTCPair( 633, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00923   yoMap[MTCPair( 634, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00924   yoMap[MTCPair( 635, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00925   yoMap[MTCPair( 636, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00926   yoMap[MTCPair( 637, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00927   yoMap[MTCPair( 638, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00928   yoMap[MTCPair( 639, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00929   yoMap[MTCPair( 640, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00930   yoMap[MTCPair( 641, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00931   yoMap[MTCPair( 642, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00932   yoMap[MTCPair( 643, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00933   yoMap[MTCPair( 644, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00934   yoMap[MTCPair( 645, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00935   yoMap[MTCPair( 646, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00936   yoMap[MTCPair( 647, 40 )] = YoList( "(z,p[n])", 0, 0, 1, 0, 0, 0, 0, 0 );
00937   yoMap[MTCPair( 649, 40 )] = YoList( "(z,p[c])", 0, 0, 1, 0, 0, 0, 0, 0 );
00938   yoMap[MTCPair( 650, 41 )] = YoList( "(z,d[0])", 0, 0, 0, 1, 0, 0, 0, 0 );
00939   yoMap[MTCPair( 651, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00940   yoMap[MTCPair( 652, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00941   yoMap[MTCPair( 653, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00942   yoMap[MTCPair( 654, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00943   yoMap[MTCPair( 655, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00944   yoMap[MTCPair( 656, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00945   yoMap[MTCPair( 657, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00946   yoMap[MTCPair( 658, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00947   yoMap[MTCPair( 659, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00948   yoMap[MTCPair( 660, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00949   yoMap[MTCPair( 661, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00950   yoMap[MTCPair( 662, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00951   yoMap[MTCPair( 663, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00952   yoMap[MTCPair( 664, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00953   yoMap[MTCPair( 665, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00954   yoMap[MTCPair( 666, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00955   yoMap[MTCPair( 667, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00956   yoMap[MTCPair( 668, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00957   yoMap[MTCPair( 669, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00958   yoMap[MTCPair( 670, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00959   yoMap[MTCPair( 671, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00960   yoMap[MTCPair( 672, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00961   yoMap[MTCPair( 673, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00962   yoMap[MTCPair( 674, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00963   yoMap[MTCPair( 675, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00964   yoMap[MTCPair( 676, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00965   yoMap[MTCPair( 677, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00966   yoMap[MTCPair( 678, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00967   yoMap[MTCPair( 679, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00968   yoMap[MTCPair( 680, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00969   yoMap[MTCPair( 681, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00970   yoMap[MTCPair( 682, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00971   yoMap[MTCPair( 683, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00972   yoMap[MTCPair( 684, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00973   yoMap[MTCPair( 685, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00974   yoMap[MTCPair( 686, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00975   yoMap[MTCPair( 687, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00976   yoMap[MTCPair( 688, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00977   yoMap[MTCPair( 689, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00978   yoMap[MTCPair( 690, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00979   yoMap[MTCPair( 691, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00980   yoMap[MTCPair( 692, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00981   yoMap[MTCPair( 693, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00982   yoMap[MTCPair( 694, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00983   yoMap[MTCPair( 695, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00984   yoMap[MTCPair( 696, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00985   yoMap[MTCPair( 697, 41 )] = YoList( "(z,d[n])", 0, 0, 0, 1, 0, 0, 0, 0 );
00986   yoMap[MTCPair( 699, 41 )] = YoList( "(z,d[c])", 0, 0, 0, 1, 0, 0, 0, 0 );
00987   yoMap[MTCPair( 700, 42 )] = YoList( "(z,t[0])", 0, 0, 0, 0, 1, 0, 0, 0 );
00988   yoMap[MTCPair( 701, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00989   yoMap[MTCPair( 702, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00990   yoMap[MTCPair( 703, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00991   yoMap[MTCPair( 704, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00992   yoMap[MTCPair( 705, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00993   yoMap[MTCPair( 706, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00994   yoMap[MTCPair( 707, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00995   yoMap[MTCPair( 708, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00996   yoMap[MTCPair( 709, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00997   yoMap[MTCPair( 710, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00998   yoMap[MTCPair( 711, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
00999   yoMap[MTCPair( 712, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01000   yoMap[MTCPair( 713, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01001   yoMap[MTCPair( 714, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01002   yoMap[MTCPair( 715, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01003   yoMap[MTCPair( 716, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01004   yoMap[MTCPair( 717, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01005   yoMap[MTCPair( 718, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01006   yoMap[MTCPair( 719, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01007   yoMap[MTCPair( 720, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01008   yoMap[MTCPair( 721, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01009   yoMap[MTCPair( 722, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01010   yoMap[MTCPair( 723, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01011   yoMap[MTCPair( 724, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01012   yoMap[MTCPair( 725, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01013   yoMap[MTCPair( 726, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01014   yoMap[MTCPair( 727, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01015   yoMap[MTCPair( 728, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01016   yoMap[MTCPair( 729, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01017   yoMap[MTCPair( 730, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01018   yoMap[MTCPair( 731, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01019   yoMap[MTCPair( 732, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01020   yoMap[MTCPair( 733, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01021   yoMap[MTCPair( 734, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01022   yoMap[MTCPair( 735, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01023   yoMap[MTCPair( 736, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01024   yoMap[MTCPair( 737, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01025   yoMap[MTCPair( 738, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01026   yoMap[MTCPair( 739, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01027   yoMap[MTCPair( 740, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01028   yoMap[MTCPair( 741, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01029   yoMap[MTCPair( 742, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01030   yoMap[MTCPair( 743, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01031   yoMap[MTCPair( 744, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01032   yoMap[MTCPair( 745, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01033   yoMap[MTCPair( 746, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01034   yoMap[MTCPair( 747, 42 )] = YoList( "(z,t[n])", 0, 0, 0, 0, 1, 0, 0, 0 );
01035   yoMap[MTCPair( 749, 42 )] = YoList( "(z,t[c])", 0, 0, 0, 0, 1, 0, 0, 0 );
01036   yoMap[MTCPair( 750, 44 )] = YoList( "(z,H[0])", 0, 0, 0, 0, 0, 1, 0, 0 );
01037   yoMap[MTCPair( 751, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01038   yoMap[MTCPair( 752, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01039   yoMap[MTCPair( 753, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01040   yoMap[MTCPair( 754, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01041   yoMap[MTCPair( 755, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01042   yoMap[MTCPair( 756, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01043   yoMap[MTCPair( 757, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01044   yoMap[MTCPair( 758, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01045   yoMap[MTCPair( 759, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01046   yoMap[MTCPair( 760, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01047   yoMap[MTCPair( 761, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01048   yoMap[MTCPair( 762, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01049   yoMap[MTCPair( 763, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01050   yoMap[MTCPair( 764, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01051   yoMap[MTCPair( 765, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01052   yoMap[MTCPair( 766, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01053   yoMap[MTCPair( 767, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01054   yoMap[MTCPair( 768, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01055   yoMap[MTCPair( 769, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01056   yoMap[MTCPair( 770, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01057   yoMap[MTCPair( 771, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01058   yoMap[MTCPair( 772, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01059   yoMap[MTCPair( 773, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01060   yoMap[MTCPair( 774, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01061   yoMap[MTCPair( 775, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01062   yoMap[MTCPair( 776, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01063   yoMap[MTCPair( 777, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01064   yoMap[MTCPair( 778, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01065   yoMap[MTCPair( 779, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01066   yoMap[MTCPair( 780, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01067   yoMap[MTCPair( 781, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01068   yoMap[MTCPair( 782, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01069   yoMap[MTCPair( 783, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01070   yoMap[MTCPair( 784, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01071   yoMap[MTCPair( 785, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01072   yoMap[MTCPair( 786, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01073   yoMap[MTCPair( 787, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01074   yoMap[MTCPair( 788, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01075   yoMap[MTCPair( 789, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01076   yoMap[MTCPair( 790, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01077   yoMap[MTCPair( 791, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01078   yoMap[MTCPair( 792, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01079   yoMap[MTCPair( 793, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01080   yoMap[MTCPair( 794, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01081   yoMap[MTCPair( 795, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01082   yoMap[MTCPair( 796, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01083   yoMap[MTCPair( 797, 44 )] = YoList( "(z,H[n])", 0, 0, 0, 0, 0, 1, 0, 0 );
01084   yoMap[MTCPair( 799, 44 )] = YoList( "(z,H[c])", 0, 0, 0, 0, 0, 1, 0, 0 );
01085   yoMap[MTCPair( 800, 45 )] = YoList( "(z,a[0])", 0, 0, 0, 0, 0, 0, 1, 0 );
01086   yoMap[MTCPair( 801, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01087   yoMap[MTCPair( 802, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01088   yoMap[MTCPair( 803, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01089   yoMap[MTCPair( 804, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01090   yoMap[MTCPair( 805, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01091   yoMap[MTCPair( 806, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01092   yoMap[MTCPair( 807, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01093   yoMap[MTCPair( 808, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01094   yoMap[MTCPair( 809, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01095   yoMap[MTCPair( 810, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01096   yoMap[MTCPair( 811, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01097   yoMap[MTCPair( 812, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01098   yoMap[MTCPair( 813, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01099   yoMap[MTCPair( 814, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01100   yoMap[MTCPair( 815, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01101   yoMap[MTCPair( 816, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01102   yoMap[MTCPair( 817, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01103   yoMap[MTCPair( 818, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01104   yoMap[MTCPair( 819, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01105   yoMap[MTCPair( 820, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01106   yoMap[MTCPair( 821, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01107   yoMap[MTCPair( 822, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01108   yoMap[MTCPair( 823, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01109   yoMap[MTCPair( 824, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01110   yoMap[MTCPair( 825, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01111   yoMap[MTCPair( 826, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01112   yoMap[MTCPair( 827, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01113   yoMap[MTCPair( 828, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01114   yoMap[MTCPair( 829, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01115   yoMap[MTCPair( 830, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01116   yoMap[MTCPair( 831, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01117   yoMap[MTCPair( 832, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01118   yoMap[MTCPair( 833, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01119   yoMap[MTCPair( 834, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01120   yoMap[MTCPair( 835, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01121   yoMap[MTCPair( 836, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01122   yoMap[MTCPair( 837, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01123   yoMap[MTCPair( 838, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01124   yoMap[MTCPair( 839, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01125   yoMap[MTCPair( 840, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01126   yoMap[MTCPair( 841, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01127   yoMap[MTCPair( 842, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01128   yoMap[MTCPair( 843, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01129   yoMap[MTCPair( 844, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01130   yoMap[MTCPair( 845, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01131   yoMap[MTCPair( 846, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01132   yoMap[MTCPair( 847, 45 )] = YoList( "(z,a[n])", 0, 0, 0, 0, 0, 0, 1, 0 );
01133   yoMap[MTCPair( 849, 45 )] = YoList( "(z,a[c])", 0, 0, 0, 0, 0, 0, 1, 0 );
01134   yoMap[MTCPair( 851, -1 )] = YoList( "Lumped reaction covariances." );
01135 }
01136 

Generated on Thu Sep 7 10:30:04 2006 for fete -- From ENDFB6 To ENDL by doxygen 1.3.4