anchor.diff:       $                                    INCX, ZERO, Z, INCX, XT, G,
        $                                    XX, EPS, ERR, FATAL, NOUT,
        $                                    .TRUE. )
  -                           ELSE IF( SNAME( 4: 5 ).EQ.'sv' )THEN
  +                           ELSE IF( SNAME( 10: 11 ).EQ.'sv' )THEN
   *
   *                             Compute approximation to original vector.
   *
  
positive.code:                         END IF
  *
                          IF( .NOT.NULL )THEN
                             IF( SNAME( 4: 5 ).EQ.'mv' )THEN
  *
  *                             Check the result.
  *
  
negative.code: *
  *                       Call the subroutine.
  *
                          IF( SNAME( 10: 11 ).EQ.'mv' )THEN
                             IF( FULL )THEN
                                IF( TRACE )
       $                           WRITE( NTRA, FMT = 9993 )NC, SNAME,
  