1 puts "TODO OCC641 ALL: An exception was caught"
2 puts "TODO OCC641 ALL: \\*\\* Exception \\*\\*.*"
3 puts "TODO OCC641 ALL: Error : result shape is displayed wrongly"
5 puts "================"
8 puts "================"
10 #################################################
11 ## Exception during attemption to display shape ==>SAM1559 (#2901)
12 #################################################
14 restore [locate_data_file OCC641.brep] a
22 if [catch {tmirror result 0 0 0 0 1 0 } res] {
23 puts "Error : function tmirror works wrongly"
25 if [catch { vdisplay result } res] {
26 puts "Error : result shape is displayed wrongly"