#include "cctk.h" #include "pugh.h" int PUGH_GroupDynamicData(cGH *cctkGH, int group,cGroupDynamicData *data) { int var; pGH *mypGH; pGExtras *extras; mypGH = PUGH_pGH(cctkGH); /* Get the first variable in the group */ var = CCTK_FirstVarIndexI(group); extras = ((pGA ***)(mypGH->variables))[var][0]->extras; data->dim = extras->dim; data->lsh = extras->lnsize; data->gsh = extras->nsize; data->lbnd = extras->lb[mypGH->myproc]; data->ubnd = extras->ub[mypGH->myproc]; data->nghostzones = extras->nghostzones; data->bbox = extras->bbox; return 0; }