mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-15 13:48:57 +08:00
22 lines
528 B
Plaintext
Executable File
22 lines
528 B
Plaintext
Executable File
puts "========"
|
|
puts "OCC1665"
|
|
puts "========"
|
|
############################################################
|
|
## Geom_BSplineSurface::SetVPeriodic throws an exception
|
|
############################################################
|
|
|
|
restore [locate_data_file OCC1665.draw] a
|
|
|
|
if {[catch {setvperiodic a} message]} {
|
|
puts "OCC1665 FAULTY : setvperiodic"
|
|
} else {
|
|
if {[catch {mkface result a} message]} {
|
|
puts "OCC1665 FAULTY : mkface"
|
|
} else {
|
|
checknbshapes result -edge 3
|
|
}
|
|
}
|
|
|
|
set square 12265.3
|
|
set 3dviewer 2
|