Skip to content

Commit 566b580

Browse files
minor
1 parent 21123fd commit 566b580

1 file changed

Lines changed: 119 additions & 119 deletions

File tree

kratos.gid/kratos_default.spd

Lines changed: 119 additions & 119 deletions
Original file line numberDiff line numberDiff line change
@@ -39,277 +39,277 @@
3939
<procs>
4040
<proc n='UpdateParts' args='args'>
4141
<![CDATA[
42-
return [spdAux::ProcUpdateParts $domNode $args]
43-
]]>
42+
return [spdAux::ProcUpdateParts $domNode $args]
43+
]]>
4444
</proc>
4545
<proc n='OkNewCondition' args='args'>
4646
<![CDATA[
47-
return [spdAux::ProcOkNewCondition $domNode $args]
48-
]]>
47+
return [spdAux::ProcOkNewCondition $domNode $args]
48+
]]>
4949
</proc>
5050
<proc n='GetElements' args='args'>
5151
<![CDATA[
52-
return [spdAux::ProcGetElements $domNode $args]
53-
]]>
52+
return [spdAux::ProcGetElements $domNode $args]
53+
]]>
5454
</proc>
5555
<proc n='GetElementsDict' args='args'>
5656
<![CDATA[
57-
return [spdAux::ProcGetElementsDict $domNode $args]
58-
]]>
57+
return [spdAux::ProcGetElementsDict $domNode $args]
58+
]]>
5959
</proc>
6060
<proc n='GetElementsValues' args='args'>
6161
<![CDATA[
62-
return [spdAux::ProcGetElementsValues $domNode $args]
63-
]]>
62+
return [spdAux::ProcGetElementsValues $domNode $args]
63+
]]>
6464
</proc>
6565
<proc n='GetSolutionStrategies' args='args'>
6666
<![CDATA[
67-
return [spdAux::ProcGetSolutionStrategies $domNode $args]
68-
]]>
67+
return [spdAux::ProcGetSolutionStrategies $domNode $args]
68+
]]>
6969
</proc>
7070
<proc n='GetSchemes' args='args'>
7171
<![CDATA[
72-
return [spdAux::ProcGetSchemes $domNode $args]
73-
]]>
72+
return [spdAux::ProcGetSchemes $domNode $args]
73+
]]>
7474
</proc>
7575
<proc n='GetConstitutiveLaws' args='args'>
7676
<![CDATA[
77-
return [spdAux::ProcGetConstitutiveLaws $domNode $args]
78-
]]>
77+
return [spdAux::ProcGetConstitutiveLaws $domNode $args]
78+
]]>
7979
</proc>
8080
<proc n='GetAllConstitutiveLaws' args='args'>
8181
<![CDATA[
82-
return [spdAux::ProcGetAllConstitutiveLaws $domNode $args]
83-
]]>
82+
return [spdAux::ProcGetAllConstitutiveLaws $domNode $args]
83+
]]>
8484
</proc>
8585
<proc n='GetSolvers' args='args'>
8686
<![CDATA[
87-
return [spdAux::ProcGetSolvers $domNode $args]
88-
]]>
87+
return [spdAux::ProcGetSolvers $domNode $args]
88+
]]>
8989
</proc>
9090
<proc n='GetSolversValues' args='args'>
9191
<![CDATA[
92-
return [spdAux::ProcGetSolversValues $domNode $args]
93-
]]>
92+
return [spdAux::ProcGetSolversValues $domNode $args]
93+
]]>
9494
</proc>
9595
<proc n='GetSolverParameterValues' args='args'>
9696
<![CDATA[
97-
return [spdAux::ProcGetSolverParameterValues $domNode $args]
98-
]]>
97+
return [spdAux::ProcGetSolverParameterValues $domNode $args]
98+
]]>
9999
</proc>
100100
<proc n='GetSolverParameterDict' args='args'>
101101
<![CDATA[
102-
return [spdAux::ProcGetSolverParameterDict $domNode $args]
103-
]]>
102+
return [spdAux::ProcGetSolverParameterDict $domNode $args]
103+
]]>
104104
</proc>
105105
<proc n='CheckNodalConditionState' args='args'>
106106
<![CDATA[
107-
return [spdAux::ProcCheckNodalConditionState $domNode $args]
108-
]]>
107+
return [spdAux::ProcCheckNodalConditionState $domNode $args]
108+
]]>
109109
</proc>
110110
<proc n='CheckNodalConditionOutputState' args='args'>
111111
<![CDATA[
112-
return [spdAux::ProcCheckNodalConditionOutputState $domNode $args]
113-
]]>
112+
return [spdAux::ProcCheckNodalConditionOutputState $domNode $args]
113+
]]>
114114
</proc>
115115
<proc n='RefreshTree' args='args'>
116116
<![CDATA[
117-
spdAux::RequestRefresh
118-
]]>
117+
spdAux::RequestRefresh
118+
]]>
119119
</proc>
120120
<proc n='checkStateByUniqueName' args='args'>
121121
<![CDATA[
122-
return [spdAux::ProccheckStateByUniqueName $domNode $args]
123-
]]>
122+
return [spdAux::ProccheckStateByUniqueName $domNode $args]
123+
]]>
124124
</proc>
125125
<proc n='SolverParamState' args='args'>
126126
<![CDATA[
127-
return [spdAux::ProcSolverParamState $domNode $args]
128-
]]>
127+
return [spdAux::ProcSolverParamState $domNode $args]
128+
]]>
129129
</proc>
130130
<proc n='PartParamValue' args='args'>
131131
<![CDATA[
132-
return [spdAux::ProcPartParamValue $domNode $args]
133-
]]>
132+
return [spdAux::ProcPartParamValue $domNode $args]
133+
]]>
134134
</proc>
135135
<proc n='GetParts' args='args'>
136136
<![CDATA[
137-
return [spdAux::ProcGetParts $domNode $args]
138-
]]>
137+
return [spdAux::ProcGetParts $domNode $args]
138+
]]>
139139
</proc>
140140
<proc n='PartParamState' args='args'>
141141
<![CDATA[
142-
return [spdAux::ProcPartParamState $domNode $args]
143-
]]>
142+
return [spdAux::ProcPartParamState $domNode $args]
143+
]]>
144144
</proc>
145145
<proc n='SolverEntryState' args='args'>
146146
<![CDATA[
147-
return [spdAux::ProcSolverEntryState $domNode $args]
148-
]]>
147+
return [spdAux::ProcSolverEntryState $domNode $args]
148+
]]>
149149
</proc>
150150
<proc n='CheckDimension' args='args'>
151151
<![CDATA[
152-
return [spdAux::ProcCheckDimension $domNode $args]
153-
]]>
152+
return [spdAux::ProcCheckDimension $domNode $args]
153+
]]>
154154
</proc>
155155
<proc n='getStateFromXPathValue' args='args'>
156156
<![CDATA[
157-
return [spdAux::ProcgetStateFromXPathValue $domNode $args]
158-
]]>
157+
return [spdAux::ProcgetStateFromXPathValue $domNode $args]
158+
]]>
159159
</proc>
160160
<proc n='getStateFromXPathValueDisabled' args='args'>
161161
<![CDATA[
162-
return [spdAux::ProcgetStateFromXPathValueDisabled $domNode $args]
163-
]]>
162+
return [spdAux::ProcgetStateFromXPathValueDisabled $domNode $args]
163+
]]>
164164
</proc>
165165
<proc n='get_materials_list_simple' args='args'>
166166
<![CDATA[
167-
return [spdAux::ProcGet_materials_list_simple $domNode {*}$args]
168-
]]>
167+
return [spdAux::ProcGet_materials_list_simple $domNode {*}$args]
168+
]]>
169169
</proc>
170170
<proc n='give_materials_list' args='args'>
171171
<![CDATA[
172-
return [spdAux::ProcGive_materials_list $domNode {*}$args]
173-
]]>
172+
return [spdAux::ProcGive_materials_list $domNode {*}$args]
173+
]]>
174174
</proc>
175175
<proc n='edit_database_list' args='args'>
176176
<![CDATA[
177-
return [spdAux::ProcEdit_database_list $domNode {*}$args]
178-
]]>
177+
return [spdAux::ProcEdit_database_list $domNode {*}$args]
178+
]]>
179179
</proc>
180180
<proc n='CambioMat' args='args'>
181181
<![CDATA[
182-
return [spdAux::ProcCambioMat $domNode $args]
183-
]]>
182+
return [spdAux::ProcCambioMat $domNode $args]
183+
]]>
184184
</proc>
185185
<proc n='ConditionState' args='args'>
186186
<![CDATA[
187-
return [spdAux::ProcConditionState $domNode $args]
188-
]]>
187+
return [spdAux::ProcConditionState $domNode $args]
188+
]]>
189189
</proc>
190190
<proc n='ConditionParameterState' args='args'>
191191
<![CDATA[
192-
return [spdAux::ProcConditionParameterState $domNode $args]
193-
]]>
192+
return [spdAux::ProcConditionParameterState $domNode $args]
193+
]]>
194194
</proc>
195195
<proc n='SolStratParamState' args='args'>
196196
<![CDATA[
197-
return [spdAux::ProcSolStratParamState $domNode $args]
198-
]]>
197+
return [spdAux::ProcSolStratParamState $domNode $args]
198+
]]>
199199
</proc>
200200
<proc n='SchemeParamState' args='args'>
201201
<![CDATA[
202-
return [spdAux::ProcSchemeParamState $domNode $args]
203-
]]>
202+
return [spdAux::ProcSchemeParamState $domNode $args]
203+
]]>
204204
</proc>
205205
<proc n='ConstLawOutputState' args='args'>
206206
<![CDATA[
207-
return [spdAux::ProcConstLawOutputState $domNode $args]
208-
]]>
207+
return [spdAux::ProcConstLawOutputState $domNode $args]
208+
]]>
209209
</proc>
210210
<proc n='ElementOutputState' args='args'>
211211
<![CDATA[
212-
return [spdAux::ProcElementOutputState $domNode $args]
213-
]]>
212+
return [spdAux::ProcElementOutputState $domNode $args]
213+
]]>
214214
</proc>
215215
<proc n='ActiveIfAnyPartState' args='args'>
216216
<![CDATA[
217-
return [spdAux::ProcActiveIfAnyPartState $domNode $args]
218-
]]>
217+
return [spdAux::ProcActiveIfAnyPartState $domNode $args]
218+
]]>
219219
</proc>
220220
<proc n='ActiveIfRestartAvailable' args='args'>
221221
<![CDATA[
222-
return [spdAux::ProcActiveIfRestartAvailable $domNode $args]
223-
]]>
222+
return [spdAux::ProcActiveIfRestartAvailable $domNode $args]
223+
]]>
224224
</proc>
225225
<proc n='DisableIfUniqueName' args='args'>
226226
<![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+
]]>
230230
</proc>
231231
<proc n='HideIfUniqueName' args='args'>
232232
<![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+
]]>
236236
</proc>
237237
<proc n='CheckGeometry' args='args'>
238238
<![CDATA[
239-
return [spdAux::ProcCheckGeometry $domNode $args]
240-
]]>
239+
return [spdAux::ProcCheckGeometry $domNode $args]
240+
]]>
241241
</proc>
242242
<proc n='UpdateTree' args='args'>
243243
<![CDATA[
244-
gid_groups_conds::actualize_conditions_window
245-
]]>
244+
gid_groups_conds::actualize_conditions_window
245+
]]>
246246
</proc>
247247
<proc n='DirectorVectorNonZero' args='args'>
248248
<![CDATA[
249-
return [spdAux::ProcDirectorVectorNonZero $domNode $args]
250-
]]>
249+
return [spdAux::ProcDirectorVectorNonZero $domNode $args]
250+
]]>
251251
</proc>
252252
<proc n='ShowInMode' args='args'>
253253
<![CDATA[
254-
return [spdAux::ProcShowInMode $domNode $args]
255-
]]>
254+
return [spdAux::ProcShowInMode $domNode $args]
255+
]]>
256256
</proc>
257257
<proc n='UpdateDictAndReturnState' args='args'>
258258
<![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"
265265
]]>
266266
</proc>
267267
<proc n='getIntervals' args='args'>
268268
<![CDATA[
269-
return [spdAux::ProcGetIntervals $domNode $args]
270-
]]>
269+
return [spdAux::ProcGetIntervals $domNode $args]
270+
]]>
271271
</proc>
272272
<proc n='getTimeFunctions' args='args'>
273273
<![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+
]]>
281281
</proc>
282282
<proc n='getFields' args='args'>
283283
<![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+
]]>
291291
</proc>
292292
<proc n="loads_function_time" args="load_name">
293293
<![CDATA[
294-
return [spdAux::chk_loads_function_time $domNode $load_name]
294+
return [spdAux::chk_loads_function_time $domNode $load_name]
295295
]]>
296296
</proc>
297297
<proc n="FileDict" args="args">
298298
<![CDATA[
299-
return [spdAux::ProcFileDict $domNode $args]
300-
]]>
299+
return [spdAux::ProcFileDict $domNode $args]
300+
]]>
301301
</proc>
302302
<proc n='AddFile' args='args'>
303303
<![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+
]]>
308308
</proc>
309309
<proc n='GetFilesValues' args='args'>
310310
<![CDATA[
311-
return [spdAux::ProcGetFilesValues]
312-
]]>
311+
return [spdAux::ProcGetFilesValues]
312+
]]>
313313
</proc>
314314
<dynamicnode command="spdAux::injectProcs" args=""/>
315315
</procs>

0 commit comments

Comments
 (0)