1797 |
enddo |
enddo |
1798 |
#endif |
#endif |
1799 |
|
|
1800 |
|
#endif /* ALLOW_CARBON */ |
1801 |
|
|
1802 |
#ifdef ALLOW_CDOM |
#ifdef ALLOW_CDOM |
1803 |
dcdomdt = totphy_cdomp + totzoo_cdomp + preminP_cdom |
dcdomdt = totphy_cdomp + totzoo_cdomp + preminP_cdom |
1804 |
& -cdomp_degrd |
& -cdomp_degrd |
1805 |
#endif |
#endif |
1806 |
|
|
|
#endif |
|
|
|
|
1807 |
if (debug.eq.10) print*,'dDOPdt', dDOPdt |
if (debug.eq.10) print*,'dDOPdt', dDOPdt |
1808 |
if (debug.eq.10) print*,'dpopdt',dpopdt |
if (debug.eq.10) print*,'dpopdt',dpopdt |
1809 |
if (debug.eq.10) print*,'dDONdt',dDONdt |
if (debug.eq.10) print*,'dDONdt',dDONdt |