Adding of testing cases from subgroups 937 940 and 941 of CHL group
[occt.git] / tests / bugs / modalg_2 / bug420
CommitLineData
f1aa2b62 1puts "TODO OCC12345 ALL: Error : The square of result shape is"
2puts "TODO OCC12345 ALL: Faulty shapes in variables faulty_1 to faulty_"
3
4puts "========================"
5puts " OCC420 "
6puts "PRO12473"
7puts "========================"
8puts ""
9
10restore [locate_data_file CTO909_objects.brep] a
352ffd73 11checkshape a
f1aa2b62 12
13restore [locate_data_file CTO909_tool_4.brep] b
352ffd73 14checkshape b
f1aa2b62 15
16bsection sec a b
17puts [checksection sec]
352ffd73 18checkshape sec
f1aa2b62 19explode a so
20renamevar a_1 a
21
22bcut result a b
23
24set square 0
25set 2dviewer 0