From 0b2fc3b6c08d39f19eb684f5ab2afa7e32947a68 Mon Sep 17 00:00:00 2001 From: schnetter Date: Mon, 21 Mar 2005 15:47:04 +0000 Subject: 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 --- interface.ccl | 16 ++++------------ 1 file changed, 4 insertions(+), 12 deletions(-) (limited to 'interface.ccl') 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" - - -- cgit v1.2.3