#include "cctk.h" void CCTK_FCALL CCTK_FNAME(ahfinder_2dio_, AHFINDER_2DIO, ahfinder_2dio) (Double *x,int *new_do_2dio) { pGF *GF; GF = locateGFbyDataPtr(x); GF->do_2dio = *new_do_2dio; }