& atpco2
_RL atpco2
atpco2 = dic_pCO2
atpco2 = total_atmos_carbon/total_atmos_moles
& total_atmos_carbon, atpco2
AtmospCO2(i,j,bi,bj) = atpco2
atpco2 = tmpFld(2)
tmpFld(2) = atpco2