corrected final-atomic.r