/*@@
   @file      ParamCheck.c
   @date      Thu Oct  7 17:11:44 1999
   @author    Tom Goodale
   @desc 
   C version of Gab's paramcheck stuff
   @enddesc 
 @@*/

static char *rcsid = "$Header$";

#include "cctk.h"
#include "cctk_arguments.h"
#include "cctk_parameters.h"


 /*@@
   @routine    ParamCheckCartGrid3D
   @date      Tue Feb 23 1999
   @author    Gabrielle Allen
   @desc 
   Check parameters for CartGrid3D
   @enddesc 
   @calls     
   @calledby   
   @history 
   @hdate Thu Oct  7 17:23:15 1999 @hauthor Tom Goodale
   @hdesc Converted to C 
   @endhistory 

@@*/
void ParamCheck_CartGrid3D(CCTK_CARGUMENTS)
{
  DECLARE_CCTK_CARGUMENTS
  DECLARE_CCTK_PARAMETERS
    
  int  iflag;

  iflag = 0;

  if (CCTK_Equals(type,"byrange")) 
  {
    if (CCTK_Equals(domain,"octant")) 
    {
      iflag++;
    } 
    else if (CCTK_Equals(domain,"quadrant")) 
    {
      iflag++;
    } 
    else if (CCTK_Equals(domain,"bitant")) 
    {
      iflag++;
    } 
    else if (CCTK_Equals(domain,"full")) 
    {
      iflag++;
    }

  } 
  else if (CCTK_Equals(type,"byspacing")) 
  {
    if (CCTK_Equals(domain,"bitant")) 
    { 
      iflag++;
    } 
    else if (CCTK_Equals(domain,"quadrant")) 
    { 
      iflag++;
    } else if (CCTK_Equals(domain,"octant")) 
    { 
      iflag++;
    } 
    else if (CCTK_Equals(domain,"full")) 
    { 
      iflag++;
    }
  } 
  else if (CCTK_Equals(type,"box")) 
  { 
    iflag++;

    if (!CCTK_Equals(domain,"full")) CCTK_PARAMWARN("No symmetries can be used with box grid");
  }

  /* No grid was set up */

  if (iflag != 1) 
  {
    CCTK_PARAMWARN("No grid set up in CartGrid3D");
  }

  return;
}