sub(/ [Yh].*/,_),$0=a$0
i++{a=$0}