5ad539d2 |
1 | puts "============" |
2 | puts "CR6987" |
3 | puts "============" |
4 | puts "" |
5 | ####################################################################### |
6 | # Impossible to change edge line type in 3D View |
7 | ####################################################################### |
8 | |
9 | pload VISUALIZATION |
10 | |
11 | set anImage1 $imagedir/${casename}_1.png |
12 | set anImage2 $imagedir/${casename}_2.png |
13 | set anImage3 $imagedir/${casename}_3.png |
14 | |
15 | vinit |
16 | box b 1 1 1 |
17 | vdisplay b |
18 | vfit |
19 | vsetdispmode b 1 |
20 | vsetedgetype b -type DASH -color 10 255 10 |
21 | vdump $anImage1 |
22 | |
23 | vsetinteriorstyle b EMPTY |
24 | vdump $anImage2 |
25 | |
26 | vsetinteriorstyle b SOLID |
27 | vunsetedgetype b |
28 | vdump $anImage3 |
29 | |
30 | |