5ad8c033 |
1 | puts "============" |
2 | puts "CR25300" |
3 | puts "============" |
4 | puts "" |
5 | |
6 | ########################################################################################## |
7 | puts "Visualization - Build wireframe representation consistent with the shape's triangulation" |
8 | # |
9 | # Case 1: Test isolines on conic shape where usual algorithm builds isos beyond the |
10 | # shape's boundaries |
11 | ########################################################################################## |
12 | |
13 | pload VISUALIZATION |
14 | |
15 | restore [locate_data_file bug25300_pencil.brep] aPencil |
16 | |
17 | set aSimpleIsoImg $imagedir/${casename}_iso.png |
18 | set aIsoOnTrgImg $imagedir/${casename}_iso_on_triang.png |
19 | |
20 | vinit View1 |
21 | vclear |
22 | vaxo |
23 | vdisplay aPencil |
24 | vviewparams -scale 9787.997 -proj -0.0115 -0.9998 0.0145 |
25 | vviewparams -up -0.0155 0.0147 0.9998 -at 0.0503 0 0 |
26 | vsetdispmode 1 |
27 | |
28 | # shows that default isoline builder has problemas with proper |
29 | # construction of isolines on top of the pencil |
30 | vmoveto 200 200 |
31 | vdump $aSimpleIsoImg |
32 | checkcolor 337 162 0 1 1 |
33 | |
34 | vmoveto 0 0 |
35 | |
36 | # enable isoline-on-triangulation builder |
37 | vaspects aPencil -isoontriang on |
38 | |
39 | # shows that isoline-on-triangulation builder constructs isos that |
40 | # do not extend beyond the boundaries of shape's triangulation |
41 | vmoveto 200 200 |
42 | vdump $aIsoOnTrgImg |
43 | checkcolor 337 162 0 0 0 |