Index: tol_tests/tol/LinearAlgebra/vmatrix/test_0006/test.tol
===================================================================
--- tol_tests/tol/LinearAlgebra/vmatrix/test_0006/test.tol	(revision a65c03ee65016b6a6b41fc1570a9abf1d6a4d0e5)
+++ tol_tests/tol/LinearAlgebra/vmatrix/test_0006/test.tol	(revision de5922eaefa0f06c3213c1991cffc1c42857d530)
@@ -12,5 +12,5 @@
   WriteLn("TRACE 1");
 
-  Real size = 1000;
+  Real size = 10000;
   Real burning = 1;
 
@@ -90,4 +90,16 @@
 
   Set TruncatedSamples = For(1,Card(Cases), getAllSamples);
+  Set Feasible.ok = For(1,Card(Cases), Real(Real k)
+  {
+//  Real k= 1;
+    Set     case = Cases[k];
+    VMatrix B    = Mat2VMat(case::B);
+    VMatrix b    = Mat2VMat(case::b);
+    VMatrix x = Mat2VMat(TruncatedSamples[k]);
+    VMatrix b_ = Group("ConcatColumns",NCopy(VRows(x),b));
+    VMatrix g = B*Tra(x)-b_;
+    Real G = VMatMax(g);
+    G<0
+  });
     
   Matrix FullDivUnion = Group("ConcatRows", FullDividing);
@@ -120,8 +132,8 @@
     eqMinProb,
     neMaxProb
-  ]];
+  ]] << Feasible.ok;
 
 //This is a messure of the success of the test 
-  Real quality_ = And(numErr0 == NError)*eqMinProb;
+  Real quality_ = And(numErr0 == NError)*eqMinProb*SetMin(Feasible.ok);
 
 //Return the results