aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorallen <allen@b7a48df3-cbbf-4440-997f-b4b717c9f7fc>2000-02-20 11:26:38 +0000
committerallen <allen@b7a48df3-cbbf-4440-997f-b4b717c9f7fc>2000-02-20 11:26:38 +0000
commit3fa4f27a05cc726ae811e420a5b39b5830990a65 (patch)
tree5cc08da8bcc28fe27278aee116abd6050680f13f /src
parent1ed72182658bf09303ce88a62a9f4ad3bb463e34 (diff)
CCTK_CARGUMENTS -> CCTK_ARGUMENTS etc
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/ADMConstraints/trunk@32 b7a48df3-cbbf-4440-997f-b4b717c9f7fc
Diffstat (limited to 'src')
-rw-r--r--src/ADMConstraints.F7
-rw-r--r--src/InitSymBound.F4
2 files changed, 5 insertions, 6 deletions
diff --git a/src/ADMConstraints.F b/src/ADMConstraints.F
index 5d32e2a..c999936 100644
--- a/src/ADMConstraints.F
+++ b/src/ADMConstraints.F
@@ -39,14 +39,13 @@ c
c @endhistory
c@@*/
- subroutine ADMConstraints(CCTK_FARGUMENTS)
+ subroutine ADMConstraints(CCTK_ARGUMENTS)
implicit none
- DECLARE_CCTK_FARGUMENTS
+ DECLARE_CCTK_ARGUMENTS
DECLARE_CCTK_PARAMETERS
-
- INTEGER CCTK_Equals
+ DECLARE_CCTK_FUNCTIONS
integer :: i,j,k,i1,i2,j1,j2,k1,k2
diff --git a/src/InitSymBound.F b/src/InitSymBound.F
index 63aa697..63d7a85 100644
--- a/src/InitSymBound.F
+++ b/src/InitSymBound.F
@@ -25,11 +25,11 @@
@@*/
- subroutine ADMConstraint_InitSymBound(CCTK_FARGUMENTS)
+ subroutine ADMConstraint_InitSymBound(CCTK_ARGUMENTS)
implicit none
- DECLARE_CCTK_FARGUMENTS
+ DECLARE_CCTK_ARGUMENTS
INTEGER, PARAMETER :: one = 1
INTEGER, DIMENSION(3) :: sym