1 files changed, 50 insertions, 0 deletions
diff --git a/src/cctk_Main.F90 b/src/cctk_Main.F90
new file mode 100644
index 0000000..5f4a528
--- /dev/null
+++ b/src/cctk_Main.F90
@@ -0,0 +1,50 @@
+/*@@
+  @file    $RCSfile$
+  @author  $Author$
+  @date    $Date$
+  @desc
+           Fortran 90 interface declarations for the routines
+           which have their C declarations in cctk_Main.h
+  @enddesc
+  @version $Header$
+@@*/
+
+#include "cctk.h"
+
+module cctk_Main
+  implicit none
+
+  interface
+
+     subroutine CCTK_Initialise (ierr, config)
+       implicit none
+       integer      ierr
+       CCTK_POINTER config
+     end subroutine CCTK_Initialise
+
+     subroutine CCTK_Evolve (ierr, config)
+       implicit none
+       integer      ierr
+       CCTK_POINTER config
+     end subroutine CCTK_Evolve
+
+     subroutine CCTK_Shutdown (ierr, config)
+       implicit none
+       integer      ierr
+       CCTK_POINTER config
+     end subroutine CCTK_Shutdown
+
+     subroutine CCTK_MainLoopIndex (main_loop_index)
+       implicit none
+       integer main_loop_index
+     end subroutine CCTK_MainLoopIndex
+
+     subroutine CCTK_SetMainLoopIndex (ierr, main_loop_index)
+       implicit none
+       integer ierr
+       integer main_loop_index
+     end subroutine CCTK_SetMainLoopIndex
+
+  end interface
+  
+end module cctk_Main