3cdfdc9a |
1 | puts "TODO ?OCC11111 ALL: Faulty : Export to pdf file was done but size of file is incorrect" |
a8676008 |
2 | |
3 | puts "============" |
4 | puts "OCC21091" |
5 | puts "OCC21450" |
6 | puts "============" |
7 | puts "" |
8 | #vinit |
9 | #vexport |
10 | #vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format |
11 | # |
12 | |
13 | pload XSDRAW |
14 | vinit |
15 | set only_screen 1 |
16 | |
17 | meshfromstl m [locate_data_file shape.stl] |
18 | |
19 | meshdispmode m 34 |
20 | |
21 | set aFile $imagedir/${test_image}.pdf |
22 | |
23 | vexport ${aFile} PDF |
24 | |
25 | if { [file exists ${aFile}] } { |
26 | puts "Export to pdf file was done" |
27 | set filesize [file size ${aFile}] |
28 | if { $filesize != 154489 } { |
29 | puts "Faulty : Export to pdf file was done but size of file is incorrect" |
30 | } |
31 | } else { |
32 | puts "Faulty : Export to pdf file was not done" |
33 | } |
34 | |
35 | |