Fixed commented out result initialization

Author: ACSimon33

TESTING/LIN/dchkqp3rk.f

@@ -605,9 +605,9 @@ SUBROUTINE DCHKQP3RK( DOTYPE, NM, MVAL, NN, NVAL, NNS, NSVAL,
                   CALL DLACPY( 'All', M, NRHS, COPYB, LDA,
      $                         B,  LDA )
                   CALL ICOPY( N, IWORK( 1 ), 1, IWORK( N+1 ), 1 )
-                  ! DO I = 1, NTESTS
-                  !   RESULT( I ) = ZERO
-                  ! END DO
+                  DO I = 1, NTESTS
+                    RESULT( I ) = ZERO
+                  END DO
 *
                   ABSTOL = -1.0
                   RELTOL = -1.0