Skip to content

Commit 101b0d5

Browse files
Also turek example needs fix
1 parent 638b36d commit 101b0d5

1 file changed

Lines changed: 4 additions & 3 deletions

File tree

kratos.gid/apps/FSI/examples/TurekBenchmark.tcl

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -175,12 +175,13 @@ proc FSI::examples::TreeAssignationTurekBenchmark {args} {
175175
spdAux::SetValuesOnBaseNode $fluidNode $props
176176

177177
set fluidConditions {container[@n='FSI']/container[@n='Fluid']/container[@n='BoundaryConditions']}
178+
178179
# Fluid Interface
179180
set fluidInlet "$fluidConditions/condition\[@n='AutomaticInlet$nd'\]"
180-
181+
181182
# Fluid Inlet
182-
set function {1.5*(0.5*(1-cos(0.5*pi*t))*1.0)*(4.0/0.1681)*y*(0.41-y) if t<2.0 else 1.5*(1.0)*(4.0/0.1681)*y*(0.41-y)}
183-
Fluid::xml::CreateNewInlet Inlet {new false name Total} true $function
183+
Fluid::xml::CreateNewInlet Inlet {new true name interval1 ini 0 end 2.0} true "1.5*(0.5*(1-cos(0.5*pi*t))*1.0)*(4.0/0.1681)*y*(0.41-y)"
184+
Fluid::xml::CreateNewInlet Inlet {new true name interval2 ini 2.0 end end} true "1.5*(1.0)*(4.0/0.1681)*y*(0.41-y)"
184185

185186
# Fluid Outlet
186187
set fluidOutlet "$fluidConditions/condition\[@n='Outlet$nd'\]"

0 commit comments

Comments
 (0)