diff options
-rw-r--r-- | src/brilldata.F | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/brilldata.F b/src/brilldata.F index 4d5862a..24a745e 100644 --- a/src/brilldata.F +++ b/src/brilldata.F @@ -64,7 +64,7 @@ c Boundaries. . "EllLinConfMetric::Bnd::Robin::falloff") call Ell_SetRealKey(ierr,brill_robin_inf, . "EllLinConfMetric::Bnd::Robin::inf") - endif + end if c Elliptic solver. @@ -73,7 +73,7 @@ c Elliptic solver. . field_index,Mlin_index,Nsrc_index,AbsTol,RelTol,"sor") end if - if (CCTK_EQUALS(brill_solver,"petsc)) then + if (CCTK_EQUALS(brill_solver,"petsc")) then call Ell_LinConfMetricSolver(ierr,cctkGH,metpsi_index, . field_index,Mlin_index,Nsrc_index,AbsTol,RelTol,"petsc") end if |