Commit 41c421b3 authored by Sabine's avatar Sabine
Browse files

change get_vdep_prob name in timemanager

parent 3d6060ec
...@@ -552,7 +552,7 @@ subroutine timemanager ...@@ -552,7 +552,7 @@ subroutine timemanager
if (DRYBKDEP) then if (DRYBKDEP) then
do ks=1,nspec do ks=1,nspec
if ((xscav_frac1(j,ks).lt.0)) then if ((xscav_frac1(j,ks).lt.0)) then
call advance_rec(itime,xtra1(j),ytra1(j),ztra1(j),prob_rec) call get_vdep_prob(itime,xtra1(j),ytra1(j),ztra1(j),prob_rec)
if (DRYDEPSPEC(ks)) then ! dry deposition if (DRYDEPSPEC(ks)) then ! dry deposition
xscav_frac1(j,ks)=prob_rec(ks) xscav_frac1(j,ks)=prob_rec(ks)
else else
Supports Markdown
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