John Frederick, Duke of Brunswick-Calenberg