809eca9d |
1 | puts "================" |
2 | puts "OCC22428" |
3 | puts "================" |
4 | puts "" |
5 | ########################################################################################## |
6 | # The shape is valid on Linux but non-valid on Windows. Appendix for SALOME PARTITION_S2 |
7 | ########################################################################################## |
8 | |
9 | set BugNumber OCC22428 |
10 | |
11 | restore [locate_data_file bug22428_f1.brep] result |
12 | set info [ checkshape result ] |
13 | set word1 [string compare [lindex ${info} end] "valid"] |
14 | set word2 [string compare [lindex ${info} end-1] "be"] |
15 | set word3 [string compare [lindex ${info} end-2] "to"] |
16 | set word4 [string compare [lindex ${info} end-3] "seems"] |
17 | set word5 [string compare [lindex ${info} end-4] "shape"] |
18 | set word6 [string compare [lindex ${info} end-5] "This"] |
19 | |
20 | # Resume |
21 | puts "" |
22 | if { ${word1} == 0 && ${word2} == 0 && ${word3} == 0 && ${word4} == 0 && ${word5} == 0 && ${word6} == 0} { |
23 | puts "OK ${BugNumber}" |
24 | } else { |
25 | puts "Faulty ${BugNumber}" |
26 | } |
27 | |
28 | set square 7837.39 |
29 | set 3dviewer 0 |
30 | |