7 |
c modified for c44 and ptracers --- swd May 2002 |
c modified for c44 and ptracers --- swd May 2002 |
8 |
|
|
9 |
COMMON /CARBON_NEEDS/ |
COMMON /CARBON_NEEDS/ |
10 |
& AtmospCO2, AtmosP, pH, pCO2,pisvel,fice |
& AtmospCO2, AtmosP, pH, pCO2, fluxCO2, |
11 |
|
& pisvel,fice,Silica |
12 |
_RL AtmospCO2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL AtmospCO2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
13 |
_RL Atmosp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL Atmosp(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
14 |
_RL pH(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL pH(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
15 |
_RL pCO2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL pCO2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
16 |
|
_RL fluxCO2(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
17 |
_RL pisvel(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL pisvel(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
18 |
_RL fice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RL fice(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
19 |
|
_RL Silica(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
20 |
|
|
21 |
COMMON /CARBON_CHEM/ |
COMMON /CARBON_CHEM/ |
22 |
& ak0,ak1,ak2,akw,akb,aks,akf, |
& ak0,ak1,ak2,akw,akb,aks,akf, |