1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-07 18:30:55 +03:00
ski a8676008f7 Adding of testing cases from subgroups 937 940 and 941 of CHL group
Splitting of subgroups bugs/modalg and bugs/moddata to optimise time of testing
Correction of end file in group v3d
Small correction of test case
2013-02-08 15:16:15 +04:00

25 lines
437 B
Plaintext
Executable File

puts "========"
puts "BUC60924"
puts "========"
puts ""
##################################################
## ShapeAnalysisStd_Curve::IsPlanar works incorrectly with a conic curve.
##################################################
pload QAcommands
ellipse el 0 0 1 20 10
set result1 [BUC60924 el 0 0 1]
if {${result1} != "The curve is planar !\n"} {
puts "BUC60924: Error"
} else {
puts "BUC60924: OK"
}
set 3dviewer 1