From d0ad288a66affe89ca7a68a2767aee3696a0c8e5 Mon Sep 17 00:00:00 2001
From: abv <abv@opencascade.com>
Date: Thu, 15 Mar 2012 08:50:00 +0400
Subject: [PATCH] 0022989: BSplCLib::Reparametrize() fails on near knots

---
 src/BSplCLib/BSplCLib.cxx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/BSplCLib/BSplCLib.cxx b/src/BSplCLib/BSplCLib.cxx
index 7147f995ce..e230eb21ba 100755
--- a/src/BSplCLib/BSplCLib.cxx
+++ b/src/BSplCLib/BSplCLib.cxx
@@ -674,7 +674,7 @@ void BSplCLib::Reparametrize
       //for CheckCurveData
       Standard_Real Eps = Epsilon( Abs(Knots(i-1)) );
       if (Knots(i) - Knots(i-1) <= Eps)
-	Knots(i) += 1.1*Eps;
+	Knots(i) = NextAfter (Knots(i-1) + Eps, RealLast());
 
       K1 = K2;
     }