File: concentric

package info (click to toggle)
opencascade 7.3.0%2Bdfsg1-5
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 278,376 kB
  • sloc: cpp: 1,136,010; ansic: 81,569; tcl: 14,864; cs: 5,173; java: 1,522; xml: 468; sh: 375; perl: 37; makefile: 25
file content (21 lines) | stat: -rw-r--r-- 435 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
puts "===================================================================="
puts "OCC28162: Draw Harness - eliminate usage of deprecated Local Context"
puts "Select two circled edges"
puts "===================================================================="

vclear
vinit

pcylinder c 15 30
vdisplay c
vfit

vselmode c 2 1
vselect 205 174

set shift 1
vselect 205 377 $shift

vrelation r -concentric

vdump $imagedir/${casename}.png