340054e1 |
1 | puts "TODO OCC27623 ALL: ERROR: OCC27623 is reproduced." |
2 | |
3 | puts "========" |
4 | puts "OCC27623" |
5 | puts "========" |
6 | puts "" |
7 | ##################################################################### |
8 | # Cannot find intersection line between two trimmed planar surfaces |
9 | ##################################################################### |
10 | |
11 | plane s1 0 0 0 0 0 1 1 0 0 |
12 | trim s1 s1 -10 10 -10 10 |
13 | plane s2 0 0 10 1 0 0 0 0 1 |
14 | trim s2 s2 -10+1.0e-5 10 -10+1.0e-5 10 |
15 | |
16 | intersect ii s1 s2 4.0e-4 |
17 | |
18 | set bug_info [string trim [whatis ii]] |
19 | if {[string length $bug_info] == 7} { |
20 | puts "ERROR: OCC27623 is reproduced. Intersection of trimmed planar surface has not been detected." |
21 | } |