mirror of
https://github.com/Open-Cascade-SAS/OCCT.git
synced 2026-05-11 01:58:22 +08:00
a8676008f7
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
21 lines
435 B
Plaintext
Executable File
21 lines
435 B
Plaintext
Executable File
puts "========"
|
|
puts "CR23644"
|
|
puts "========"
|
|
|
|
##########################################
|
|
## Intersection between coaxial cones produces exception
|
|
##########################################
|
|
|
|
pcone cn1 10 0 20
|
|
pcone cn2 20 0 20
|
|
explode cn1 f
|
|
explode cn2 f
|
|
copy cn1_1 f1
|
|
copy cn2_1 f2
|
|
|
|
if [catch {bopcurves f1 f2} BOPLog] {
|
|
if { [regexp "Tolerance Reached=0\n has no 3d curve" ${BOPLog}] != 1 } {
|
|
puts "CR23644: Error"
|
|
}
|
|
}
|