aboutsummaryrefslogtreecommitdiff
path: root/src/cctk_FortranWrappers.F90
diff options
context:
space:
mode:
Diffstat (limited to 'src/cctk_FortranWrappers.F90')
-rw-r--r--src/cctk_FortranWrappers.F9034
1 files changed, 34 insertions, 0 deletions
diff --git a/src/cctk_FortranWrappers.F90 b/src/cctk_FortranWrappers.F90
new file mode 100644
index 0000000..ac69c26
--- /dev/null
+++ b/src/cctk_FortranWrappers.F90
@@ -0,0 +1,34 @@
+/*@@
+ @file $RCSfile$
+ @author $Author$
+ @date $Date$
+ @desc
+ Fortran 90 interface declarations for the routines
+ which have their C declarations in cctk_FortranWrappers.h
+ @enddesc
+ @version $Header$
+@@*/
+
+#include "cctk.h"
+
+module cctk_FortranWrappers
+ implicit none
+
+ interface
+
+ subroutine CCTK_RegisterFortranWrapper (ierr, name, function)
+ implicit none
+ integer ierr
+ character(*) name
+ CCTK_FPOINTER function
+ end subroutine CCTK_RegisterFortranWrapper
+
+ subroutine CCTK_FortranWrapper (function, name)
+ implicit none
+ CCTK_FPOINTER function
+ character(*) name
+ end subroutine CCTK_FortranWrapper
+
+ end interface
+
+end module cctk_FortranWrappers