Aleksandr Kazachkov
parent
b2480ef356
commit
3baddf158a
@ -0,0 +1,182 @@
|
|||||||
|
matpower/case1888rte/2017-01-01
|
||||||
|
matpower/case1888rte/2017-01-02
|
||||||
|
matpower/case1888rte/2017-01-03
|
||||||
|
matpower/case1888rte/2017-01-04
|
||||||
|
matpower/case1888rte/2017-01-05
|
||||||
|
matpower/case1888rte/2017-01-06
|
||||||
|
matpower/case1888rte/2017-01-07
|
||||||
|
matpower/case1888rte/2017-01-08
|
||||||
|
matpower/case1888rte/2017-01-09
|
||||||
|
matpower/case1888rte/2017-01-10
|
||||||
|
matpower/case1888rte/2017-01-11
|
||||||
|
matpower/case1888rte/2017-01-12
|
||||||
|
matpower/case1888rte/2017-01-13
|
||||||
|
matpower/case1888rte/2017-01-14
|
||||||
|
matpower/case1888rte/2017-01-15
|
||||||
|
matpower/case1888rte/2017-01-16
|
||||||
|
matpower/case1888rte/2017-01-17
|
||||||
|
matpower/case1888rte/2017-01-18
|
||||||
|
matpower/case1888rte/2017-01-19
|
||||||
|
matpower/case1888rte/2017-01-20
|
||||||
|
matpower/case1888rte/2017-01-21
|
||||||
|
matpower/case1888rte/2017-01-22
|
||||||
|
matpower/case1888rte/2017-01-23
|
||||||
|
matpower/case1888rte/2017-01-24
|
||||||
|
matpower/case1888rte/2017-01-25
|
||||||
|
matpower/case1888rte/2017-01-26
|
||||||
|
matpower/case1888rte/2017-01-27
|
||||||
|
matpower/case1888rte/2017-01-28
|
||||||
|
matpower/case1888rte/2017-01-29
|
||||||
|
matpower/case1888rte/2017-01-30
|
||||||
|
matpower/case1888rte/2017-01-31
|
||||||
|
matpower/case1888rte/2017-02-01
|
||||||
|
matpower/case1888rte/2017-02-02
|
||||||
|
matpower/case1888rte/2017-02-03
|
||||||
|
matpower/case1888rte/2017-02-04
|
||||||
|
matpower/case1888rte/2017-02-05
|
||||||
|
matpower/case1888rte/2017-02-06
|
||||||
|
matpower/case1888rte/2017-02-07
|
||||||
|
matpower/case1888rte/2017-02-08
|
||||||
|
matpower/case1888rte/2017-02-09
|
||||||
|
matpower/case1888rte/2017-02-10
|
||||||
|
matpower/case1888rte/2017-02-11
|
||||||
|
matpower/case1888rte/2017-02-12
|
||||||
|
matpower/case1888rte/2017-02-13
|
||||||
|
matpower/case1888rte/2017-02-14
|
||||||
|
matpower/case1888rte/2017-02-15
|
||||||
|
matpower/case1888rte/2017-02-16
|
||||||
|
matpower/case1888rte/2017-02-17
|
||||||
|
matpower/case1888rte/2017-02-18
|
||||||
|
matpower/case1888rte/2017-02-19
|
||||||
|
matpower/case1888rte/2017-02-20
|
||||||
|
matpower/case1888rte/2017-02-21
|
||||||
|
matpower/case1888rte/2017-02-22
|
||||||
|
matpower/case1888rte/2017-02-23
|
||||||
|
matpower/case1888rte/2017-02-24
|
||||||
|
matpower/case1888rte/2017-02-25
|
||||||
|
matpower/case1888rte/2017-02-26
|
||||||
|
matpower/case1888rte/2017-02-27
|
||||||
|
matpower/case1888rte/2017-02-28
|
||||||
|
matpower/case1888rte/2017-03-01
|
||||||
|
matpower/case3375wp/2017-01-01
|
||||||
|
matpower/case3375wp/2017-01-02
|
||||||
|
matpower/case3375wp/2017-01-03
|
||||||
|
matpower/case3375wp/2017-01-04
|
||||||
|
matpower/case3375wp/2017-01-05
|
||||||
|
matpower/case3375wp/2017-01-06
|
||||||
|
matpower/case3375wp/2017-01-07
|
||||||
|
matpower/case3375wp/2017-01-08
|
||||||
|
matpower/case3375wp/2017-01-09
|
||||||
|
matpower/case3375wp/2017-01-10
|
||||||
|
matpower/case3375wp/2017-01-11
|
||||||
|
matpower/case3375wp/2017-01-12
|
||||||
|
matpower/case3375wp/2017-01-13
|
||||||
|
matpower/case3375wp/2017-01-14
|
||||||
|
matpower/case3375wp/2017-01-15
|
||||||
|
matpower/case3375wp/2017-01-16
|
||||||
|
matpower/case3375wp/2017-01-17
|
||||||
|
matpower/case3375wp/2017-01-18
|
||||||
|
matpower/case3375wp/2017-01-19
|
||||||
|
matpower/case3375wp/2017-01-20
|
||||||
|
matpower/case3375wp/2017-01-21
|
||||||
|
matpower/case3375wp/2017-01-22
|
||||||
|
matpower/case3375wp/2017-01-23
|
||||||
|
matpower/case3375wp/2017-01-24
|
||||||
|
matpower/case3375wp/2017-01-25
|
||||||
|
matpower/case3375wp/2017-01-26
|
||||||
|
matpower/case3375wp/2017-01-27
|
||||||
|
matpower/case3375wp/2017-01-28
|
||||||
|
matpower/case3375wp/2017-01-29
|
||||||
|
matpower/case3375wp/2017-01-30
|
||||||
|
matpower/case3375wp/2017-01-31
|
||||||
|
matpower/case3375wp/2017-02-01
|
||||||
|
matpower/case3375wp/2017-02-02
|
||||||
|
matpower/case3375wp/2017-02-03
|
||||||
|
matpower/case3375wp/2017-02-04
|
||||||
|
matpower/case3375wp/2017-02-05
|
||||||
|
matpower/case3375wp/2017-02-06
|
||||||
|
matpower/case3375wp/2017-02-07
|
||||||
|
matpower/case3375wp/2017-02-08
|
||||||
|
matpower/case3375wp/2017-02-09
|
||||||
|
matpower/case3375wp/2017-02-10
|
||||||
|
matpower/case3375wp/2017-02-11
|
||||||
|
matpower/case3375wp/2017-02-12
|
||||||
|
matpower/case3375wp/2017-02-13
|
||||||
|
matpower/case3375wp/2017-02-14
|
||||||
|
matpower/case3375wp/2017-02-15
|
||||||
|
matpower/case3375wp/2017-02-16
|
||||||
|
matpower/case3375wp/2017-02-17
|
||||||
|
matpower/case3375wp/2017-02-18
|
||||||
|
matpower/case3375wp/2017-02-19
|
||||||
|
matpower/case3375wp/2017-02-20
|
||||||
|
matpower/case3375wp/2017-02-21
|
||||||
|
matpower/case3375wp/2017-02-22
|
||||||
|
matpower/case3375wp/2017-02-23
|
||||||
|
matpower/case3375wp/2017-02-24
|
||||||
|
matpower/case3375wp/2017-02-25
|
||||||
|
matpower/case3375wp/2017-02-26
|
||||||
|
matpower/case3375wp/2017-02-27
|
||||||
|
matpower/case3375wp/2017-02-28
|
||||||
|
matpower/case3375wp/2017-03-01
|
||||||
|
matpower/case6468rte/2017-01-01
|
||||||
|
matpower/case6468rte/2017-01-02
|
||||||
|
matpower/case6468rte/2017-01-03
|
||||||
|
matpower/case6468rte/2017-01-04
|
||||||
|
matpower/case6468rte/2017-01-05
|
||||||
|
matpower/case6468rte/2017-01-06
|
||||||
|
matpower/case6468rte/2017-01-07
|
||||||
|
matpower/case6468rte/2017-01-08
|
||||||
|
matpower/case6468rte/2017-01-09
|
||||||
|
matpower/case6468rte/2017-01-10
|
||||||
|
matpower/case6468rte/2017-01-11
|
||||||
|
matpower/case6468rte/2017-01-12
|
||||||
|
matpower/case6468rte/2017-01-13
|
||||||
|
matpower/case6468rte/2017-01-14
|
||||||
|
matpower/case6468rte/2017-01-15
|
||||||
|
matpower/case6468rte/2017-01-16
|
||||||
|
matpower/case6468rte/2017-01-17
|
||||||
|
matpower/case6468rte/2017-01-18
|
||||||
|
matpower/case6468rte/2017-01-19
|
||||||
|
matpower/case6468rte/2017-01-20
|
||||||
|
matpower/case6468rte/2017-01-21
|
||||||
|
matpower/case6468rte/2017-01-22
|
||||||
|
matpower/case6468rte/2017-01-23
|
||||||
|
matpower/case6468rte/2017-01-24
|
||||||
|
matpower/case6468rte/2017-01-25
|
||||||
|
matpower/case6468rte/2017-01-26
|
||||||
|
matpower/case6468rte/2017-01-27
|
||||||
|
matpower/case6468rte/2017-01-28
|
||||||
|
matpower/case6468rte/2017-01-29
|
||||||
|
matpower/case6468rte/2017-01-30
|
||||||
|
matpower/case6468rte/2017-01-31
|
||||||
|
matpower/case6468rte/2017-02-01
|
||||||
|
matpower/case6468rte/2017-02-02
|
||||||
|
matpower/case6468rte/2017-02-03
|
||||||
|
matpower/case6468rte/2017-02-04
|
||||||
|
matpower/case6468rte/2017-02-05
|
||||||
|
matpower/case6468rte/2017-02-06
|
||||||
|
matpower/case6468rte/2017-02-07
|
||||||
|
matpower/case6468rte/2017-02-08
|
||||||
|
matpower/case6468rte/2017-02-09
|
||||||
|
matpower/case6468rte/2017-02-10
|
||||||
|
matpower/case6468rte/2017-02-11
|
||||||
|
matpower/case6468rte/2017-02-12
|
||||||
|
matpower/case6468rte/2017-02-13
|
||||||
|
matpower/case6468rte/2017-02-14
|
||||||
|
matpower/case6468rte/2017-02-15
|
||||||
|
matpower/case6468rte/2017-02-16
|
||||||
|
matpower/case6468rte/2017-02-17
|
||||||
|
matpower/case6468rte/2017-02-18
|
||||||
|
matpower/case6468rte/2017-02-19
|
||||||
|
matpower/case6468rte/2017-02-20
|
||||||
|
matpower/case6468rte/2017-02-21
|
||||||
|
matpower/case6468rte/2017-02-22
|
||||||
|
matpower/case6468rte/2017-02-23
|
||||||
|
matpower/case6468rte/2017-02-24
|
||||||
|
matpower/case6468rte/2017-02-25
|
||||||
|
matpower/case6468rte/2017-02-26
|
||||||
|
matpower/case6468rte/2017-02-27
|
||||||
|
matpower/case6468rte/2017-02-28
|
||||||
|
matpower/case6468rte/2017-03-01
|
||||||
|
|
||||||
|
test/case14
|
||||||
@ -0,0 +1,49 @@
|
|||||||
|
#!/bin/bash
|
||||||
|
#SBATCH --array=1-180
|
||||||
|
#SBATCH --time=02:00:00
|
||||||
|
#SBATCH --account=def-alodi
|
||||||
|
#SBATCH --mem-per-cpu=1G
|
||||||
|
#SBATCH --cpus-per-task=4
|
||||||
|
#SBATCH --mail-user=aleksandr.kazachkov@polymtl.ca
|
||||||
|
#SBATCH --mail-type=BEGIN
|
||||||
|
#SBATCH --mail-type=END
|
||||||
|
#SBATCH --mail-type=FAIL
|
||||||
|
#SBATCH --array=182
|
||||||
|
#SBATCH --time=00:00:30
|
||||||
|
#SBATCH --mem-per-cpu=500M
|
||||||
|
#SBATCH --cpus-per-task=1
|
||||||
|
#SBATCH --time=01:00:00
|
||||||
|
#SBATCH --mem-per-cpu=1G
|
||||||
|
#SBATCH --cpus-per-task=4
|
||||||
|
|
||||||
|
MODE="tight"
|
||||||
|
if [ ! -z $1 ]; then
|
||||||
|
MODE=$1
|
||||||
|
fi
|
||||||
|
|
||||||
|
#CASE_NUM=`printf %03d $SLURM_ARRAY_TASK_ID`
|
||||||
|
PROJ_DIR="${REPOS_DIR}/UnitCommitment2.jl"
|
||||||
|
INST=$(sed -n "${SLURM_ARRAY_TASK_ID}p" ${PROJ_DIR}/scripts/instances.txt)
|
||||||
|
#DEST="${PROJ_DIR}/benchmark"
|
||||||
|
DEST="${HOME}/scratch/uc"
|
||||||
|
RESULTS_DIR="${DEST}/results_${MODE}"
|
||||||
|
NUM_SAMPLES=1
|
||||||
|
|
||||||
|
if [ $MODE == "sparse" ] || [ $MODE == "default" ] || [ $MODE == "tight" ]
|
||||||
|
then
|
||||||
|
echo "Running task $SLURM_ARRAY_TASK_ID for instance $INST with results sent to ${RESULTS_DIR}"
|
||||||
|
else
|
||||||
|
echo "Unrecognized mode: $1. Exiting."
|
||||||
|
exit
|
||||||
|
fi
|
||||||
|
|
||||||
|
cd ${PROJ_DIR}/benchmark
|
||||||
|
mkdir -p $(dirname ${RESULTS_DIR}/${INST})
|
||||||
|
for i in $(seq ${NUM_SAMPLES}); do
|
||||||
|
FILE=$INST.$i
|
||||||
|
#echo "Running $FILE at `date` using command julia --project=${PROJ_DIR}/benchmark --sysimage=${PROJ_DIR}/build/sysimage.so ${PROJ_DIR}/benchmark/run.jl ${FILE} ${MODE} ${RESULTS_DIR} 2&>1 | cat > ${RESULTS_DIR}/${FILE}.log"
|
||||||
|
#julia --project=${PROJ_DIR}/benchmark --sysimage=${PROJ_DIR}/build/sysimage.so ${PROJ_DIR}/benchmark/run.jl ${FILE} ${MODE} ${RESULTS_DIR} 2&>1 | cat > ${RESULTS_DIR}/${FILE}.log
|
||||||
|
echo "Running $FILE at `date` using command julia --project=${PROJ_DIR}/benchmark --sysimage=${PROJ_DIR}/build/sysimage.so ${PROJ_DIR}/benchmark/run.jl ${FILE} ${MODE} ${RESULTS_DIR} &> ${RESULTS_DIR}/${FILE}.log"
|
||||||
|
julia --project=${PROJ_DIR}/benchmark --sysimage=${PROJ_DIR}/build/sysimage.so ${PROJ_DIR}/benchmark/run.jl ${FILE} ${MODE} ${RESULTS_DIR} &> ${RESULTS_DIR}/${FILE}.log
|
||||||
|
#julia --project=${PROJ_DIR}/benchmark --sysimage=${PROJ_DIR}/build/sysimage.so ${PROJ_DIR}/benchmark/run.jl ${FILE} ${MODE} ${RESULTS_DIR}
|
||||||
|
done
|
||||||
@ -0,0 +1,46 @@
|
|||||||
|
##################################################
|
||||||
|
# Component types
|
||||||
|
abstract type UCComponentType end
|
||||||
|
abstract type RequiredConstraints <: UCComponentType end
|
||||||
|
abstract type SystemConstraints <: UCComponentType end
|
||||||
|
abstract type GenerationLimits <: UCComponentType end
|
||||||
|
abstract type PiecewiseProduction <: UCComponentType end
|
||||||
|
abstract type UpDownTime <: UCComponentType end
|
||||||
|
abstract type ReserveConstraints <: UCComponentType end
|
||||||
|
abstract type RampLimits <: UCComponentType end
|
||||||
|
abstract type StartupCosts <: UCComponentType end
|
||||||
|
abstract type ShutdownCosts <: UCComponentType end
|
||||||
|
|
||||||
|
##################################################
|
||||||
|
# Components
|
||||||
|
"""
|
||||||
|
Generic component of the unit commitment problem.
|
||||||
|
|
||||||
|
Elements
|
||||||
|
===
|
||||||
|
* `name`: name of the component
|
||||||
|
* `description`: gives a brief summary of what the component adds
|
||||||
|
* `type`: reference back to the UCComponentType being modeled
|
||||||
|
* `vars`: required variables
|
||||||
|
* `constrs`: constraints that are created by this function
|
||||||
|
* `add_component`: function to add constraints and update the objective to capture this component
|
||||||
|
* `params`: extra parameters the component might use
|
||||||
|
"""
|
||||||
|
mutable struct UCComponent
|
||||||
|
"Name of the component."
|
||||||
|
name::String
|
||||||
|
"Description of what the component adds."
|
||||||
|
description::String
|
||||||
|
"Which part of the unit commitment problem is modeled by this component."
|
||||||
|
type::Type{<:UCComponentType}
|
||||||
|
"Variables that are needed for the component (subset of `var_list`)."
|
||||||
|
vars::Union{Array{Symbol},Nothing}
|
||||||
|
"Equations that are modified for the component (subset of `constr_list`)."
|
||||||
|
constrs::Union{Array{Symbol},Nothing}
|
||||||
|
"Function to add constraints and objective coefficients needed for this component to the model. Signature should be (component, mip, model)."
|
||||||
|
add_component::Union{Function,Nothing}
|
||||||
|
"Extra parameters for the component."
|
||||||
|
params::Any
|
||||||
|
end # struct UCComponent
|
||||||
|
|
||||||
|
export UCComponent
|
||||||
@ -0,0 +1,31 @@
|
|||||||
|
##################################################
|
||||||
|
# Constraints
|
||||||
|
"""
|
||||||
|
List of constraints that the model will potentially have
|
||||||
|
"""
|
||||||
|
constr_list =
|
||||||
|
[
|
||||||
|
:startup_choose,
|
||||||
|
:startup_restrict,
|
||||||
|
:segprod_limit,
|
||||||
|
:segprod_limita,
|
||||||
|
:segprod_limitb,
|
||||||
|
:prod_above_def,
|
||||||
|
:prod_limit,
|
||||||
|
:str_prod_limit,
|
||||||
|
:binary_link,
|
||||||
|
:switch_on_off,
|
||||||
|
:ramp_up,
|
||||||
|
:ramp_down,
|
||||||
|
:str_ramp_up,
|
||||||
|
:str_ramp_down,
|
||||||
|
:startstop_limit,
|
||||||
|
:startup_limit,
|
||||||
|
:shutdown_limit,
|
||||||
|
:min_uptime,
|
||||||
|
:min_downtime,
|
||||||
|
:power_balance,
|
||||||
|
:net_injection_def,
|
||||||
|
:min_reserve
|
||||||
|
]
|
||||||
|
|
||||||
File diff suppressed because it is too large
Load Diff
@ -0,0 +1,475 @@
|
|||||||
|
# UnitCommitment.jl: Optimization Package for Security-Constrained Unit Commitment
|
||||||
|
# Copyright (C) 2020, UChicago Argonne, LLC. All rights reserved.
|
||||||
|
# Released under the modified BSD license. See COPYING.md for more details.
|
||||||
|
# Writen by Alinson S. Xavier <axavier@anl.gov>
|
||||||
|
|
||||||
|
using JuMP, MathOptInterface, DataStructures
|
||||||
|
import JuMP: value, fix, set_name
|
||||||
|
|
||||||
|
# Extend some JuMP functions so that decision variables can be safely replaced by
|
||||||
|
# (constant) floating point numbers.
|
||||||
|
function value(x::Float64)
|
||||||
|
x
|
||||||
|
end
|
||||||
|
|
||||||
|
function fix(x::Float64, v::Float64; force)
|
||||||
|
abs(x - v) < 1e-6 || error("Value mismatch: $x != $v")
|
||||||
|
end
|
||||||
|
|
||||||
|
function set_name(x::Float64, n::String)
|
||||||
|
# nop
|
||||||
|
end
|
||||||
|
|
||||||
|
|
||||||
|
"""
|
||||||
|
Create a JuMP model using the variables and constraints defined by
|
||||||
|
the collection of `UCComponent`s in `formulation`.
|
||||||
|
|
||||||
|
Parameters
|
||||||
|
===
|
||||||
|
* `isf`: injection shift factors
|
||||||
|
* `lodf`: line outage distribution factors
|
||||||
|
"""
|
||||||
|
function build_model(;
|
||||||
|
filename::Union{String, Nothing}=nothing,
|
||||||
|
instance::Union{UnitCommitmentInstance, Nothing}=nothing,
|
||||||
|
isf::Union{Array{Float64,2}, Nothing}=nothing,
|
||||||
|
lodf::Union{Array{Float64,2}, Nothing}=nothing,
|
||||||
|
isf_cutoff::Float64=0.005,
|
||||||
|
lodf_cutoff::Float64=0.001,
|
||||||
|
optimizer=nothing,
|
||||||
|
model=nothing,
|
||||||
|
variable_names::Bool=false,
|
||||||
|
formulation::Vector{UCComponent} = UnitCommitment.DefaultFormulation,
|
||||||
|
) :: UnitCommitmentModel2
|
||||||
|
|
||||||
|
if (filename == nothing) && (instance == nothing)
|
||||||
|
error("Either filename or instance must be specified")
|
||||||
|
end
|
||||||
|
|
||||||
|
if filename != nothing
|
||||||
|
@info "Reading: $(filename)"
|
||||||
|
time_read = @elapsed begin
|
||||||
|
instance = UnitCommitment.read(filename)
|
||||||
|
end
|
||||||
|
@info @sprintf("Read problem in %.2f seconds", time_read)
|
||||||
|
end
|
||||||
|
|
||||||
|
if length(instance.buses) == 1
|
||||||
|
isf = zeros(0, 0)
|
||||||
|
lodf = zeros(0, 0)
|
||||||
|
else
|
||||||
|
if isf == nothing
|
||||||
|
@info "Computing injection shift factors..."
|
||||||
|
time_isf = @elapsed begin
|
||||||
|
isf = UnitCommitment.injection_shift_factors(lines=instance.lines,
|
||||||
|
buses=instance.buses)
|
||||||
|
end
|
||||||
|
@info @sprintf("Computed ISF in %.2f seconds", time_isf)
|
||||||
|
|
||||||
|
@info "Computing line outage factors..."
|
||||||
|
time_lodf = @elapsed begin
|
||||||
|
lodf = UnitCommitment.line_outage_factors(lines=instance.lines,
|
||||||
|
buses=instance.buses,
|
||||||
|
isf=isf)
|
||||||
|
end
|
||||||
|
@info @sprintf("Computed LODF in %.2f seconds", time_lodf)
|
||||||
|
|
||||||
|
@info @sprintf("Applying PTDF and LODF cutoffs (%.5f, %.5f)", isf_cutoff, lodf_cutoff)
|
||||||
|
isf[abs.(isf) .< isf_cutoff] .= 0
|
||||||
|
lodf[abs.(lodf) .< lodf_cutoff] .= 0
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
@info "Building model..."
|
||||||
|
time_model = @elapsed begin
|
||||||
|
if model == nothing
|
||||||
|
if optimizer == nothing
|
||||||
|
mip = Model()
|
||||||
|
else
|
||||||
|
mip = Model(optimizer)
|
||||||
|
end
|
||||||
|
else
|
||||||
|
mip = model
|
||||||
|
end
|
||||||
|
@info "About to build model"
|
||||||
|
model = UnitCommitmentModel2(mip, # JuMP.Model
|
||||||
|
DotDict(), # vars
|
||||||
|
DotDict(), # eqs
|
||||||
|
DotDict(), # exprs
|
||||||
|
instance, # UnitCommitmentInstance
|
||||||
|
isf, # injection shift factors
|
||||||
|
lodf, # line outage distribution factors
|
||||||
|
AffExpr(), # obj
|
||||||
|
formulation, # formulation
|
||||||
|
)
|
||||||
|
|
||||||
|
# Prepare variables
|
||||||
|
for var in get_required_variables(formulation)
|
||||||
|
add_variable(mip, model, instance, UnitCommitment.var_list[var])
|
||||||
|
end # prepare variables
|
||||||
|
|
||||||
|
# Prepare constraints
|
||||||
|
for constr in get_required_constraints(formulation)
|
||||||
|
add_constraint(mip, model, instance, constr)
|
||||||
|
end # prepare constraints
|
||||||
|
|
||||||
|
# Prepare expressions (in this case, affine expressions that are later used as part of constraints or objective)
|
||||||
|
# * :startup_cost => contribution to objective of startup costs
|
||||||
|
for field in [:startup_cost] #[:net_injection]
|
||||||
|
setproperty!(model.exprs, field, OrderedDict())
|
||||||
|
end
|
||||||
|
|
||||||
|
# Add components to mip
|
||||||
|
for c in formulation
|
||||||
|
c.add_component(c, mip, model)
|
||||||
|
end
|
||||||
|
|
||||||
|
# Add objective function
|
||||||
|
build_obj_function!(model)
|
||||||
|
end # end timing of building model
|
||||||
|
@info @sprintf("Built model in %.2f seconds", time_model)
|
||||||
|
|
||||||
|
if variable_names
|
||||||
|
set_variable_names!(model)
|
||||||
|
end
|
||||||
|
|
||||||
|
return model
|
||||||
|
end # build_model
|
||||||
|
|
||||||
|
|
||||||
|
"""
|
||||||
|
Add a particular variable to `model.vars`.
|
||||||
|
"""
|
||||||
|
function add_variable(mip::JuMP.Model,
|
||||||
|
model::UnitCommitmentModel2,
|
||||||
|
instance::UnitCommitmentInstance,
|
||||||
|
var::UCVariable)
|
||||||
|
setproperty!(model.vars, var.name, OrderedDict())
|
||||||
|
x = getproperty(model.vars, var.name)
|
||||||
|
if !isnothing(var.add_variable)
|
||||||
|
var.add_variable(var, x, mip, instance)
|
||||||
|
return
|
||||||
|
end
|
||||||
|
|
||||||
|
# The following is a bit complex-looking, but the idea is ultimately straightforward
|
||||||
|
# We want to loop over the possible index values for var,
|
||||||
|
# for every dimension of var (e.g., looping over units and time)
|
||||||
|
# The OrderedDict `ind_to_field` maps a UCElement to the corresponding field name within a UnitCommitmentInstance
|
||||||
|
# NB: this can be an array of field names, such as [:x, :y], which means we want to access instance.x.y
|
||||||
|
# Furthermore, `var` has an array `indices` of UCElement values, describing which index loops over
|
||||||
|
# So all we want is to extract the _length_ of the corresponding field of `instance`
|
||||||
|
# We create a Tuple so we can feed it to CartesianIndices
|
||||||
|
fields = UnitCommitment.ind_to_field(var.indices)
|
||||||
|
num_indices = UnitCommitment.num_indices(fields)
|
||||||
|
|
||||||
|
# There is some really complicated logic below that one day needs to be improved
|
||||||
|
# (we need to handle nested indices, and this is one way that hopefully works, but it is definitely not intuitive)
|
||||||
|
loop_primitive = UnitCommitment.loop_over_indices(UnitCommitment.get_indices_tuple(instance, fields))
|
||||||
|
indices = UnitCommitment.get_indices(loop_primitive) # returns an array of tuples? or a unit range maybe.
|
||||||
|
|
||||||
|
for ind in indices
|
||||||
|
# For each of the indices, check if the field corresponding to that index has a name
|
||||||
|
# Then we will index the variable by that name instead of the integer
|
||||||
|
curr_tuple = Tuple(ind)
|
||||||
|
new_tuple = ()
|
||||||
|
for i in 1:num_indices
|
||||||
|
curr_field = UnitCommitment.get_nested_field(instance, fields, i, curr_tuple)
|
||||||
|
if :name in propertynames(curr_field)
|
||||||
|
new_tuple = (new_tuple..., curr_field.name)
|
||||||
|
else
|
||||||
|
new_tuple = (new_tuple..., curr_tuple[i])
|
||||||
|
end
|
||||||
|
end
|
||||||
|
name = string(var.name, "[")
|
||||||
|
for (i,val) in enumerate(new_tuple)
|
||||||
|
name = string(name, val, i < num_indices ? "," : "")
|
||||||
|
end
|
||||||
|
name = string(name, "]")
|
||||||
|
if num_indices == 1
|
||||||
|
new_tuple = new_tuple[1]
|
||||||
|
end
|
||||||
|
x[new_tuple] = @variable(mip,
|
||||||
|
lower_bound=var.lb,
|
||||||
|
upper_bound=var.ub,
|
||||||
|
integer=var.integer,
|
||||||
|
base_name=name)
|
||||||
|
end
|
||||||
|
### DEBUG
|
||||||
|
#if var.name == :reserve_shortfall
|
||||||
|
# @show var.name, num_indices, loop_primitive, indices, x
|
||||||
|
# #@show JuMP.all_variables(mip)
|
||||||
|
#end
|
||||||
|
### DEBUG
|
||||||
|
end # add_variable
|
||||||
|
|
||||||
|
|
||||||
|
"""
|
||||||
|
Add constraint to `model.eqs` (set of affine expressions represent left-hand side of constraints).
|
||||||
|
"""
|
||||||
|
function add_constraint(mip::JuMP.Model,
|
||||||
|
model::UnitCommitmentModel2,
|
||||||
|
instance::UnitCommitmentInstance,
|
||||||
|
constr::Symbol)
|
||||||
|
setproperty!(model.eqs, constr, OrderedDict())
|
||||||
|
end # add_constraint
|
||||||
|
|
||||||
|
|
||||||
|
"""
|
||||||
|
Components of the objective include, summed over time:
|
||||||
|
* production cost above minimum
|
||||||
|
* minimum production cost if generator is on
|
||||||
|
* startup cost
|
||||||
|
* shutdown cost
|
||||||
|
* cost of not meeting shortfall
|
||||||
|
* penalty for not meeting or exceeding load (using curtai variable)
|
||||||
|
* shutdown cost
|
||||||
|
"""
|
||||||
|
function build_obj_function!(model::UnitCommitmentModel2)
|
||||||
|
@objective(model.mip, Min, model.obj)
|
||||||
|
end # build_obj_function
|
||||||
|
|
||||||
|
|
||||||
|
function enforce_transmission(;
|
||||||
|
model::UnitCommitmentModel2,
|
||||||
|
violation::Violation,
|
||||||
|
isf::Array{Float64,2},
|
||||||
|
lodf::Array{Float64,2})::Nothing
|
||||||
|
|
||||||
|
instance, mip, vars = model.instance, model.mip, model.vars
|
||||||
|
limit::Float64 = 0.0
|
||||||
|
|
||||||
|
if violation.outage_line == nothing
|
||||||
|
limit = violation.monitored_line.normal_flow_limit[violation.time]
|
||||||
|
@info @sprintf(" %8.3f MW overflow in %-5s time %3d (pre-contingency)",
|
||||||
|
violation.amount,
|
||||||
|
violation.monitored_line.name,
|
||||||
|
violation.time)
|
||||||
|
else
|
||||||
|
limit = violation.monitored_line.emergency_flow_limit[violation.time]
|
||||||
|
@info @sprintf(" %8.3f MW overflow in %-5s time %3d (outage: line %s)",
|
||||||
|
violation.amount,
|
||||||
|
violation.monitored_line.name,
|
||||||
|
violation.time,
|
||||||
|
violation.outage_line.name)
|
||||||
|
end
|
||||||
|
|
||||||
|
fm = violation.monitored_line.name
|
||||||
|
t = violation.time
|
||||||
|
flow = @variable(mip, base_name="flow[$fm,$t]")
|
||||||
|
|
||||||
|
# |flow| <= limit + overflow
|
||||||
|
overflow = vars.overflow[violation.monitored_line.name, violation.time]
|
||||||
|
@constraint(mip, flow <= limit + overflow)
|
||||||
|
@constraint(mip, -flow <= limit + overflow)
|
||||||
|
|
||||||
|
if violation.outage_line == nothing
|
||||||
|
@constraint(mip, flow == sum(vars.net_injection[b.name, violation.time] *
|
||||||
|
isf[violation.monitored_line.offset, b.offset]
|
||||||
|
for b in instance.buses
|
||||||
|
if b.offset > 0))
|
||||||
|
else
|
||||||
|
@constraint(mip, flow == sum(vars.net_injection[b.name, violation.time] * (
|
||||||
|
isf[violation.monitored_line.offset, b.offset] + (
|
||||||
|
lodf[violation.monitored_line.offset, violation.outage_line.offset] *
|
||||||
|
isf[violation.outage_line.offset, b.offset]
|
||||||
|
)
|
||||||
|
)
|
||||||
|
for b in instance.buses
|
||||||
|
if b.offset > 0))
|
||||||
|
end
|
||||||
|
nothing
|
||||||
|
end # enforce_transmission
|
||||||
|
|
||||||
|
|
||||||
|
function set_variable_names!(model::UnitCommitmentModel2)
|
||||||
|
@info "Setting variable and constraint names..."
|
||||||
|
time_varnames = @elapsed begin
|
||||||
|
#set_jump_names!(model.vars) # amk: already set
|
||||||
|
set_jump_names!(model.eqs)
|
||||||
|
end
|
||||||
|
@info @sprintf("Set names in %.2f seconds", time_varnames)
|
||||||
|
end # set_variable_names
|
||||||
|
|
||||||
|
|
||||||
|
function set_jump_names!(dict)
|
||||||
|
for name in keys(dict)
|
||||||
|
for idx in keys(dict[name])
|
||||||
|
idx_str = isa(idx, Tuple) ? join(map(string, idx), ",") : idx
|
||||||
|
set_name(dict[name][idx], "$name[$idx_str]")
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end # set_jump_names
|
||||||
|
|
||||||
|
|
||||||
|
function get_solution(model::UnitCommitmentModel2)
|
||||||
|
instance, T = model.instance, model.instance.time
|
||||||
|
function timeseries(vars, collection)
|
||||||
|
return OrderedDict(b.name => [round(value(vars[b.name, t]), digits=5) for t in 1:T]
|
||||||
|
for b in collection)
|
||||||
|
end
|
||||||
|
function production_cost(g)
|
||||||
|
return [value(model.vars.is_on[g.name, t]) * g.min_power_cost[t] +
|
||||||
|
sum(Float64[value(model.vars.segprod[g.name, k, t]) * g.cost_segments[k].cost[t]
|
||||||
|
for k in 1:length(g.cost_segments)])
|
||||||
|
for t in 1:T]
|
||||||
|
end
|
||||||
|
function production(g)
|
||||||
|
return [value(model.vars.is_on[g.name, t]) * g.min_power[t] +
|
||||||
|
sum(Float64[value(model.vars.segprod[g.name, k, t])
|
||||||
|
for k in 1:length(g.cost_segments)])
|
||||||
|
for t in 1:T]
|
||||||
|
end
|
||||||
|
function startup_cost(g)
|
||||||
|
#S = length(g.startup_categories)
|
||||||
|
#return [sum(g.startup_categories[s].cost * value(model.vars.startup[g.name, s, t])
|
||||||
|
# for s in 1:S)
|
||||||
|
# for t in 1:T]
|
||||||
|
return [ value.(model.exprs.startup_cost[g.name, t]) for t in 1:T ]
|
||||||
|
end
|
||||||
|
sol = OrderedDict()
|
||||||
|
sol["Production (MW)"] = OrderedDict(g.name => production(g) for g in instance.units)
|
||||||
|
sol["Production cost (\$)"] = OrderedDict(g.name => production_cost(g) for g in instance.units)
|
||||||
|
sol["Startup cost (\$)"] = OrderedDict(g.name => startup_cost(g) for g in instance.units)
|
||||||
|
sol["Is on"] = timeseries(model.vars.is_on, instance.units)
|
||||||
|
sol["Switch on"] = timeseries(model.vars.switch_on, instance.units)
|
||||||
|
sol["Switch off"] = timeseries(model.vars.switch_off, instance.units)
|
||||||
|
sol["Reserve (MW)"] = timeseries(model.vars.reserve, instance.units)
|
||||||
|
sol["Net injection (MW)"] = timeseries(model.vars.net_injection, instance.buses)
|
||||||
|
sol["Load curtail (MW)"] = timeseries(model.vars.curtail, instance.buses)
|
||||||
|
if !isempty(instance.lines)
|
||||||
|
sol["Line overflow (MW)"] = timeseries(model.vars.overflow, instance.lines)
|
||||||
|
end
|
||||||
|
if !isempty(instance.price_sensitive_loads)
|
||||||
|
sol["Price-sensitive loads (MW)"] = timeseries(model.vars.loads, instance.price_sensitive_loads)
|
||||||
|
end
|
||||||
|
return sol
|
||||||
|
end # get_solution
|
||||||
|
|
||||||
|
|
||||||
|
function fix!(model::UnitCommitmentModel2, solution)::Nothing
|
||||||
|
vars, instance, T = model.vars, model.instance, model.instance.time
|
||||||
|
for g in instance.units
|
||||||
|
for t in 1:T
|
||||||
|
is_on = round(solution["Is on"][g.name][t])
|
||||||
|
production = round(solution["Production (MW)"][g.name][t], digits=5)
|
||||||
|
reserve = round(solution["Reserve (MW)"][g.name][t], digits=5)
|
||||||
|
JuMP.fix(vars.is_on[g.name, t], is_on, force=true)
|
||||||
|
JuMP.fix(vars.prod_above[g.name, t], production - is_on * g.min_power[t], force=true)
|
||||||
|
JuMP.fix(vars.reserve[g.name, t], reserve, force=true)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end # fix!
|
||||||
|
|
||||||
|
|
||||||
|
function set_warm_start!(model::UnitCommitmentModel2, solution)::Nothing
|
||||||
|
vars, instance, T = model.vars, model.instance, model.instance.time
|
||||||
|
for g in instance.units
|
||||||
|
for t in 1:T
|
||||||
|
JuMP.set_start_value(vars.is_on[g.name, t], solution["Is on"][g.name][t])
|
||||||
|
JuMP.set_start_value(vars.switch_on[g.name, t], solution["Switch on"][g.name][t])
|
||||||
|
JuMP.set_start_value(vars.switch_off[g.name, t], solution["Switch off"][g.name][t])
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end # set_warm_start
|
||||||
|
|
||||||
|
|
||||||
|
function optimize!(model::UnitCommitmentModel2;
|
||||||
|
time_limit=3600,
|
||||||
|
gap_limit=1e-4,
|
||||||
|
two_phase_gap=true,
|
||||||
|
)::Nothing
|
||||||
|
|
||||||
|
function set_gap(gap)
|
||||||
|
try
|
||||||
|
JuMP.set_optimizer_attribute(model.mip, "MIPGap", gap)
|
||||||
|
@info @sprintf("MIP gap tolerance set to %f", gap)
|
||||||
|
catch
|
||||||
|
@warn "Could not change MIP gap tolerance"
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
instance = model.instance
|
||||||
|
initial_time = time()
|
||||||
|
|
||||||
|
large_gap = false
|
||||||
|
has_transmission = (length(model.isf) > 0)
|
||||||
|
|
||||||
|
if has_transmission && two_phase_gap
|
||||||
|
set_gap(1e-2)
|
||||||
|
large_gap = true
|
||||||
|
else
|
||||||
|
set_gap(gap_limit)
|
||||||
|
end
|
||||||
|
|
||||||
|
while true
|
||||||
|
time_elapsed = time() - initial_time
|
||||||
|
time_remaining = time_limit - time_elapsed
|
||||||
|
if time_remaining < 0
|
||||||
|
@info "Time limit exceeded"
|
||||||
|
break
|
||||||
|
end
|
||||||
|
|
||||||
|
@info @sprintf("Setting MILP time limit to %.2f seconds", time_remaining)
|
||||||
|
JuMP.set_time_limit_sec(model.mip, time_remaining)
|
||||||
|
|
||||||
|
@info "Solving MILP..."
|
||||||
|
JuMP.optimize!(model.mip)
|
||||||
|
|
||||||
|
has_transmission || break
|
||||||
|
|
||||||
|
violations = find_violations(model)
|
||||||
|
if isempty(violations)
|
||||||
|
@info "No violations found"
|
||||||
|
if large_gap
|
||||||
|
large_gap = false
|
||||||
|
set_gap(gap_limit)
|
||||||
|
else
|
||||||
|
break
|
||||||
|
end
|
||||||
|
else
|
||||||
|
enforce_transmission(model, violations)
|
||||||
|
end
|
||||||
|
end
|
||||||
|
|
||||||
|
nothing
|
||||||
|
end # optimize!
|
||||||
|
|
||||||
|
|
||||||
|
"""
|
||||||
|
Identify which transmission lines are violated.
|
||||||
|
See find_violations description from screening.jl.
|
||||||
|
"""
|
||||||
|
function find_violations(model::UnitCommitmentModel2)
|
||||||
|
instance, vars = model.instance, model.vars
|
||||||
|
length(instance.buses) > 1 || return []
|
||||||
|
violations = []
|
||||||
|
@info "Verifying transmission limits..."
|
||||||
|
time_screening = @elapsed begin
|
||||||
|
non_slack_buses = [b for b in instance.buses if b.offset > 0]
|
||||||
|
net_injections = [value(vars.net_injection[b.name, t])
|
||||||
|
for b in non_slack_buses, t in 1:instance.time]
|
||||||
|
overflow = [value(vars.overflow[lm.name, t])
|
||||||
|
for lm in instance.lines, t in 1:instance.time]
|
||||||
|
violations = UnitCommitment.find_violations(instance=instance,
|
||||||
|
net_injections=net_injections,
|
||||||
|
overflow=overflow,
|
||||||
|
isf=model.isf,
|
||||||
|
lodf=model.lodf)
|
||||||
|
end
|
||||||
|
@info @sprintf("Verified transmission limits in %.2f seconds", time_screening)
|
||||||
|
return violations
|
||||||
|
end # find_violations
|
||||||
|
|
||||||
|
|
||||||
|
function enforce_transmission(model::UnitCommitmentModel2, violations::Array{Violation, 1})
|
||||||
|
for v in violations
|
||||||
|
enforce_transmission(model=model,
|
||||||
|
violation=v,
|
||||||
|
isf=model.isf,
|
||||||
|
lodf=model.lodf)
|
||||||
|
end
|
||||||
|
end # enforce_transmission
|
||||||
|
|
||||||
|
|
||||||
|
export UnitCommitmentModel2, build_model, get_solution, optimize!
|
||||||
Loading…
Reference in new issue