Adding of testing cases from subgroups 937 940 and 941 of CHL group
[occt.git] / tests / bugs / modalg_2 / bug453_2
CommitLineData
a87752f3 1
2puts "========"
3puts "OCC453"
4puts "(case 2)"
5puts "========"
6puts ""
7
8dchrono h2 reset
9dchrono h2 start
10
11set make_print_out 0
12
13dset SCALE 1000.
14dset SCALE1 5
15tolblend 0.01 1e-04 1e-05 1e-03
16
17restore [locate_data_file shading_137.brep] s
18tscale s 0 0 0 SCALE1
19explode s E
20
21 blend result s 4.5*SCALE1 s_2 4.5*SCALE1 s_1 4.5*SCALE1 s_6 4.5*SCALE1 s_8 4.5*SCALE1 s_10 4.5*SCALE1 s_14 4.5*SCALE1 s_4 4.5*SCALE1 s_5 4.5*SCALE1 s_16 4.5*SCALE1 s_11 4.5*SCALE1 s_19 4.5*SCALE1 s_13
22 explode result So
23 tcopy result_1 result
24
25dchrono h2 stop
26set q2 [ dchrono h2 show ]
27regexp {CPU user time: ([-0-9.+eE]+) seconds} $q2 full z2
28puts "$z2"
29if { $z2 > 110 } {
30 puts "Elapsed time is more then 110 seconds - Faulty"
31} else {
32 puts "Elapsed time is less then 110 seconds - OK"
33}
34
35set square 3.65777e+06
36set 2dviewer 1