From e22920ada67c302f476489f5cb6b6bc2af0dbb79 Mon Sep 17 00:00:00 2001 From: knarf Date: Mon, 7 Jun 2010 14:51:26 +0000 Subject: remove catch of wrong function-call because 'guessed' solution passes testsuites if tolerance is lowered to similar levels as other IDAxi-thorns git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinInitialData/IDAxiBrillBH/trunk@111 0a4070d5-58f5-498f-b6c0-2693e757fa0f --- src/shmgp.F77 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/shmgp.F77 b/src/shmgp.F77 index a269862..314b834 100644 --- a/src/shmgp.F77 +++ b/src/shmgp.F77 @@ -314,7 +314,7 @@ c I notice that this call does not correspond to the subroutine c definition below. The call passes three arguments too many. c Maybe the three arguments pu(nic),pd(nic),pc(nic) should be c omitted? - call CCTK_WARN (CCTK_WARN_ABORT, "Trying to find out whether this line is reached") +c call CCTK_WARN (CCTK_WARN_ABORT, "Trying to find out whether this line is reached") c 6 call ursrhs(f(n5),f(n5c),pu(nic),pd(nic),pc(nic),ru(nic), c + rd(nic),rc(nic),im,jm,jmc,m,k+1,jr,irc) 6 call ursrhs(f(n5),f(n5c),ru(nic),rd(nic),rc(nic), -- cgit v1.2.3