puts "OCC21450"
puts "============"
puts ""
-#vexport
-#vexport full_file_path {PS | EPS | TEX | PDF | SVG | PGF } : exports the view to a vector file of a given format
-#Testing export to TEX format
vfont add [locate_data_file DejaVuSans.ttf] SansFont
set aFile $imagedir/${test_image}.tex
+vcaps -ffp 1
vexport ${aFile} TEX
if { [file exists ${aFile}] } {