1puts "========"
2puts "OCC25124"
3puts "========"
4puts ""
5######################################################
6# Removal of continuity checks for offset geometries
7######################################################
8
9smallview
10
11set ver_info_1 "\n\n*********** Dump of cc *************\nTrimmed curve\nParameters : 2 5\nBasis curve :\nOffsetCurveOffset : 10\nDirection : 0, 0, 1 \nBasis curve :\nTrimmed curve\nParameters : 1 6\nBasis curve :\nCircle"
12set ver_info_2 "\n\n*********** Dump of oc *************\nOffsetCurveOffset : 20\nDirection : 0, 0, 1 \nBasis curve :\nTrimmed curve\nParameters : 2 5\nBasis curve :\nCircle"
13
14point pp 0 0 1
15circle cc 20 40 30 20
16trim cc cc 1 6
17offsetcurve oc cc 10 pp
18trim cc oc 2 5
19set bug_info_1 [dump cc]
20offsetcurve oc cc 10 pp
21set bug_info_2 [dump oc]
22
23if {[string first $ver_info_1 $bug_info_1] == -1} {
24  puts "ERROR: OCC25124 is reproduced (dump of cc)."
25}
26if {[string first $ver_info_2 $bug_info_2] == -1} {
27  puts "ERROR: OCC25124 is reproduced (dump of oc)."
28}
29
30donly oc cc
31fit
32
33checkview -screenshot -2d -path ${imagedir}/${test_image}.png
34