Skip to content

Commit 4c9419a

Browse files
committed
Fix a bug on bubble variable
1 parent e4906d7 commit 4c9419a

File tree

1 file changed

+1
-5
lines changed

1 file changed

+1
-5
lines changed

src/pre_process/m_assign_variables.f90

Lines changed: 1 addition & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -334,11 +334,7 @@ subroutine s_assign_patch_species_primitive_variables_bubbles(patch_id, j, k, l,
334334
end if
335335
else
336336
q_prim_vf(bub_idx%rs(i))%sf(j, k, l) = muR
337-
if (.not. vel_profile) then
338-
q_prim_vf(bub_idx%vs(i))%sf(j, k, l) = muV
339-
else
340-
q_prim_vf(bub_idx%vs(i))%sf(j, k, l) = muV*tanh(y_cc(k))
341-
end if
337+
q_prim_vf(bub_idx%vs(i))%sf(j, k, l) = muV
342338
if (.not. polytropic) then
343339
q_prim_vf(bub_idx%ps(i))%sf(j, k, l) = patch_icpp(patch_id)%p0
344340
q_prim_vf(bub_idx%ms(i))%sf(j, k, l) = patch_icpp(patch_id)%m0

0 commit comments

Comments
 (0)