debugging an accidental copy/paste and a forgotten call to a now remo…

…ved function
sanssouci-org · May 3, 2024 · 14d7b05 · 14d7b05
1 parent e06ce26
commit 14d7b05
Show file tree

Hide file tree

Showing 3 changed files with 0 additions and 20 deletions.
diff --git a/R/tree-functions.R b/R/tree-functions.R
@@ -763,21 +763,3 @@ forest.completion <- function(C, ZL, leaf_list) {
 
   return(list(C = C, ZL = ZL))
 }
-
-# TODO BEFORE MERGE: delete this
-V.star <- function(S, C, ZL, leaf_list) {
-  all_leaves <- tree.expand(C, ZL, leaf_list)
-  return(V.star.all.leaves(S, 
-                           all_leaves$C, 
-                           all_leaves$ZL, 
-                           leaf_list))
-}
-
-# TODO BEFORE MERGE: delete this
-V.star.no.id <- function(S, C, ZL, leaf_list) {
-  all_leaves <- tree.expand(C, ZL, leaf_list)
-  return(V.star.all.leaves.no.id(S, 
-                                 all_leaves$C, 
-                                 all_leaves$ZL, 
-                                 leaf_list))
-}
diff --git a/inst/DBNR/envelopes-hybrid/script_test_curve_fast.R b/inst/DBNR/envelopes-hybrid/script_test_curve_fast.R
@@ -30,7 +30,6 @@ print(curve.V.star.forest.fast(perm, C, ZL, leaf_list, pruning = TRUE))
 
 super.pruned <- pruning(C, ZL, leaf_list, prune.leafs = TRUE)
 pruned <- pruning(C, ZL, leaf_list, prune.leafs = FALSE)
-K.1 <- compute.K.1(pruned$C, pruned$ZL, leaf_list)
 
 print("Comparing execution times:")
 mbench <- microbenchmark(naive.not.pruned = curve.V.star.forest.naive(perm, C, ZL, leaf_list),

diff --git a/inst/DBNR/envelopes-hybrid/script_test_pruning.R b/inst/DBNR/envelopes-hybrid/script_test_pruning.R
@@ -1,4 +1,3 @@
-# TODO BEFORE MERGE: rename zetas.tree
 library(sanssouci)
 library(microbenchmark)