A Riemannian Exponential Augmented Lagrangian Method for Computing the Projection Robust Wasserstein Distance