1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-04-26 10:19:45 +03:00
2012-12-07 16:29:17 +04:00

25 lines
626 B
Plaintext
Executable File

puts "========================"
puts " BUC60980 "
puts " OCC360"
puts "========================"
puts ""
##################################################################
## Can not find a projection the circle on the sphere.
##################################################################
restore [locate_data_file OCC360a.draw] c
restore [locate_data_file OCC360b.draw] cf
set che [project result c cf]
puts $che
if { [regexp {Projection} $che] && [regexp {Failed} $che] } {
puts "Faulty OCC360: command PROJECT works wrongly"
} else {
puts " OCC360 OK : command PROJECT works properly"
}
set 2dviewer 0