#173 dump excess steam on opening emergency coolant

supervisor/startup.lua

@@ -14,7 +14,7 @@ local svsessions = require("supervisor.session.svsessions")
 local config     = require("supervisor.config")
 local supervisor = require("supervisor.supervisor")
 
-local SUPERVISOR_VERSION = "v0.13.1"
+local SUPERVISOR_VERSION = "v0.13.2"
 
 local print = util.print
 local println = util.println

supervisor/unit.lua

@@ -523,7 +523,7 @@ function unit.new(reactor_id, num_boilers, num_turbines)
     ---@nodiscard
     ---@return integer lim_br100
     function public.a_get_effective_limit()
-        if not self.db.control.ready or self.db.control.degraded or self.plc_cache.rps_trip then
+        if (not self.db.control.ready) or self.db.control.degraded or self.plc_cache.rps_trip then
             self.db.control.br100 = 0
             return 0
         else

supervisor/unitlogic.lua

@@ -1,16 +1,20 @@
-local const = require("scada-common.constants")
-local log   = require("scada-common.log")
-local rsio  = require("scada-common.rsio")
-local types = require("scada-common.types")
-local util  = require("scada-common.util")
+local const  = require("scada-common.constants")
+local log    = require("scada-common.log")
+local rsio   = require("scada-common.rsio")
+local types  = require("scada-common.types")
+local util   = require("scada-common.util")
 
-local plc   = require("supervisor.session.plc")
+local plc    = require("supervisor.session.plc")
+
+local qtypes = require("supervisor.session.rtu.qtypes")
 
 local TRI_FAIL     = types.TRI_FAIL
 local DUMPING_MODE = types.DUMPING_MODE
 local PRIO         = types.ALARM_PRIORITY
 local ALARM_STATE  = types.ALARM_STATE
 
+local TBV_RTU_S_DATA = qtypes.TBV_RTU_S_DATA
+
 local IO = rsio.IO
 
 local PLC_S_CMDS = plc.PLC_S_CMDS
@@ -754,16 +758,38 @@ function logic.handle_redstone(self)
         -- if auto control is engaged, alarm check will SCRAM on reactor over temp so that's covered
         self.valves.emer_cool.close()
 
+        -- set turbines to not dump steam
+        for i = 1, #self.turbines do
+            local session = self.turbines[i]    ---@type unit_session
+            local turbine = session.get_db()    ---@type turbinev_session_db
+
+            if turbine.state.dumping_mode ~= DUMPING_MODE.IDLE then
+                session.get_cmd_queue().push_data(TBV_RTU_S_DATA.SET_DUMP_MODE, DUMPING_MODE.IDLE)
+            end
+        end
+
         if self.db.annunciator.EmergencyCoolant > 1 and self.emcool_opened then
             log.info(util.c("UNIT ", self.r_id, " emergency coolant valve closed"))
+            log.info(util.c("UNIT ", self.r_id, " turbines set to not dump steam"))
         end
 
         self.emcool_opened = false
     elseif enable_emer_cool or self.emcool_opened then
         self.valves.emer_cool.open()
 
+        -- set turbines to dump excess steam
+        for i = 1, #self.turbines do
+            local session = self.turbines[i]    ---@type unit_session
+            local turbine = session.get_db()    ---@type turbinev_session_db
+
+            if turbine.state.dumping_mode ~= DUMPING_MODE.DUMPING_EXCESS then
+                session.get_cmd_queue().push_data(TBV_RTU_S_DATA.SET_DUMP_MODE, DUMPING_MODE.DUMPING_EXCESS)
+            end
+        end
+
         if self.db.annunciator.EmergencyCoolant > 1 and not self.emcool_opened then
             log.info(util.c("UNIT ", self.r_id, " emergency coolant valve opened"))
+            log.info(util.c("UNIT ", self.r_id, " turbines set to dump excess steam"))
         end
 
         self.emcool_opened = true