[occt.git] / tests / bugs / moddata_2 / bug23644

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"
   }
}
Commit	Line	Data
4bd102b8	1	puts "========"
	2	puts "CR23644"
	3	puts "========"
	4
	5	##########################################
	6	## Intersection between coaxial cones produces exception
	7	##########################################
	8
	9	pcone cn1 10 0 20
	10	pcone cn2 20 0 20
	11	explode cn1 f
	12	explode cn2 f
	13	copy cn1_1 f1
	14	copy cn2_1 f2
	15
	16	if [catch {bopcurves f1 f2} BOPLog] {
	17	if { [regexp "Tolerance Reached=0\n has no 3d curve" ${BOPLog}] != 1 } {
	18	puts "CR23644: Error"
	19	}
	20	}