1       COMMON /INIREP/ NREPPI(3), IREPPI(3,3)
2