BOSS_7.0.2: /home/bes3soft/bes3soft/Boss/7.0.2/dist/7.0.2/Generator/KKMC/KKMC-00-00-55/src/bornv/BStra.h Source File

00001 *
00002 *//                                                                                  //
00003 *//          Pseudoclass BStra                                                       //
00004 *//                                                                                  //
00005 *//                                                                                  //
00006 *//                                                                                  //
00007 *
00008 
00009       DOUBLE PRECISION   m_XCrude,  m_XGridB,  m_EGridB
00010       INTEGER            m_out,     m_Nevgen
00011       INTEGER            m_ModeA,   m_ModeB,   m_ModeC
00012 
00013       COMMON /c_BStra/   
00014      $    m_XCrude,                         ! crude xsection
00015      $    m_XGridB,                         ! from grid building
00016      $    m_EGridB,                         ! rel. error    
00017      $    m_Nevgen,                         ! serial no of event
00018      $    m_ModeA,                          ! operational mode for Initialization
00019      $    m_ModeB,                          ! operational mode for Initialization
00020      $    m_ModeC,                          ! operational mode for Initialization
00021      $    m_out                             ! output unit
00022       SAVE /c_BStra/   
00023 *
00024 *//                                                                                  //
00025 *//          END of Pseudoclass BStra                                                //
00026 *//                                                                                  //
00027 *