diff options
-rw-r--r-- | src/fixedsphere.F90 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/fixedsphere.F90 b/src/fixedsphere.F90 index fd38a6a..7a5c878 100644 --- a/src/fixedsphere.F90 +++ b/src/fixedsphere.F90 @@ -29,7 +29,7 @@ subroutine Lego_FixedSphere(CCTK_ARGUMENTS) if (num_fixed_regions >= 1) then ! Only excise if there would be more than a single grid point excised - if (fixed_size >= 2*minval(CCTK_DELTA_SPACE(:))) then + if (fixed_size > minval(CCTK_DELTA_SPACE(:))) then if (CCTK_EQUALS(fixed_excision,"sphere")) then where ((x - fixed_origin_x)**2 + (y - fixed_origin_y)**2 + (z - fixed_origin_z)**2 < fixed_size**2) @@ -49,7 +49,7 @@ subroutine Lego_FixedSphere(CCTK_ARGUMENTS) if (num_fixed_regions >= 2) then ! Only excise if there would be more than a single grid point excised - if (fixed2_size >= 2*minval(CCTK_DELTA_SPACE(:))) then + if (fixed2_size > minval(CCTK_DELTA_SPACE(:))) then if (CCTK_EQUALS(fixed_excision,"sphere")) then where ((x - fixed2_origin_x)**2 + (y - fixed2_origin_y)**2 + (z - fixed2_origin_z)**2 < fixed2_size**2) |