This commit was generated by cvs2svn to compensate for changes in r2, which

included commits to RCS files with non-trunk default branches.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinder/trunk@3 89daf98e-ef62-4674-b946-b8ff9de2216c

1 files changed, 14 insertions, 0 deletions

diff --git a/src/AHFinder_2dio.c b/src/AHFinder_2dio.c
new file mode 100644
index 0000000..2fa2d3b
--- /dev/null
+++ b/src/AHFinder_2dio.c
@@ -0,0 +1,14 @@
+
+#include "cctk.h"
+
+void FMODIFIER FORTRAN_NAME(ahfinder_2dio_,
+                            AHFINDER_2DIO,
+                            ahfinder_2dio)
+     (Double *x,int *new_do_2dio)
+{
+  pGF *GF;
+
+  GF = locateGFbyDataPtr(x);
+  GF->do_2dio = *new_do_2dio;
+}
+