1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
#include <cctk.h>
#include <cctk_Arguments.h>
#include <cctk_Parameters.h>
extern "C"
void ID_Mag_NS_check_parameters (CCTK_ARGUMENTS)
{
DECLARE_CCTK_ARGUMENTS;
DECLARE_CCTK_PARAMETERS;
if (not CCTK_EQUALS (initial_data, "ID_Mag_NS") or
not CCTK_EQUALS (initial_lapse, "ID_Mag_NS") or
not CCTK_EQUALS (initial_shift, "ID_Mag_NS") or
not (CCTK_EQUALS (initial_dtlapse, "ID_Mag_NS") or
CCTK_EQUALS (initial_dtlapse, "none")) or
not (CCTK_EQUALS (initial_dtshift, "ID_Mag_NS") or
CCTK_EQUALS (initial_dtshift, "none")) or
not CCTK_EQUALS (initial_hydro, "ID_Mag_NS") or
not CCTK_EQUALS (initial_Bvec, "ID_Mag_NS"))
{
CCTK_PARAMWARN ("The parameters ADMBase::initial_data, ADMBase::initial_lapse, ADMBase::initial_shift, ADMBase::initial_dtlapse, ADMBase::initial_dtshift, HydroBase::initial_hydro, and HydroBase::initial_Bvec must all be set to the value \"ID_Mag_NS\" or \"none\"");
}
}
|