diff options
author | schnetter <schnetter@f4913095-0e4f-0410-abea-a123d184f1f3> | 2005-03-21 15:47:04 +0000 |
---|---|---|
committer | schnetter <schnetter@f4913095-0e4f-0410-abea-a123d184f1f3> | 2005-03-21 15:47:04 +0000 |
commit | 0b2fc3b6c08d39f19eb684f5ab2afa7e32947a68 (patch) | |
tree | a0383df15723cd2c0830b521dc880e7b601cf079 /interface.ccl | |
parent | 09fe20dcf18cfe2f6e1902dd702b482218f4fe81 (diff) |
Some fixes. Remove some unused variables. Some cleanup. May still
have a problem.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/Norms/trunk@10 f4913095-0e4f-0410-abea-a123d184f1f3
Diffstat (limited to 'interface.ccl')
-rw-r--r-- | interface.ccl | 16 |
1 files changed, 4 insertions, 12 deletions
diff --git a/interface.ccl b/interface.ccl index 0c4cf42..70daffa 100644 --- a/interface.ccl +++ b/interface.ccl @@ -6,21 +6,15 @@ inherits: private: -INT do_nothing_group TYPE=SCALAR -{ - do_nothing -} "if equal to 1, then won't do anything" - - INT handles_group TYPE=SCALAR { sum_handle } "handles for reduction operators" -INT varinfo TYPE=ARRAY DIM=1 SIZE=max_nr_vars +INT varinfo TYPE=ARRAY DIM=1 SIZE=max_nr_vars DISTRIB=constant { - varindices_1st, varindices_2nd, norm_type + varindices_1st, varindices_2nd } "variable info - which vars to compute norms for" INT nrdecvar_gr TYPE=SCALAR @@ -28,9 +22,9 @@ INT nrdecvar_gr TYPE=SCALAR nr1stvars, nr2ndvars } "number of vars to compute for 1st & 2nd order vars" -REAL bgvals_group TYPE=SCALAR +REAL bgvals_group TYPE=ARRAY DIM=1 SIZE=max_nr_vars DISTRIB=constant { - bgvals_1st,bgvals_2nd + bgvals_1st, bgvals_2nd } "background value for variable - these get subtracted" REAL norm_group TYPE=SCALAR @@ -42,5 +36,3 @@ REAL diff_term_group TYPE=GF { diff_term } "diff terms for norm" - - |