712879c8 |
1 | puts "========" |
2 | puts "0027383: Modeling - improve handling of regularity on edges" |
3 | puts "========" |
4 | puts "" |
5 | ################################################################# |
6 | # Check regularity setting on edges between patches of B-Spline surface obtained by conversion of cylinder |
7 | ################################################################# |
8 | |
9 | pload MODELING |
10 | pcylinder p 2 10 |
11 | explode p f |
12 | nurbsconvert q p_1 |
13 | DT_ClosedSplit r q |
14 | encoderegularity r |
15 | |
16 | explode r F |
17 | explode r_1 E |
18 | if { ! [regexp "G2" [getedgeregularity r_1_2 r_1 r_2]] } { |
19 | puts "Error: Invalid regularity of the edge, expected G2" |
20 | } |
21 | if { ! [regexp "G2" [getedgeregularity r_1_4 r_1 r_2]] } { |
22 | puts "Error: Invalid regularity of the edge, expected G2" |
23 | } |
24 | |
25 | # make image in HLR mode as illustration |
26 | pload VISUALIZATION |
27 | vdisplay r |
28 | vfit |
29 | vhlr on |
30 | vdump ${imagedir}/${test_image}.png |