From 93e4b89140a3179b1d4caa502cca090c9370f045 Mon Sep 17 00:00:00 2001 From: tradke Date: Fri, 2 Jul 2004 09:25:30 +0000 Subject: Removed F90 interface declarations for CCTK_InterpGV() and CCTK_InterpLocal(). git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/Fortran/trunk@17 51d2df92-0e4f-0410-a727-bd43d766d6b6 --- src/cctk_Interp.F90 | 17 ----------------- 1 file changed, 17 deletions(-) diff --git a/src/cctk_Interp.F90 b/src/cctk_Interp.F90 index 9fb9862..e4acfdb 100644 --- a/src/cctk_Interp.F90 +++ b/src/cctk_Interp.F90 @@ -22,20 +22,6 @@ module cctk_Interp character(*) name end subroutine CCTK_InterpHandle - subroutine CCTKi_InterpRegisterOperatorGV (operator_ptr, operator_name, thorn) - implicit none - CCTK_FPOINTER operator_ptr - character(*) operator_name - character(*) thorn - end subroutine CCTKi_InterpRegisterOperatorGV - - subroutine CCTKi_InterpRegisterOperatorLocal (operator_ptr, operator_name, thorn) - implicit none - CCTK_FPOINTER operator_ptr - character(*) operator_name - character(*) thorn - end subroutine CCTKi_InterpRegisterOperatorLocal - subroutine CCTKi_InterpRegisterOpLocalUniform (operator_ptr, operator_name, thorn) implicit none CCTK_FPOINTER operator_ptr @@ -102,7 +88,4 @@ module cctk_Interp end interface - external CCTK_InterpGV - external CCTK_InterpLocal - end module cctk_Interp -- cgit v1.2.3