Update ampm.R