atm_CO2_Moles = atm_CO2_Moles - total_flux
_RL total_flux, atpco2_check
CALL GLOBAL_SUM_TILE_RL(flxCO2tile,total_flux,myThid)
CALL GLOBAL_SUM_TILE_RL( tile_flux, total_flux, myThid )
total_atmos_carbon = total_atmos_carbon - total_flux
& total_flux, carbon_diff-total_flux
_RL total_flux