Searched refs:BCNeg (Results 1 – 1 of 1) sorted by relevance
3941 ALLOCATE( BCNeg( MinBC:MaxBC ) )3948 BCNeg = .FALSE.4036 IF( BCNeg( BC ) ) THEN4039 BCNeg( BC ) = .FALSE.4050 BCNeg( BC ) = .TRUE.4068 k = COUNT( BCNeg )4088 IF ( BCNeg(j) ) THEN4100 IF( BCNeg(i) ) THEN4111 BCNeg(i) = .FALSE.4149 IF( BCNeg(i) ) THEN[all …]