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