diff -N -r -c HLib-1.3/Library/rkmatrix.c HLib-1.3new/Library/rkmatrix.c *** HLib-1.3/Library/rkmatrix.c 2005-11-28 15:30:47.000000000 +0100 --- HLib-1.3new/Library/rkmatrix.c 2008-07-09 10:31:54.000000000 +0200 *************** *** 479,485 **** for(i=0; irows; i++) r->a[r->kt*r->rows +i] = 0.0; r->a[r->kt*r->rows +row] = 1.0; for(i=0; icols; i++) r->b[r->kt*r->cols +i] = 0.0; ! r->b[r->kt*r->cols +col] = value; r->kt++; }else{ rk_row_offset[0] = 0; --- 479,485 ---- for(i=0; irows; i++) r->a[r->kt*r->rows +i] = 0.0; r->a[r->kt*r->rows +row] = 1.0; for(i=0; icols; i++) r->b[r->kt*r->cols +i] = 0.0; ! r->b[r->kt*r->cols +col] = value-getentry_rkmatrix(r,row,col); r->kt++; }else{ rk_row_offset[0] = 0;