3bea4c16 |
1 | puts "TODO OCC11111 ALL: Faulty OCC22080 : The face f contains degenerated edge that is far-fetched one" |
2 | |
3 | puts "============" |
4 | puts "OCC22080" |
5 | puts "============" |
6 | puts "" |
7 | ####################################################################### |
8 | # Checkshape command does not return faulty shapes for the face. CAS63-sp10-*. Appendix to SALOME bug IPAL22072 |
9 | ####################################################################### |
10 | |
11 | set BugNumber OCC22080 |
12 | |
13 | puts "Load shape ..." |
14 | restore [locate_data_file bug22080_fx.brep] result |
15 | |
16 | decho off |
17 | set che [checkshape result] |
18 | decho on |
19 | |
20 | if {[regexp {Faulty} $che]} { |
21 | puts "OK ${BugNumber} : The face f contains degenerated edge that is far-fetched one" |
22 | } else { |
23 | puts "Faulty ${BugNumber} : The face f contains degenerated edge that is far-fetched one" |
24 | } |
25 | |
26 | set 2dviewer 0 |