Go to the documentation of this file.00001 #include "cs.h"
00002 static int cs_tol (int i, int j, double aij, void *tol)
00003 {
00004 return (fabs (aij) > *((double *) tol)) ;
00005 }
00006 int cs_droptol (cs *A, double tol)
00007 {
00008 return (cs_fkeep (A, &cs_tol, &tol)) ;
00009 }