diff options
| author | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-02-04 21:57:46 +0000 |
|---|---|---|
| committer | diener <diener@2a26948c-0e4f-0410-aee8-f1d3e353619c> | 2003-02-04 21:57:46 +0000 |
| commit | cdc0c5545c3b0a371957baef5c58bbb19de9512c (patch) | |
| tree | 037f75713bd0ae24bbe8d3601a484ea42c0f8a44 | |
| parent | 8544a77fec2e83904c859455b8731795efa6b5d6 (diff) | |
Remove the check for odd numbers, since, as Tom pointed out and is now
implemented, this can be done directly in the param.ccl by adding a stride
of 2 to the range.
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/EHFinder/trunk@84 2a26948c-0e4f-0410-aee8-f1d3e353619c
| -rw-r--r-- | param.ccl | 4 | ||||
| -rw-r--r-- | src/EHFinder_ParamCheck.F90 | 12 |
2 files changed, 8 insertions, 8 deletions
@@ -165,12 +165,12 @@ INT saved_iteration_every "How often was the numerical data saved" INT ntheta "Number of points in the theta direction when finding points on the surface" { -1: :: "Positive and odd please" +1:*:2 :: "Positive and odd please" } 51 INT nphi "Number of points in the phi direction when finding points on the surface" { -1: :: "Positive and odd please" +1:*:2 :: "Positive and odd please" } 51 INT n_array_ghosts "Number of ghost points in the surface grid array" { diff --git a/src/EHFinder_ParamCheck.F90 b/src/EHFinder_ParamCheck.F90 index 8e98d67..ae9ec1e 100644 --- a/src/EHFinder_ParamCheck.F90 +++ b/src/EHFinder_ParamCheck.F90 @@ -42,10 +42,10 @@ subroutine EHFinder_ParamCheck(CCTK_ARGUMENTS) ! Check if ntheta and nphi are odd as required for the Simpsons rulei ! integration. - if ( mod(ntheta,2) .eq. 0 ) then - call CCTK_PARAMWARN('EHFinder::ntheta has to be an odd number') - end if - if ( mod(nphi,2) .eq. 0 ) then - call CCTK_PARAMWARN('EHFinder::nphi has to be an odd number') - end if +! if ( mod(ntheta,2) .eq. 0 ) then +! call CCTK_PARAMWARN('EHFinder::ntheta has to be an odd number') +! end if +! if ( mod(nphi,2) .eq. 0 ) then +! call CCTK_PARAMWARN('EHFinder::nphi has to be an odd number') +! end if end subroutine EHFinder_ParamCheck |