Which composer born in the Upper Palatinate and raised in Bohemia wrote an operate intended to celebrate the name day of Emperor Francis I?