| 1 |
jscott |
1.1 |
parameter(nlat=N_LAT,nlatp1=nlat+1) |
| 2 |
|
|
REAL pC_atm,TCO2_ml,pC_mla,WIND,TEMP,DIC_ml,area_ml, |
| 3 |
|
|
&volume_ml,ED,DZ,DZO,R,Flux_atm_ml,dpCO2_atm_ml,depth_ml, |
| 4 |
|
|
&Vpiston,diff_amp,Henry,K1,K2,Kb,Kw,H,HZ,pH,HCO3_ml,CO3_ml, |
| 5 |
|
|
&CO2_ml,Hguess,AlkC,AlkB,AlkS,AlkW |
| 6 |
|
|
|
| 7 |
|
|
COMMON /comvar_carb/TCO2_ml(nlat),pC_mla(nlat), |
| 8 |
|
|
&DIC_ml(nlat), |
| 9 |
|
|
&volume_ml(nlat), |
| 10 |
|
|
&Flux_atm_ml(nlat),dpCO2_atm_ml(nlat), |
| 11 |
|
|
&Vpiston(nlat),diff_amp,Henry(nlat),K1(nlat), |
| 12 |
|
|
&K2(nlat),Kb(nlat),Kw(nlat),H(nlat),HZ(nlat),pH(nlat), |
| 13 |
|
|
&HCO3_ml(nlat),CO3_ml(nlat),CO2_ml(nlat), |
| 14 |
|
|
&AlkC(nlat),AlkB(nlat),AlkS(nlat),AlkW(nlat) |
| 15 |
|
|
|
| 16 |
|
|
CB Gary commons for Gary |
| 17 |
|
|
common/Garyclim/temp(nlat),wind(nlat),area_ml(nlat),area_srf(nlat) |
| 18 |
|
|
common/Garydiff/depth_ml(nlat),edzon(nlat),dzg(lmo),dzog(lmo-1), |
| 19 |
|
|
&Rco2(nlat,lmo) |
| 20 |
|
|
common /Garyav/RCO2av(nlat,lmo),pC_atmav(nlat),pC_mlaav(nlat), |
| 21 |
|
|
&Flux_atm_mlav(nlat),Hav(nlat), |
| 22 |
|
|
&DIC_mlav(nlat),TCO2_mlav(nlat),AlkCav(nlat), |
| 23 |
|
|
&AlkBav(nlat),AlkSav(nlat),AlkWav(nlat), |
| 24 |
|
|
&CO2av(nlat),CO3av(nlat),ncallgary |
| 25 |
|
|
real * 4 RCO2av,pC_atmav,pC_mlaav, |
| 26 |
|
|
&Flux_atm_mlav,Hav, |
| 27 |
|
|
&DIC_mlav,TCO2_mlav,AlkCav, |
| 28 |
|
|
&AlkBav,AlkSav,AlkWav, |
| 29 |
|
|
&CO2av,CO3av |
| 30 |
|
|
common /Garyflux/pC_atm(nlat),wind_amp,fluxco2(nlat) |
| 31 |
|
|
common /Garychem/Hguess(nlat) |
| 32 |
|
|
CE Gary commons for Gary |
Parent Directory
| 
Revision Log
| 
Revision Graph