From ba665e04de8a93ef2fe03028986295d0cfbb661b Mon Sep 17 00:00:00 2001
From: ryoji <ryoji@535fb057-194f-0410-b5a5-c63992f15602>
Date: Fri, 3 Mar 2000 11:38:46 +0000
Subject: fix typo eta.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/RotatingDBHIVP/trunk@12 535fb057-194f-0410-b5a5-c63992f15602
---
 src/RotatingDBHIVP.F | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src')

diff --git a/src/RotatingDBHIVP.F b/src/RotatingDBHIVP.F
index b65fffc..b74a3b9 100644
--- a/src/RotatingDBHIVP.F
+++ b/src/RotatingDBHIVP.F
@@ -512,7 +512,6 @@ c
       do k = 1,np
          do j = 1,nq
             do i = 2,ne-1
-               eta = etagrd(i)
                detapsisph(i,j,k)=0.5*(psip(i+1,j,k)-psip(i-1,j,k))/
      $              deta + sinh(0.5*etagrd(i))
             enddo
-- 
cgit v1.2.3