[Users] Code for Kretschmann Scalar