Dane Sabo 9fc4afb611 julia-port: parallel plant model; sanity sim matches MATLAB, reach is stub
Port pke_params, pke_th_rhs, pke_linearize, and all five controllers
to Julia. sim_sanity.jl reproduces the MATLAB main.m operation-mode
scenario (100%->80% Q_sg step) and matches final state to 3 decimals
across n, T_f, T_avg, T_cold, u.

reach_operation.jl is a stub: ReachabilityAnalysis.jl (LGG09, GLGM06,
BFFPSV18) numerically explodes on the raw stiff system — envelopes of
1e14 K to 1e37 K instead of the known-tight 0.03 K. Almost certainly
a state-scaling issue: precursors C_i ~ 1e5, temperatures ~ 300,
eigvals span 5000x. Diagonal scaling + retry is planned; left for the
next pass since the hand-rolled MATLAB reach already discharges the
operation-mode obligation.

Project.toml pins OrdinaryDiffEq >= 6.111 (the one that precompiled
cleanly on first instantiate). Manifest gitignored.

Hacker-Split: Julia path open, reach side needs a scaling pass.

Co-Authored-By: Claude Opus 4.7 (1M context) <noreply@anthropic.com>
2026-04-17 12:52:57 -04:00

41 lines
1.4 KiB
Julia

#!/usr/bin/env julia
#
# sim_sanity.jl — verify the Julia port matches the MATLAB result.
#
# Reproduces main.m Run 2 (ctrl_operation under 100% -> 80% Q_sg step)
# and prints the final state, which should agree with MATLAB to ~1e-3.
using Pkg
Pkg.activate(joinpath(@__DIR__, ".."))
using OrdinaryDiffEq
include(joinpath(@__DIR__, "..", "src", "pke_params.jl"))
include(joinpath(@__DIR__, "..", "src", "pke_th_rhs.jl"))
include(joinpath(@__DIR__, "..", "controllers", "controllers.jl"))
plant = pke_params()
x0 = pke_initial_conditions(plant)
Q_sg = t -> plant.P0 * (1.0 - 0.2 * (t >= 30))
ref = (; T_avg = plant.T_c0)
function rhs!(dx, x, p, t)
u = ctrl_operation(t, x, plant, ref)
pke_th_rhs!(dx, x, t, plant, Q_sg, u)
end
prob = ODEProblem(rhs!, x0, (0.0, 600.0))
sol = solve(prob, Rodas5(); reltol=1e-8, abstol=1e-10)
xf = sol.u[end]
CtoF(T) = T * 9/5 + 32
println("\n=== Julia port sanity — ctrl_operation under 100% -> 80% Q_sg step ===")
println(" Final t = ", sol.t[end])
println(" n = $(round(xf[1]; digits=4)) (expect ~0.800)")
println(" T_f = $(round(CtoF(xf[8]); digits=2)) F (expect ~616.6)")
println(" T_avg = $(round(CtoF(xf[9]); digits=2)) F (expect ~587.8)")
println(" T_cold = $(round(CtoF(xf[10]); digits=2)) F (expect ~561.4)")
u_final = ctrl_operation(sol.t[end], xf, plant, ref)
println(" u = $(round(u_final/plant.beta; digits=4)) \$ (expect ~-0.0068)")