diff options
author | Ian Hinder <ian.hinder@aei.mpg.de> | 2011-01-22 14:16:28 +0100 |
---|---|---|
committer | Ian Hinder <ian.hinder@aei.mpg.de> | 2011-01-22 14:16:28 +0100 |
commit | 246492abd849fed3ef791b1d011bd6e0a4eda6dd (patch) | |
tree | 0a059a90ff24f30c68309520773b51835eac974a /Auxiliary/Cactus/KrancNumericalTools/Perturb/src/id_perturb.c | |
parent | df1a93dfcfeb4189428bf16f659773cf80d60eb2 (diff) | |
parent | 29e995764f03a06a12bc87dc86615f4389954a53 (diff) |
Merge master into vector
Fixed conflicts in:
Auxiliary/Cactus/KrancNumericalTools/GenericFD/src/GenericFD.h
Diffstat (limited to 'Auxiliary/Cactus/KrancNumericalTools/Perturb/src/id_perturb.c')
-rw-r--r-- | Auxiliary/Cactus/KrancNumericalTools/Perturb/src/id_perturb.c | 49 |
1 files changed, 0 insertions, 49 deletions
diff --git a/Auxiliary/Cactus/KrancNumericalTools/Perturb/src/id_perturb.c b/Auxiliary/Cactus/KrancNumericalTools/Perturb/src/id_perturb.c deleted file mode 100644 index 07bd106..0000000 --- a/Auxiliary/Cactus/KrancNumericalTools/Perturb/src/id_perturb.c +++ /dev/null @@ -1,49 +0,0 @@ -/* - $Header$ -*/ - -#include <stdlib.h> - -#include "perturb.h" - -#include "cctk_Arguments.h" -#include "cctk_Parameters.h" - -void -add_perturb_to_var (int idx, const char* optstring, void* cctkGH) -{ - DECLARE_CCTK_PARAMETERS; - int i, j, k, ijk; - CCTK_REAL* data; - cGH* GH = cctkGH; - int type; - - data = (CCTK_REAL*) CCTK_VarDataPtrI(GH, 0, idx); - - for (k=1; k< GH->cctk_lsh[2]-1; ++k) - { - for (j=1; j< GH->cctk_lsh[1]-1; ++j) - { - for (i=1; i< GH->cctk_lsh[0]-1; ++i) - { - ijk = CCTK_GFINDEX3D(GH, i, j, k); - - data[ijk] += amplitude * pow(-1, i/period) * pow(-1, j/period) * pow(-1, k/period); - } - } - } -} - - -void -id_perturb(CCTK_ARGUMENTS) -{ - DECLARE_CCTK_ARGUMENTS - DECLARE_CCTK_PARAMETERS - - if (CCTK_TraverseString(id_vars, add_perturb_to_var, cctkGH, - CCTK_GROUP_OR_VAR) < 0) - { - CCTK_WARN (1, "Failed to parse 'IDRandom::noisy_id_vars' parameter"); - } -} |