Commit 8ea84af1 authored by dumoda01's avatar dumoda01

Correction d'un bogue dans bio.F90 pour que le code fonctionne avec...

Correction d'un bogue dans bio.F90 pour que le code fonctionne avec bio_ismer.F90. Pour changer de modele biologique, il faut modifier l'indice des traceurs nit et amm dans bio.F90 et meanflow/nitrate.F90 et meanflow/ammonium.F90. Ceci devra etre regularise eventuellement.
parent e74c0f0a
......@@ -565,11 +565,11 @@
if (bio_eulerian) then
do j=1,numcc
if(j==5) then !CHG3
if(j==1) then !CHG3
do k=1,nlev
cc(j,k) = nit(k)
end do
else if (j==6) then !CHG5
else if (j==9) then !CHG5
do k=1,nlev
cc(j,k) = amm(k)
end do
......
This diff is collapsed.
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