The House of Mecklenburg-Schwerinis considered extinct due to a civil code compiled when?