Update coups.R