if {${Toler} > ${MaxTol}} {
puts "Error: Tolerance is too big!"
}
-
-regexp {The length c_1 is ([-0-9.+eE]+)} [length c_1] full Curve_Length
-
-set expected_length 0.52377379499528021
-set tol_abs_length 1.e-7
-set tol_rel_length 0.01
-checkreal "Curve length" ${Curve_Length} ${expected_length} ${tol_abs_length} ${tol_rel_length}
+checklength c_1 -l 0.52377379499528021
# 2. BOP
bclearobjects