diff options
author | allen <allen@e296648e-0e4f-0410-bd07-d597d9acff87> | 2002-04-30 08:53:36 +0000 |
---|---|---|
committer | allen <allen@e296648e-0e4f-0410-bd07-d597d9acff87> | 2002-04-30 08:53:36 +0000 |
commit | d4d09230f37439afef6f3ce71729e1704a3545cc (patch) | |
tree | 9a44dfed0ed53b863768b2c9a63d7fd591498463 /src/ParamCheck.c | |
parent | 86dffd9ed5016d31d7eda6f4366d4da83d17a1e6 (diff) |
Finished converting Exact, which is now independent of StaticConformal,
and thus only runs with metric_type physical
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/Exact/trunk@54 e296648e-0e4f-0410-bd07-d597d9acff87
Diffstat (limited to 'src/ParamCheck.c')
-rw-r--r-- | src/ParamCheck.c | 73 |
1 files changed, 73 insertions, 0 deletions
diff --git a/src/ParamCheck.c b/src/ParamCheck.c new file mode 100644 index 0000000..fb703a9 --- /dev/null +++ b/src/ParamCheck.c @@ -0,0 +1,73 @@ + /*@@ + @file ParamCheck.c + @date Ues April 30 2002 + @author Gabrielle Allen + @desc + Parameter checking stuff for Exact + @enddesc + @version $Header$ + @@*/ + +#include "cctk.h" + +#include "cctk_Arguments.h" +#include "cctk_Parameters.h" + +static const char *rcsid = "$Header$"; + +CCTK_FILEVERSION(AEIDevelopment_Exact_ParamCheck_c) + +/******************************************************************** + ********************* Local Data Types *********************** + ********************************************************************/ + +/******************************************************************** + ********************* Local Routine Prototypes ********************* + ********************************************************************/ + +/******************************************************************** + ***************** Scheduled Routine Prototypes ********************* + ********************************************************************/ + +void Exact_ParamCheck(CCTK_ARGUMENTS); + +/******************************************************************** + ********************* Other Routine Prototypes ********************* + ********************************************************************/ + +/******************************************************************** + ********************* Local Data ***************************** + ********************************************************************/ + +/******************************************************************** + ********************* External Routines ********************** + ********************************************************************/ + + /*@@ + @routine Exact_ParamCheck + @date Tue April 30 2002 + @author Tom Goodale + @desc + Scheduled routine to detect invalid parameter settings. + @enddesc + @calls + @calledby + @history + + @endhistory + + @@*/ +void Exact_ParamCheck(CCTK_ARGUMENTS) +{ + DECLARE_CCTK_ARGUMENTS; + DECLARE_CCTK_PARAMETERS; + + if(! CCTK_EQUALS(metric_type, "physical")) + { + CCTK_PARAMWARN("Unknown ADMBase::metric_type - known types are \"physical\""); + } +} + +/******************************************************************** + ********************* Local Routines ************************* + ********************************************************************/ |