4 #ifndef __CFORTRAN_LOADED
9 // COMMON /UA1JETS/ NJET, ETJ(100), ETAJ(100,2), PHIJ(100,2), NCELLJ(100)
20 #define UA1JETS COMMON_BLOCK(UA1JETS,ua1jets)
21 COMMON_BLOCK_DEF(UA1JetsCommon,UA1JETS);
23 // COMMON /UA1CELL/ etaCellSize, phiCellSize
30 #define UA1CELL COMMON_BLOCK(UA1CELL,ua1cell)
31 COMMON_BLOCK_DEF(UA1CellCommon,UA1CELL);
33 // COMMON /UA1PARA/ cone_rad, et_seed, ej_min, et_min
41 #define UA1PARA COMMON_BLOCK(UA1PARA,ua1para)
42 COMMON_BLOCK_DEF(UA1ParaCommon,UA1PARA);