Parent Directory | Revision Log | Revision Graph | Patch
revision 1.4 by edhill, Thu Oct 9 04:19:19 2003 UTC | revision 1.5 by jmc, Tue Oct 28 22:19:53 2003 UTC | |
---|---|---|
# | Line 162 c add all tendencies for PO4, DOP, ALK, | Line 162 c add all tendencies for PO4, DOP, ALK, |
162 | GO2(i,j,1)=GO2(i,j,1)+SURO(i,j) | GO2(i,j,1)=GO2(i,j,1)+SURO(i,j) |
163 | #ifdef ALLOW_FE | #ifdef ALLOW_FE |
164 | GFE(i,j,1)=GFE(i,j,1)+alpfe* | GFE(i,j,1)=GFE(i,j,1)+alpfe* |
165 | & InputFe(i,j,bi,bj)/delz(1) | & InputFe(i,j,bi,bj)/drF(1) |
166 | #endif | #endif |
167 | ENDIF | ENDIF |
168 | ENDDO | ENDDO |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |