9026dea8 |
1 | puts "TODO OCC28402 ALL: Error: calculation of properties of complex compounds is slow" |
2 | |
3 | puts "========" |
4 | puts "OCC28402" |
5 | puts "========" |
6 | puts "" |
7 | #################################################################### |
8 | # Modeling - calculation of properties of complex compounds is slow |
9 | #################################################################### |
10 | |
11 | restore [locate_data_file bug28402_hugeassembly.brep] a |
12 | |
13 | # just show that shape contains just one solid (box) |
14 | nbshapes a |
15 | |
16 | # now calculate properties |
17 | chrono s restart |
18 | vprops a |
19 | chrono s stop counter "CPU vprops compounds" |
20 | |
21 | # now calculate properties simple box |
22 | box b 100 100 100 |
23 | chrono s_box restart |
24 | vprops b |
25 | chrono s_box stop counter "CPU vprops box" |
26 | |
27 | regexp {Elapsed time: +([-0-9.+eE]+) Hours +([-0-9.+eE]+) Minutes +([-0-9.+eE]+) Seconds} [dchrono s show] full a_Hours a_Minutes a_Seconds |
28 | regexp {Elapsed time: +([-0-9.+eE]+) Hours +([-0-9.+eE]+) Minutes +([-0-9.+eE]+) Seconds} [dchrono s_box show] full b_Hours b_Minutes b_Seconds |
29 | |
30 | set a_Time [expr ${a_Hours}*60.*60. + ${a_Minutes}*60. + ${a_Seconds} ] |
31 | set b_Time [expr ${b_Hours}*60.*60. + ${b_Minutes}*60. + ${b_Seconds} ] |
32 | |
33 | if { [expr ${a_Time} / ${b_Time}] > 100. } { |
34 | puts "Error: calculation of properties of complex compounds is slow" |
35 | } |