/* File produced by user eschnett */ /* Produced with Mathematica Version 6.0 for Mac OS X x86 (32-bit) (April 20, 2007) */ /* Mathematica script written by Ian Hinder and Sascha Husa */ #include "cctk.h" #include "cctk_Arguments.h" #include "cctk_Parameters.h" #include "Symmetry.h" void ML_FOWaveToy_RegisterSymmetries(CCTK_ARGUMENTS) { DECLARE_CCTK_ARGUMENTS DECLARE_CCTK_PARAMETERS /* array holding symmetry definitions */ CCTK_INT sym[3]; /* Register symmetries of grid functions */ sym[0] = 1; sym[1] = 1; sym[2] = 1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::rho"); sym[0] = 1; sym[1] = 1; sym[2] = 1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::u"); sym[0] = -1; sym[1] = 1; sym[2] = 1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::v1"); sym[0] = 1; sym[1] = -1; sym[2] = 1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::v2"); sym[0] = 1; sym[1] = 1; sym[2] = -1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::v3"); sym[0] = -1; sym[1] = 1; sym[2] = 1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::w1"); sym[0] = 1; sym[1] = -1; sym[2] = 1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::w2"); sym[0] = 1; sym[1] = 1; sym[2] = -1; SetCartSymVN(cctkGH, sym, "ML_FOWaveToy::w3"); }