Skip to content
Snippets Groups Projects
Commit 04ba2dd3 authored by Jean-Matthieu Etancelin's avatar Jean-Matthieu Etancelin
Browse files

Fix small bug

parent 05b245bb
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
HySoP/hysop/f2py/scales2py.f90
+ 1
− 1
View file @ 04ba2dd3
...@@ -162,7 +162,7 @@ contains ...@@ -162,7 +162,7 @@ contains
call advec_step_Inter_basic_Vect(dt, Vx, Vy, Vz, cx, cy, cz) call advec_step_Inter_basic_Vect(dt, Vx, Vy, Vz, cx, cy, cz)
end subroutine solve_advection_inter_basic end subroutine solve_advection_inter_basic_vec
end module scales2py end module scales2py
HySoP/src/scalesInterface/particles/advec_Vector.f90
+ 1
− 1
View file @ 04ba2dd3
...@@ -72,7 +72,7 @@ end function ...@@ -72,7 +72,7 @@ end function
!! @param[in,out] VectZ = Z component of vector to advect !! @param[in,out] VectZ = Z component of vector to advect
subroutine advec_step_Inter_basic_Vect(dt, Vx, Vy, Vz, vectX, vectY, vectZ) subroutine advec_step_Inter_basic_Vect(dt, Vx, Vy, Vz, vectX, vectY, vectZ)
use Interpolation_velo, only : Interpol_3D use Interpolation_velo
! Input/Output ! Input/Output
real(WP), intent(in) :: dt real(WP), intent(in) :: dt
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment