diff options
| author | jthorn <jthorn@e296648e-0e4f-0410-bd07-d597d9acff87> | 2003-06-04 11:40:59 +0000 |
|---|---|---|
| committer | jthorn <jthorn@e296648e-0e4f-0410-bd07-d597d9acff87> | 2003-06-04 11:40:59 +0000 |
| commit | 3f217742fb40c989440c6d0ee284e6527e621a81 (patch) | |
| tree | f10c470d9c63ebd87b0658a12b10d77a31846ac2 /src | |
| parent | 5ce3e8071614fe140bab4901fe69ad4bcd5e39b1 (diff) | |
remove some unused variables which the compiler noticed
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/Exact/trunk@182 e296648e-0e4f-0410-bd07-d597d9acff87
Diffstat (limited to 'src')
| -rw-r--r-- | src/xyz_blended_boundary.F77 | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/xyz_blended_boundary.F77 b/src/xyz_blended_boundary.F77 index ee0cd41..3d88a3e 100644 --- a/src/xyz_blended_boundary.F77 +++ b/src/xyz_blended_boundary.F77 @@ -12,7 +12,7 @@ C $Header$ DECLARE_CCTK_PARAMETERS DECLARE_CCTK_FUNCTIONS - logical doKij, doGij, doDs, doVs, doLapse, doShift + logical doKij, doGij, doLapse, doShift integer i,j,k integer nx,ny,nz @@ -32,7 +32,6 @@ C $Header$ CCTK_REAL betaxe,betaye,betaze CCTK_REAL bxxe,bxye,bxze,byxe,byye,byze,bzxe,bzye,bzze CCTK_REAL det, uxx, uxy, uxz, uyy, uyz, uzz - CCTK_REAL vxe,vye,vze,sav CCTK_REAL $ exact_psi, $ exact_psix, exact_psiy, exact_psiz, |