File: begin

package info (click to toggle)
opencascade 7.8.1%2Bdfsg1-3
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 293,924 kB
  • sloc: cpp: 1,249,635; tcl: 15,974; cs: 5,173; java: 1,554; sh: 1,354; ansic: 821; xml: 737; makefile: 26; javascript: 22
file content (21 lines) | stat: -rw-r--r-- 341 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 

# assembly of 2 boxes
box b1 1 1 1
box b2 2 2 2
btranslate b1 b1 2 2 2
btranslate b2 b2 -3 -3 -3
compound b1 b2 c

# new document
NewDocument D

# populate D
XAddShape D c

# box extries
set box_1 "0:1:1:2"
set box_2 "0:1:1:3"

# add int attribute to box_1
set guid "27927843-72A0-41ef-901D-621FAB01C27A"
SetInteger D ${box_1} 1965 ${guid}