Commit | Line | Data |
---|---|---|
72ae9895 RL |
1 | puts "================" |
2 | puts "OCC23597" | |
3 | puts "================" | |
4 | puts "" | |
5 | ####################################################################### | |
6 | # Failed to export ellipse into STEP with units other than mm | |
7 | ####################################################################### | |
8 | ||
9 | set filedir ${imagedir} | |
10 | ||
11 | set TheFileName bug23597_f-ellipse | |
12 | if { [file exists ${filedir}/${TheFileName}.stp] } { | |
13 | puts "Error : There is old ${filedir}/${TheFileName}.stp file" | |
14 | } | |
15 | ||
16 | xnorm STEP | |
17 | restore [locate_data_file ${TheFileName}.brep] f | |
18 | param write.step.unit FT | |
19 | newmodel | |
20 | stepwrite a f ${filedir}/${TheFileName}.stp | |
21 | ||
22 | if { ![file exists ${filedir}/${TheFileName}.stp] } { | |
23 | puts "Error : There is not ${filedir}/${TheFileName}.stp file" | |
24 | } | |
25 | ||
26 | catch {exec chmod 777 ${filedir}/${TheFileName}.stp } | |
27 | ||
28 | file delete ${filedir}/${TheFileName}.stp |