Commit 6d7adc84 authored by Dany Dumont's avatar Dany Dumont
Browse files

Connexion du rappel de nitrate et ammonium pour le bio_model=8 (bio_nocera)

parent 5e3b85e9
...@@ -664,6 +664,14 @@ ...@@ -664,6 +664,14 @@
do i=1,nlev do i=1,nlev
cc(6,i) = amm(i) cc(6,i) = amm(i)
end do end do
else if (j==5 .and. bio_model==8) then
do i=1,nlev
cc(5,i) = nit(i)
end do
else if (j==6 .and. bio_model==8) then
do i=1,nlev
cc(6,i) = amm(i)
end do
else if (j==1 .and. bio_model==1) then else if (j==1 .and. bio_model==1) then
do i=1,nlev do i=1,nlev
cc(1,i) = nit(i) cc(1,i) = nit(i)
......
Markdown is supported
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