Canada picks German company to build new submarine fleet in deal worth billions