Restoring test cases removed by last commit.
[occt.git] / tests / bugs / moddata / bug592
CommitLineData
f1aa2b62 1puts "TODO OCC12345 ALL: Faulty OCC592 : Checkshape BRepCheck_Analyzer does not detect faulty shape"
2
3puts "========================"
4puts " OCC592 "
5puts "========================"
6puts ""
7###################################
8##BRepCheck_Analyzer does not detect faulty shape
9#####################################
10
11restore [locate_data_file OCC592.brep] ff114
12
13explode ff114 e
14mkcurve cc ff114_8
15cvalue cc 0.95 x y z
16vertex vv x y z
17mksurface gs ff114
18mkface ff gs
19donl ff114 vv
20trim trcc cc
21set aa [distmini dd vv ff]
22
23puts "******* Result *******"
24regexp {([-0-9.+eE]+)$} [dump dd_val] full dis1
25puts "distance between the point on curve and the surface is $dis1"
26
27set tolerance [maxtolerance ff114_8]
28regexp { +Edge +: +Min +[-0-9.+eE]+ +Max +([-0-9.+eE]+)} $tolerance full MaxEdgeTolerance
29puts "the tolerance of the edge is $MaxEdgeTolerance"
30puts "the tolerance is less than distance between point and surface"
31puts "BUT"
32
33decho off
34set che [checkshape ff114]
35decho on
36
37if { [regexp {Faulty} $che] != 1 } {
38 puts "Faulty OCC592 : Checkshape BRepCheck_Analyzer does not detect faulty shape"
39} else {
40 puts "OCC592 OK: Checkshape (BRepCheck_Analyzer) detects bad shape"
41}
42
43set 2dviewer 0