C R2P LOGICAL VARIABLES CONCERNING RC2 C C R2P TRUE IF ACCUMULATION OF RC2 MATRIX HAS BEGUN. C R2VP TRUE IF ACCUMULATION OF R2V HAS BEGUN C LOGICAL R2P, R2VP(NPVAR) C COMMON /R2P/ R2P, R2VP