Alpenapollo-Falter, in Germany fast ausgestorben