tower.tens
Go to the documentation of this file.
1 
2 [CONSTANTS]
3 
4  % Length of vertical cables
5  lc_v:= 0.25
6 
7  % radius of cables
8  rc := 0.002
9 
10  % length of vertical spring
11  lp := lc_v
12 
13  % radius of spring
14  rp := 0.004
15 
16  % Length of horizontal cables
17  lc_h1:=0.35
18  lc_h2:=0.15
19  lc_h3:=0.2
20 
21  % Length for diagonal cables
22  lc_d1:=sqrt(lc_h1^2+lc_v^2)
23  lc_d2:=sqrt(lc_h3^2+lc_v^2)
24 
25  % Length of struts
26  ls:=sqrt((lc_h1+lc_h2)^2+lc_v^2)
27 
28  % radius of struts
29  rs := 0.005
30 
31  % Force for struts
32  c_s1:=-0.263906648013670
33  c_s2:=-0.130555546803407
34 
35  % Tension for cables
36  t_v :=0.059636425436121
37  t_d1:=0.100451443365802
38  t_d2:=0.151142726546752
39  t_h1:=0.154304580171290
40  t_h2:=0.352817712865899
41  t_h3:=0.022354318249200
42 
43  k_v :=2
44  k_p :=0.397576169574137
45  k_d1:=1
46  k_d2:=5
47  k_h1:=5
48  k_h2:=10
49  k_h3:=1
50 
51  % Rest length for the cables
52  r_v :=lc_v-t_v/k_v
53  r_p := 0.1
54  r_d1:=lc_d1-t_d1/k_d1
55  r_d2:=lc_d2-t_d2/k_d2
56  r_h1:=lc_h1-t_h1/k_h1
57  r_h2:=lc_h2-t_h2/k_h2
58  r_h3:=lc_h3-t_h3/k_h3
59 
60  safety := 4
61 
62 [PLANAR STRUCTURE]
63 
64  strut s1 : n1 n4
65  length ls
66  force [safety*c_s1,0]
67  radius rs
68 
69  strut s2 : n2 n3
70  length ls
71  force [safety*c_s1,0]
72  radius rs
73 
74  strut s3 : n5 n8
75  length ls
76  force [safety*c_s2,0]
77  radius rs
78 
79  strut s4 : n6 n7
80  length ls
81  force [safety*c_s2,0]
82  radius rs
83 
84  strut s5 : n9 n12
85  length ls
86  force [safety*c_s1,0]
87  radius rs
88 
89  strut s6 : n10 n11
90  length ls
91  force [safety*c_s1,0]
92  radius rs
93 
94 
95  cable c1 : n1 n2
96  length [0,safety*lc_v]
97  stiffness k_v
98  rest [0,safety*r_v]
99  radius rc
100  hidden
101 
102  spring c2: n11 n12
103  length [0,safety*lp]
104  stiffness k_p
105  rest r_p
106  radius rp
107  loops 20
108 
109  cable c3 : n1 n6
110  length [0,safety*lc_d1]
111  stiffness k_d1
112  rest [0,safety*r_d1]
113  radius rc
114 
115  cable c4 : n2 n5
116  length [0,safety*lc_d1]
117  stiffness k_d1
118  rest [0,safety*r_d1]
119  radius rc
120 
121  cable c5 : n7 n12
122  length [0,safety*lc_d1]
123  stiffness k_d1
124  rest [0,safety*r_d1]
125  radius rc
126 
127  cable c6 : n8 n11
128  length [0,safety*lc_d1]
129  stiffness k_d1
130  rest [0,safety*r_d1]
131  radius rc
132 
133  cable c7 : n3 n10
134  length [0,safety*lc_d2]
135  stiffness k_d2
136  rest [0,safety*r_d2]
137  radius rc
138 
139  cable c8 : n4 n9
140  length [0,safety*lc_d2]
141  stiffness k_d2
142  rest [0,safety*r_d2]
143  radius rc
144 
145  cable c9 : n1 n5
146  length [0,safety*lc_h1]
147  stiffness k_h1
148  rest [0,safety*r_h1]
149  radius rc
150 
151  cable c10: n2 n6
152  length [0,safety*lc_h1]
153  stiffness k_h1
154  rest [0,safety*r_h1]
155  radius rc
156 
157  cable c11: n5 n3
158  length [0,safety*lc_h2]
159  stiffness k_h2
160  rest [0,safety*r_h2]
161  radius rc
162 
163  cable c12: n6 n4
164  length [0,safety*lc_h2]
165  stiffness k_h2
166  rest [0,safety*r_h2]
167  radius rc
168 
169  cable c13: n3 n9
170  length [0,safety*lc_h3]
171  stiffness k_h3
172  rest [0,safety*r_h3]
173  radius rc
174 
175  cable c14: n4 n10
176  length [0,safety*lc_h3]
177  stiffness k_h3
178  rest [0,safety*r_h3]
179  radius rc
180 
181  cable c15: n9 n7
182  length [0,safety*lc_h2]
183  stiffness k_h2
184  rest [0,safety*r_h2]
185  radius rc
186 
187  cable c16: n10 n8
188  length [0,safety*lc_h2]
189  stiffness k_h2
190  rest [0,safety*r_h2]
191  radius rc
192 
193  cable c17: n7 n11
194  length [0,safety*lc_h1]
195  stiffness k_h1
196  rest [0,safety*r_h1]
197  radius rc
198 
199  cable c18: n8 n12
200  length [0,safety*lc_h1]
201  stiffness k_h1
202  rest [0,safety*r_h1]
203  radius rc
204 
205 
206 [FIXED POINTS]
207 
208  n2(x)=0
209  n2(y)=lc_v
210 
211 [OBSTACLES]
212  plane : box (-0.025,-0.5,-0.5)+(0.025,1,1) green
213  redbox: box (1.05,0,-0.05)+(0.25,0.2,0.1) red
214 
215 [COLLISIONS]
216  check: redbox
217 
287