1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-08-14 13:30:48 +03:00

# correct test cases

This commit is contained in:
msv
2018-10-08 10:14:00 +03:00
parent 83bc18b4f0
commit f9f5db1264
2 changed files with 4 additions and 4 deletions

View File

@@ -2,14 +2,14 @@ puts "========"
puts "0030020: Incorrect bspline visualization"
puts "========\n"
set F [open pnts w]
set F [open $imagedir/pnts w]
puts $F "3 3d"
puts $F "0 0 0"
puts $F "2 0 0"
puts $F "1 0 0"
close $F
interpol c pnts
file delete pnts
interpol c $imagedir/pnts
file delete $imagedir/pnts
set out [crvtpoints r c 0.1 1]
if {[lindex $out 3] != 3} {

View File

@@ -16,7 +16,7 @@ donly a_1
fit
set deflection 1.
set angular_deflection [dval 0.349/pi*180]
set angular_deflection 20
set info [crvtpoints r c ${deflection} ${angular_deflection}]
set str1 "Nb points +: +(\[-0-9.+eE\]+)\n"