00001 * 00002 *// // 00003 *// // 00004 *// Pseudo-CLASS BVR // 00005 *// // 00006 *// B-functions Real and Virtual and YFS form-factors // 00007 *// // 00008 *// // 00009 * 00010 00011 DOUBLE PRECISION m_pi, m_zeta2, m_zeta3 00012 PARAMETER( m_pi = 3.1415926535897932d0) 00013 PARAMETER( m_zeta2 = m_pi**2/6d0) 00014 PARAMETER( m_zeta3 = 1.2020569031595942854d0) 00015 * 00016 00017 * 00018 *// // 00019 *