90 |
_RS pTracerTakahashi(1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy) |
_RS pTracerTakahashi(1-OLx:sNx+OLx,1-OLy:sNy+OLy,12,nSx,nSy) |
91 |
COMMON /PTRACERS_Takahashi/ pTracerTakahashi |
COMMON /PTRACERS_Takahashi/ pTracerTakahashi |
92 |
|
|
93 |
|
C pTracerAtmCO2 :: arrays containing atmospheric CO2 concentration |
94 |
|
integer pTracerAtm_Nrec |
95 |
|
PARAMETER(pTracerAtm_Nrec = 492) |
96 |
|
_RS pTracerAtmYear(pTracerAtm_Nrec) |
97 |
|
_RS pTracerAtmCO2 (pTracerAtm_Nrec) |
98 |
|
COMMON /PTRACERS_AtmCO2/ pTracerAtmYear, pTracerAtmCO2 |
99 |
|
|
100 |
CEOP |
CEOP |
101 |
#endif /* ALLOW_PTRACERS */ |
#endif /* ALLOW_PTRACERS */ |