























































































































 


































































































































































 























































































































































































 





















































 










 








































































































































































































































 










                                
                                

                                
                                

                                
                                

                                





































module cctk_FortranWrappers
  implicit none

  interface

     subroutine CCTK_RegisterFortranWrapper (ierr, name, function)
       implicit none
       integer       ierr
       character(*)  name
       integer*8 function
     end subroutine CCTK_RegisterFortranWrapper

     subroutine CCTK_FortranWrapper (function, name)
       implicit none
       integer*8 function
       character(*)  name
     end subroutine CCTK_FortranWrapper

  end interface

end module cctk_FortranWrappers
