|
39 | 39 | <procs> |
40 | 40 | <proc n='UpdateParts' args='args'> |
41 | 41 | <![CDATA[ |
42 | | - return [spdAux::ProcUpdateParts $domNode $args] |
43 | | - ]]> |
| 42 | + return [spdAux::ProcUpdateParts $domNode $args] |
| 43 | + ]]> |
44 | 44 | </proc> |
45 | 45 | <proc n='OkNewCondition' args='args'> |
46 | 46 | <![CDATA[ |
47 | | - return [spdAux::ProcOkNewCondition $domNode $args] |
48 | | - ]]> |
| 47 | + return [spdAux::ProcOkNewCondition $domNode $args] |
| 48 | + ]]> |
49 | 49 | </proc> |
50 | 50 | <proc n='GetElements' args='args'> |
51 | 51 | <![CDATA[ |
52 | | - return [spdAux::ProcGetElements $domNode $args] |
53 | | - ]]> |
| 52 | + return [spdAux::ProcGetElements $domNode $args] |
| 53 | + ]]> |
54 | 54 | </proc> |
55 | 55 | <proc n='GetElementsDict' args='args'> |
56 | 56 | <![CDATA[ |
57 | | - return [spdAux::ProcGetElementsDict $domNode $args] |
58 | | - ]]> |
| 57 | + return [spdAux::ProcGetElementsDict $domNode $args] |
| 58 | + ]]> |
59 | 59 | </proc> |
60 | 60 | <proc n='GetElementsValues' args='args'> |
61 | 61 | <![CDATA[ |
62 | | - return [spdAux::ProcGetElementsValues $domNode $args] |
63 | | - ]]> |
| 62 | + return [spdAux::ProcGetElementsValues $domNode $args] |
| 63 | + ]]> |
64 | 64 | </proc> |
65 | 65 | <proc n='GetSolutionStrategies' args='args'> |
66 | 66 | <![CDATA[ |
67 | | - return [spdAux::ProcGetSolutionStrategies $domNode $args] |
68 | | - ]]> |
| 67 | + return [spdAux::ProcGetSolutionStrategies $domNode $args] |
| 68 | + ]]> |
69 | 69 | </proc> |
70 | 70 | <proc n='GetSchemes' args='args'> |
71 | 71 | <![CDATA[ |
72 | | - return [spdAux::ProcGetSchemes $domNode $args] |
73 | | - ]]> |
| 72 | + return [spdAux::ProcGetSchemes $domNode $args] |
| 73 | + ]]> |
74 | 74 | </proc> |
75 | 75 | <proc n='GetConstitutiveLaws' args='args'> |
76 | 76 | <![CDATA[ |
77 | | - return [spdAux::ProcGetConstitutiveLaws $domNode $args] |
78 | | - ]]> |
| 77 | + return [spdAux::ProcGetConstitutiveLaws $domNode $args] |
| 78 | + ]]> |
79 | 79 | </proc> |
80 | 80 | <proc n='GetAllConstitutiveLaws' args='args'> |
81 | 81 | <![CDATA[ |
82 | | - return [spdAux::ProcGetAllConstitutiveLaws $domNode $args] |
83 | | - ]]> |
| 82 | + return [spdAux::ProcGetAllConstitutiveLaws $domNode $args] |
| 83 | + ]]> |
84 | 84 | </proc> |
85 | 85 | <proc n='GetSolvers' args='args'> |
86 | 86 | <![CDATA[ |
87 | | - return [spdAux::ProcGetSolvers $domNode $args] |
88 | | - ]]> |
| 87 | + return [spdAux::ProcGetSolvers $domNode $args] |
| 88 | + ]]> |
89 | 89 | </proc> |
90 | 90 | <proc n='GetSolversValues' args='args'> |
91 | 91 | <![CDATA[ |
92 | | - return [spdAux::ProcGetSolversValues $domNode $args] |
93 | | - ]]> |
| 92 | + return [spdAux::ProcGetSolversValues $domNode $args] |
| 93 | + ]]> |
94 | 94 | </proc> |
95 | 95 | <proc n='GetSolverParameterValues' args='args'> |
96 | 96 | <![CDATA[ |
97 | | - return [spdAux::ProcGetSolverParameterValues $domNode $args] |
98 | | - ]]> |
| 97 | + return [spdAux::ProcGetSolverParameterValues $domNode $args] |
| 98 | + ]]> |
99 | 99 | </proc> |
100 | 100 | <proc n='GetSolverParameterDict' args='args'> |
101 | 101 | <![CDATA[ |
102 | | - return [spdAux::ProcGetSolverParameterDict $domNode $args] |
103 | | - ]]> |
| 102 | + return [spdAux::ProcGetSolverParameterDict $domNode $args] |
| 103 | + ]]> |
104 | 104 | </proc> |
105 | 105 | <proc n='CheckNodalConditionState' args='args'> |
106 | 106 | <![CDATA[ |
107 | | - return [spdAux::ProcCheckNodalConditionState $domNode $args] |
108 | | - ]]> |
| 107 | + return [spdAux::ProcCheckNodalConditionState $domNode $args] |
| 108 | + ]]> |
109 | 109 | </proc> |
110 | 110 | <proc n='CheckNodalConditionOutputState' args='args'> |
111 | 111 | <![CDATA[ |
112 | | - return [spdAux::ProcCheckNodalConditionOutputState $domNode $args] |
113 | | - ]]> |
| 112 | + return [spdAux::ProcCheckNodalConditionOutputState $domNode $args] |
| 113 | + ]]> |
114 | 114 | </proc> |
115 | 115 | <proc n='RefreshTree' args='args'> |
116 | 116 | <![CDATA[ |
117 | | - spdAux::RequestRefresh |
118 | | - ]]> |
| 117 | + spdAux::RequestRefresh |
| 118 | + ]]> |
119 | 119 | </proc> |
120 | 120 | <proc n='checkStateByUniqueName' args='args'> |
121 | 121 | <![CDATA[ |
122 | | - return [spdAux::ProccheckStateByUniqueName $domNode $args] |
123 | | - ]]> |
| 122 | + return [spdAux::ProccheckStateByUniqueName $domNode $args] |
| 123 | + ]]> |
124 | 124 | </proc> |
125 | 125 | <proc n='SolverParamState' args='args'> |
126 | 126 | <![CDATA[ |
127 | | - return [spdAux::ProcSolverParamState $domNode $args] |
128 | | - ]]> |
| 127 | + return [spdAux::ProcSolverParamState $domNode $args] |
| 128 | + ]]> |
129 | 129 | </proc> |
130 | 130 | <proc n='PartParamValue' args='args'> |
131 | 131 | <![CDATA[ |
132 | | - return [spdAux::ProcPartParamValue $domNode $args] |
133 | | - ]]> |
| 132 | + return [spdAux::ProcPartParamValue $domNode $args] |
| 133 | + ]]> |
134 | 134 | </proc> |
135 | 135 | <proc n='GetParts' args='args'> |
136 | 136 | <![CDATA[ |
137 | | - return [spdAux::ProcGetParts $domNode $args] |
138 | | - ]]> |
| 137 | + return [spdAux::ProcGetParts $domNode $args] |
| 138 | + ]]> |
139 | 139 | </proc> |
140 | 140 | <proc n='PartParamState' args='args'> |
141 | 141 | <![CDATA[ |
142 | | - return [spdAux::ProcPartParamState $domNode $args] |
143 | | - ]]> |
| 142 | + return [spdAux::ProcPartParamState $domNode $args] |
| 143 | + ]]> |
144 | 144 | </proc> |
145 | 145 | <proc n='SolverEntryState' args='args'> |
146 | 146 | <![CDATA[ |
147 | | - return [spdAux::ProcSolverEntryState $domNode $args] |
148 | | - ]]> |
| 147 | + return [spdAux::ProcSolverEntryState $domNode $args] |
| 148 | + ]]> |
149 | 149 | </proc> |
150 | 150 | <proc n='CheckDimension' args='args'> |
151 | 151 | <![CDATA[ |
152 | | - return [spdAux::ProcCheckDimension $domNode $args] |
153 | | - ]]> |
| 152 | + return [spdAux::ProcCheckDimension $domNode $args] |
| 153 | + ]]> |
154 | 154 | </proc> |
155 | 155 | <proc n='getStateFromXPathValue' args='args'> |
156 | 156 | <![CDATA[ |
157 | | - return [spdAux::ProcgetStateFromXPathValue $domNode $args] |
158 | | - ]]> |
| 157 | + return [spdAux::ProcgetStateFromXPathValue $domNode $args] |
| 158 | + ]]> |
159 | 159 | </proc> |
160 | 160 | <proc n='getStateFromXPathValueDisabled' args='args'> |
161 | 161 | <![CDATA[ |
162 | | - return [spdAux::ProcgetStateFromXPathValueDisabled $domNode $args] |
163 | | - ]]> |
| 162 | + return [spdAux::ProcgetStateFromXPathValueDisabled $domNode $args] |
| 163 | + ]]> |
164 | 164 | </proc> |
165 | 165 | <proc n='get_materials_list_simple' args='args'> |
166 | 166 | <![CDATA[ |
167 | | - return [spdAux::ProcGet_materials_list_simple $domNode {*}$args] |
168 | | - ]]> |
| 167 | + return [spdAux::ProcGet_materials_list_simple $domNode {*}$args] |
| 168 | + ]]> |
169 | 169 | </proc> |
170 | 170 | <proc n='give_materials_list' args='args'> |
171 | 171 | <![CDATA[ |
172 | | - return [spdAux::ProcGive_materials_list $domNode {*}$args] |
173 | | - ]]> |
| 172 | + return [spdAux::ProcGive_materials_list $domNode {*}$args] |
| 173 | + ]]> |
174 | 174 | </proc> |
175 | 175 | <proc n='edit_database_list' args='args'> |
176 | 176 | <![CDATA[ |
177 | | - return [spdAux::ProcEdit_database_list $domNode {*}$args] |
178 | | - ]]> |
| 177 | + return [spdAux::ProcEdit_database_list $domNode {*}$args] |
| 178 | + ]]> |
179 | 179 | </proc> |
180 | 180 | <proc n='CambioMat' args='args'> |
181 | 181 | <![CDATA[ |
182 | | - return [spdAux::ProcCambioMat $domNode $args] |
183 | | - ]]> |
| 182 | + return [spdAux::ProcCambioMat $domNode $args] |
| 183 | + ]]> |
184 | 184 | </proc> |
185 | 185 | <proc n='ConditionState' args='args'> |
186 | 186 | <![CDATA[ |
187 | | - return [spdAux::ProcConditionState $domNode $args] |
188 | | - ]]> |
| 187 | + return [spdAux::ProcConditionState $domNode $args] |
| 188 | + ]]> |
189 | 189 | </proc> |
190 | 190 | <proc n='ConditionParameterState' args='args'> |
191 | 191 | <![CDATA[ |
192 | | - return [spdAux::ProcConditionParameterState $domNode $args] |
193 | | - ]]> |
| 192 | + return [spdAux::ProcConditionParameterState $domNode $args] |
| 193 | + ]]> |
194 | 194 | </proc> |
195 | 195 | <proc n='SolStratParamState' args='args'> |
196 | 196 | <![CDATA[ |
197 | | - return [spdAux::ProcSolStratParamState $domNode $args] |
198 | | - ]]> |
| 197 | + return [spdAux::ProcSolStratParamState $domNode $args] |
| 198 | + ]]> |
199 | 199 | </proc> |
200 | 200 | <proc n='SchemeParamState' args='args'> |
201 | 201 | <![CDATA[ |
202 | | - return [spdAux::ProcSchemeParamState $domNode $args] |
203 | | - ]]> |
| 202 | + return [spdAux::ProcSchemeParamState $domNode $args] |
| 203 | + ]]> |
204 | 204 | </proc> |
205 | 205 | <proc n='ConstLawOutputState' args='args'> |
206 | 206 | <![CDATA[ |
207 | | - return [spdAux::ProcConstLawOutputState $domNode $args] |
208 | | - ]]> |
| 207 | + return [spdAux::ProcConstLawOutputState $domNode $args] |
| 208 | + ]]> |
209 | 209 | </proc> |
210 | 210 | <proc n='ElementOutputState' args='args'> |
211 | 211 | <![CDATA[ |
212 | | - return [spdAux::ProcElementOutputState $domNode $args] |
213 | | - ]]> |
| 212 | + return [spdAux::ProcElementOutputState $domNode $args] |
| 213 | + ]]> |
214 | 214 | </proc> |
215 | 215 | <proc n='ActiveIfAnyPartState' args='args'> |
216 | 216 | <![CDATA[ |
217 | | - return [spdAux::ProcActiveIfAnyPartState $domNode $args] |
218 | | - ]]> |
| 217 | + return [spdAux::ProcActiveIfAnyPartState $domNode $args] |
| 218 | + ]]> |
219 | 219 | </proc> |
220 | 220 | <proc n='ActiveIfRestartAvailable' args='args'> |
221 | 221 | <![CDATA[ |
222 | | - return [spdAux::ProcActiveIfRestartAvailable $domNode $args] |
223 | | - ]]> |
| 222 | + return [spdAux::ProcActiveIfRestartAvailable $domNode $args] |
| 223 | + ]]> |
224 | 224 | </proc> |
225 | 225 | <proc n='DisableIfUniqueName' args='args'> |
226 | 226 | <![CDATA[ |
227 | | - catch {[get_domnode_attribute $domNode dict]} |
228 | | - return [spdAux::ProcDisableIfUniqueName $domNode $args] |
229 | | - ]]> |
| 227 | + catch {[get_domnode_attribute $domNode dict]} |
| 228 | + return [spdAux::ProcDisableIfUniqueName $domNode $args] |
| 229 | + ]]> |
230 | 230 | </proc> |
231 | 231 | <proc n='HideIfUniqueName' args='args'> |
232 | 232 | <![CDATA[ |
233 | | - catch {[get_domnode_attribute $domNode dict]} |
234 | | - return [spdAux::ProcHideIfUniqueName $domNode $args] |
235 | | - ]]> |
| 233 | + catch {[get_domnode_attribute $domNode dict]} |
| 234 | + return [spdAux::ProcHideIfUniqueName $domNode $args] |
| 235 | + ]]> |
236 | 236 | </proc> |
237 | 237 | <proc n='CheckGeometry' args='args'> |
238 | 238 | <![CDATA[ |
239 | | - return [spdAux::ProcCheckGeometry $domNode $args] |
240 | | - ]]> |
| 239 | + return [spdAux::ProcCheckGeometry $domNode $args] |
| 240 | + ]]> |
241 | 241 | </proc> |
242 | 242 | <proc n='UpdateTree' args='args'> |
243 | 243 | <![CDATA[ |
244 | | - gid_groups_conds::actualize_conditions_window |
245 | | - ]]> |
| 244 | + gid_groups_conds::actualize_conditions_window |
| 245 | + ]]> |
246 | 246 | </proc> |
247 | 247 | <proc n='DirectorVectorNonZero' args='args'> |
248 | 248 | <![CDATA[ |
249 | | - return [spdAux::ProcDirectorVectorNonZero $domNode $args] |
250 | | - ]]> |
| 249 | + return [spdAux::ProcDirectorVectorNonZero $domNode $args] |
| 250 | + ]]> |
251 | 251 | </proc> |
252 | 252 | <proc n='ShowInMode' args='args'> |
253 | 253 | <![CDATA[ |
254 | | - return [spdAux::ProcShowInMode $domNode $args] |
255 | | - ]]> |
| 254 | + return [spdAux::ProcShowInMode $domNode $args] |
| 255 | + ]]> |
256 | 256 | </proc> |
257 | 257 | <proc n='UpdateDictAndReturnState' args='args'> |
258 | 258 | <![CDATA[ |
259 | | - set dict [spdAux::ProcGetConstitutiveLaws $domNode] |
260 | | - $domNode setAttribute dict $dict |
261 | | - set values [split [get_domnode_attribute $domNode values] ","] |
262 | | - set value [get_domnode_attribute $domNode v] |
263 | | - if {$value ni $values} {set value [lindex $values 0]; $domNode setAttribute v $value} |
264 | | - return "normal" |
| 259 | + set dict [spdAux::ProcGetConstitutiveLaws $domNode] |
| 260 | + $domNode setAttribute dict $dict |
| 261 | + set values [split [get_domnode_attribute $domNode values] ","] |
| 262 | + set value [get_domnode_attribute $domNode v] |
| 263 | + if {$value ni $values} {set value [lindex $values 0]; $domNode setAttribute v $value} |
| 264 | + return "normal" |
265 | 265 | ]]> |
266 | 266 | </proc> |
267 | 267 | <proc n='getIntervals' args='args'> |
268 | 268 | <![CDATA[ |
269 | | - return [spdAux::ProcGetIntervals $domNode $args] |
270 | | - ]]> |
| 269 | + return [spdAux::ProcGetIntervals $domNode $args] |
| 270 | + ]]> |
271 | 271 | </proc> |
272 | 272 | <proc n='getTimeFunctions' args='args'> |
273 | 273 | <![CDATA[ |
274 | | - set lista [::spdAux::getTimeFunctions] |
275 | | - if {[$domNode @v] eq "" || [$domNode @v] ni $lista} { |
276 | | - $domNode setAttribute v [lindex $lista 0] |
277 | | - } |
278 | | - set res [spdAux::ListToValues $lista] |
279 | | - return $res |
280 | | - ]]> |
| 274 | + set lista [::spdAux::getTimeFunctions] |
| 275 | + if {[$domNode @v] eq "" || [$domNode @v] ni $lista} { |
| 276 | + $domNode setAttribute v [lindex $lista 0] |
| 277 | + } |
| 278 | + set res [spdAux::ListToValues $lista] |
| 279 | + return $res |
| 280 | + ]]> |
281 | 281 | </proc> |
282 | 282 | <proc n='getFields' args='args'> |
283 | 283 | <![CDATA[ |
284 | | - set lista [::spdAux::getFields] |
285 | | - if {[$domNode @v] eq "" || [$domNode @v] ni $lista} { |
286 | | - $domNode setAttribute v [lindex $lista 0] |
287 | | - } |
288 | | - set res [spdAux::ListToValues $lista] |
289 | | - return $res |
290 | | - ]]> |
| 284 | + set lista [::spdAux::getFields] |
| 285 | + if {[$domNode @v] eq "" || [$domNode @v] ni $lista} { |
| 286 | + $domNode setAttribute v [lindex $lista 0] |
| 287 | + } |
| 288 | + set res [spdAux::ListToValues $lista] |
| 289 | + return $res |
| 290 | + ]]> |
291 | 291 | </proc> |
292 | 292 | <proc n="loads_function_time" args="load_name"> |
293 | 293 | <![CDATA[ |
294 | | - return [spdAux::chk_loads_function_time $domNode $load_name] |
| 294 | + return [spdAux::chk_loads_function_time $domNode $load_name] |
295 | 295 | ]]> |
296 | 296 | </proc> |
297 | 297 | <proc n="FileDict" args="args"> |
298 | 298 | <![CDATA[ |
299 | | - return [spdAux::ProcFileDict $domNode $args] |
300 | | - ]]> |
| 299 | + return [spdAux::ProcFileDict $domNode $args] |
| 300 | + ]]> |
301 | 301 | </proc> |
302 | 302 | <proc n='AddFile' args='args'> |
303 | 303 | <![CDATA[ |
304 | | - if {[get_domnode_attribute $domNode v] eq "- Add new file"} { |
305 | | - spdAux::AddFile $domNode |
306 | | - } |
307 | | - ]]> |
| 304 | + if {[get_domnode_attribute $domNode v] eq "- Add new file"} { |
| 305 | + spdAux::AddFile $domNode |
| 306 | + } |
| 307 | + ]]> |
308 | 308 | </proc> |
309 | 309 | <proc n='GetFilesValues' args='args'> |
310 | 310 | <![CDATA[ |
311 | | - return [spdAux::ProcGetFilesValues] |
312 | | - ]]> |
| 311 | + return [spdAux::ProcGetFilesValues] |
| 312 | + ]]> |
313 | 313 | </proc> |
314 | 314 | <dynamicnode command="spdAux::injectProcs" args=""/> |
315 | 315 | </procs> |
|
0 commit comments