aboutsummaryrefslogtreecommitdiff
path: root/src/cctk_Reduction.F90
diff options
context:
space:
mode:
Diffstat (limited to 'src/cctk_Reduction.F90')
-rw-r--r--src/cctk_Reduction.F9014
1 files changed, 2 insertions, 12 deletions
diff --git a/src/cctk_Reduction.F90 b/src/cctk_Reduction.F90
index b56a91d..42c1722 100644
--- a/src/cctk_Reduction.F90
+++ b/src/cctk_Reduction.F90
@@ -1,21 +1,10 @@
-/*@@
- @file $RCSfile$
- @author $Author$
- @date $Date$
- @desc
- Fortran 90 interface declarations for the routines
- which have their C declarations in cctk_Reduction.h
- @enddesc
- @version $Header$
-@@*/
-
#include "cctk.h"
module cctk_Reduction
implicit none
interface
-
+
subroutine CCTK_ReductionHandle (ierr, reduction)
implicit none
integer ierr
@@ -225,6 +214,7 @@ module cctk_Reduction
end interface
external CCTK_Reduce
+ external CCTK_Reduce1
external CCTK_ReduceLocalScalar
external CCTK_ReduceLocalArray1D
external CCTK_ReduceLocScalar