1 puts "TODO OCC25925 ALL: ERROR. offsetperform operation not done."
2 puts "TODO OCC25925 ALL: Faulty OCC5805 : offsetshape is wrong"
3 puts "TODO OCC25925 ALL: Faulty OCC5805 : tolmax is wrong"
4 puts "TODO OCC25925 ALL: Tcl Exception: can't read"
5 puts "TODO OCC25925 ALL: TEST INCOMPLETE"
11 ######################################################
12 # BRepOffsetAPI_MakeThickSolid behaves unstably and produces very different results.
13 ######################################################
17 restore [locate_data_file OCC5805.brep] a
20 set che_a [checkshape a]
23 if { [regexp {Faulty} $che_a] } {
24 puts "Faulty ${BugNumber} : checkshape is wrong for a"
29 offsetparameter 1e-7 c a
32 if { [catch { offsetperform result } catch_result] } {
33 puts "Faulty ${BugNumber} : offsetshape is wrong"
36 if { [catch { set tolmaxres [tolmax result] } catch_result] } {
37 puts "Faulty ${BugNumber} : tolmax is wrong"
39 regexp {max tol = ([-0-9.+eE]+)} $tolmaxres full maxtolerance
40 if { [catch { expr $maxtolerance } catch_result] } {
41 puts "Faulty ${BugNumber} : maxtolerance is wrong (1)."
43 if { $maxtolerance > 1. } {
44 puts "Faulty ${BugNumber} : maxtolerance is wrong (2)."
56 set nb_compound_good 0