diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/RotatingDBHIVP.F | 4 | ||||
-rw-r--r-- | src/Stab3d.F | 2 |
2 files changed, 2 insertions, 4 deletions
diff --git a/src/RotatingDBHIVP.F b/src/RotatingDBHIVP.F index 405fa1f..6bacb24 100644 --- a/src/RotatingDBHIVP.F +++ b/src/RotatingDBHIVP.F @@ -34,10 +34,8 @@ c Need include file from Einstein DECLARE_CCTK_FARGUMENTS DECLARE_CCTK_PARAMETERS + DECLARE_CCTK_FUNCTIONS -c Perhaps this and others should go into cctk.h - integer CCTK_Equals - real*8 deta,dq,dphi real*8, allocatable :: ac(:,:,:),ae(:,:,:),aw(:,:,:),an(:,:,:), $ as(:,:,:),aq(:,:,:),ab(:,:,:),rhs(:,:,:),Ksq(:,:,:), diff --git a/src/Stab3d.F b/src/Stab3d.F index 0b1f97d..0bd7678 100644 --- a/src/Stab3d.F +++ b/src/Stab3d.F @@ -246,7 +246,7 @@ c c This routine was lifted from stab.f. Minor modifications have c been made. c -c Be careful that the c's are zero on their outer boundary!! +c Be careful that the cs are zero on their outer boundary!! c implicit none c |