180 NORM = NORM + ABS(D(I)) + ABS(E(I))
! ********** EPS2 IS THE CRITERION FOR GROUPING,
! EPS3 REPLACES ZERO PIVOTS AND EQUAL
180 NORM = NORM + ABS(D(I)) + ABS(E(I))
! ********** EPS2 IS THE CRITERION FOR GROUPING,
! EPS3 REPLACES ZERO PIVOTS AND EQUAL