Restoring test cases removed by last commit.
[occt.git] / tests / bugs / moddata / bug712_2
1 pload QAcommands
2
3 puts "========"
4 puts "OCC712"
5 puts "========"
6 puts ""
7 ############################################################
8 ## Exeption is raised in DRAW during building draft with help command "depouille"
9 ## on face in the attached shape.
10 ## The source code of application is also attached and should be checked.
11 ############################################################
12
13 set draftAngle 15
14 set slabThick 30
15
16 if [catch {OCC712 ${draftAngle} ${slabThick} } catch_result] {
17     puts "Faulty OCC712"
18 } else {
19     puts "OCC712 OK"
20 }
21
22 set 2dviewer 0