a="CHRISTMA",$0=sub(/S$/,_)*gsub("["$0"]",_,a)?a:a"S"