From d2e11529e75550df2c73dcc1c001908c6d3f6502 Mon Sep 17 00:00:00 2001
From: schnetter <schnetter@c78560ca-4b45-4335-b268-5f3340f3cb52>
Date: Tue, 9 Mar 2004 11:02:14 +0000
Subject: Add Fortran wrapper for DecodeSymParameters3D

git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/CartGrid3D/trunk@194 c78560ca-4b45-4335-b268-5f3340f3cb52
---
 src/DecodeSymParameters.c | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/src/DecodeSymParameters.c b/src/DecodeSymParameters.c
index 88b12b5..a72dfc5 100644
--- a/src/DecodeSymParameters.c
+++ b/src/DecodeSymParameters.c
@@ -159,3 +159,10 @@ void DecodeSymParameters3D(int sym[6])
     sym[4] = GFSYM_REFLECTION;
   }
 }
+
+
+
+void CCTK_FCALL CCTK_FNAME(DecodeSymParameters3D) (int sym[6])
+{
+  DecodeSymParameters3D(sym);
+}
-- 
cgit v1.2.3