/*@@
   @file      Startup.c
   @date      Wed Feb  3 23:10:19 1999
   @author    Tom Goodale
   @desc 
   Startup routines for PUGHReduce.
   @enddesc 
   @version $Header$
 @@*/

#include "cctk.h"

#include "pugh_reductions.h"

static char *rcsid="$Header$";

CCTK_FILEVERSION(CactusPUGH_PUGHReduce_Startup_c)


 /*@@
   @routine    PUGHReduce_Startup
   @date       Wed Feb  3 23:14:38 1999
   @author     Tom Goodale
   @desc 
   The startup registration routine for PUGHReduce.
   @enddesc 
   @calls     
   @calledby   
   @history 
 
   @endhistory 
 
@@*/
int PUGHReduce_Startup(void)
{

  /* Register the reduction operators provided by PUGH */
  CCTK_RegisterReductionOperator(PUGH_ReductionMinValGVs, "minimum");
  CCTK_RegisterReductionOperator(PUGH_ReductionMaxValGVs, "maximum");
  CCTK_RegisterReductionOperator(PUGH_ReductionSumGVs,    "sum");
  CCTK_RegisterReductionOperator(PUGH_ReductionNorm1GVs,  "norm1");
  CCTK_RegisterReductionOperator(PUGH_ReductionNorm2GVs,  "norm2");

  CCTK_RegisterReductionArrayOperator(PUGH_ReductionMinValArrays, "minimum");
  CCTK_RegisterReductionArrayOperator(PUGH_ReductionMaxValArrays, "maximum");
  CCTK_RegisterReductionArrayOperator(PUGH_ReductionSumArrays,    "sum");
  CCTK_RegisterReductionArrayOperator(PUGH_ReductionNorm1Arrays,  "norm1");
  CCTK_RegisterReductionArrayOperator(PUGH_ReductionNorm2Arrays,  "norm2");

  return 0;
}