You forgot:

data marriage(keep=marriage happy
drop=husband);