diff --git a/interpolate_ov_on_osolve.f90 b/interpolate_ov_on_osolve.f90 index b91d186db6f837e9a08ac635626777a43d232ba8..35ab592bfece558cf5d9f0f814b22caf73e863ac 100644 --- a/interpolate_ov_on_osolve.f90 +++ b/interpolate_ov_on_osolve.f90 @@ -107,7 +107,7 @@ pressure=0.d0 ! interpolate velocity solution onto solve octree do k=1+iproc,osolve%nnode,nproc - call octree_interpolate_many & + call octree_interpolate_five & (5,ov%octree,ov%noctree,ov%icon, & ov%nleaves,ov%nnode, & osolve%x(k),osolve%y(k),osolve%z(k), &