From fe1aaaf751748df49b5c643c604478b333e91b23 Mon Sep 17 00:00:00 2001 From: gravermistakes Date: Tue, 14 Jul 2026 16:00:38 -0700 Subject: [PATCH] Update test_energy.R removed death, consider *mandatory sleep* at zero --- core/src/endocrine/test_energy.R | 12 +----------- 1 file changed, 1 insertion(+), 11 deletions(-) diff --git a/core/src/endocrine/test_energy.R b/core/src/endocrine/test_energy.R index f84437e..2ff709f 100644 --- a/core/src/endocrine/test_energy.R +++ b/core/src/endocrine/test_energy.R @@ -20,16 +20,6 @@ test_case("init_energy_state honors custom args", function() { expect_equal(s$tool_lock_threshold, 30) }) -# --- is_alive --- -test_case("is_alive TRUE when energy above zero", function() { - expect_true(is_alive(init_energy_state(current_energy = 0.001))) - expect_true(is_alive(init_energy_state(current_energy = 100))) -}) - -test_case("is_alive FALSE at exactly zero", function() { - expect_false(is_alive(init_energy_state(current_energy = 0))) -}) - # --- is_tool_locked --- test_case("is_tool_locked TRUE below threshold", function() { expect_true(is_tool_locked(init_energy_state(current_energy = 19.9, tool_lock_threshold = 20))) @@ -70,7 +60,7 @@ test_case("evaluate_tool_cost asymmetry: eth penalty scales faster than ps load" bump_eth <- evaluate_tool_cost(s, ps_load = 1, eth_penalty = 2) delta_ps <- bump_ps - base delta_eth <- bump_eth - base - # Same +1 increment, eth must drive cost up much more than ps at reduced energy. + # Same +1 increment, eth must drive cost up much more than ps at reduced energy. [should not be same] expect_true(delta_eth > delta_ps) })