calcCAR, corrected