KerrSchildX: Correct scheduled function names

Author: eschnett

KerrSchildX/schedule.ccl

@@ -4,14 +4,15 @@ if (CCTK_Equals(initial_data, "kerrschildx") ||
     CCTK_Equals(initial_lapse, "kerrschildx") ||
     CCTK_Equals(initial_shift, "kerrschildx") ||
     CCTK_Equals(initial_dtlapse, "kerrschildx") ||
-    CCTK_Equals(initial_dtshift, "kerrschildx")) {
-  SCHEDULE KerrSchild_ParamCheck AT paramcheck
+    CCTK_Equals(initial_dtshift, "kerrschildx"))
+{
+  SCHEDULE KerrSchildX_ParamCheck AT paramcheck
   {
     LANG: C
     OPTIONS: global
   } "Check Kerr-Schild parameters"
 
-  SCHEDULE KerrSchild_InitialData IN ADMBaseX_SetADMVars
+  SCHEDULE KerrSchildX_InitialData IN ADMBaseX_SetADMVars
   {
     LANG: C
     READS: CoordinatesX::vertex_coords(everywhere)

KerrSchildX/src/kerrschild.cxx

@@ -129,8 +129,8 @@ static void kerr_schild_derivs(
   guzz = dguzz.eps;
 }
 
-extern "C" void KerrSchild_ParamCheck(CCTK_ARGUMENTS) {
-  DECLARE_CCTK_ARGUMENTSX_KerrSchild_ParamCheck;
+extern "C" void KerrSchildX_ParamCheck(CCTK_ARGUMENTS) {
+  DECLARE_CCTK_ARGUMENTSX_KerrSchildX_ParamCheck;
   DECLARE_CCTK_PARAMETERS;
 
   using std::abs;
@@ -140,8 +140,8 @@ extern "C" void KerrSchild_ParamCheck(CCTK_ARGUMENTS) {
         double(spin), double(mass));
 }
 
-extern "C" void KerrSchild_InitialData(CCTK_ARGUMENTS) {
-  DECLARE_CCTK_ARGUMENTSX_KerrSchild_InitialData;
+extern "C" void KerrSchildX_InitialData(CCTK_ARGUMENTS) {
+  DECLARE_CCTK_ARGUMENTSX_KerrSchildX_InitialData;
   DECLARE_CCTK_PARAMETERS;
 
   using Arith::pow2, Arith::pown;