1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-04 18:06:22 +03:00
occt/tests/bugs/modalg_5/bug25969_std
myn ff205346c9 0026961: Recover possibility to read files in old persistence format
Possibility to read shapes and OCAF documents from old persistence format (Std and StdL schema) is restored.

Test cases used old persistent files on input are restored with suffix "_std"

Removing toolkit from OS package
2016-03-04 07:31:08 +03:00

38 lines
688 B
Plaintext

puts "================"
puts "CR25969"
puts "================"
puts ""
###############################################
## Wrong result obtained by 2d classifier algorithm.
###############################################
pload DCAF
Open [locate_data_file bug25969_pal22851.sgd] D
GetShape D 0:1:15:1:1:2 b1
GetShape D 0:1:29:1:1:2 b2
explode b1
explode b2
bop b1_2 b2_1
bopcut r
explode r f
copy r_4 f
pcurve f
point p 12.658283198213592 21.045164979270297
set cls1 [b2dclassifx f p]
if { [regexp {OUT} $cls1] } {
puts "Error : Wrong result of 2d classifier algorithm"
} else {
puts "OK : Good result of 2d classifier algorithm"
}
smallview
fit
set only_screen_axo 1