EIC Software
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Groups Pages
lepto2.inc
Go to the documentation of this file. Or view the newest version in sPHENIX GitHub for file lepto2.inc
1 *
2 * to avoid variable conflictions, a second keep element is necessary
3 * with the same common block name (see LEPTO2)
4 *
5 
6  COMMON /LEPTOU/ CUT(14),LST(40),PARL(30),
7  & XLP,YLP,W2LP,Q2LP,ULP
8  REAL CUT,PARL,XLP,YLP,W2LP,Q2LP,ULP
9  INTEGER LST
10  SAVE /LEPTOU/