Operational Remediation Reports

Capacity Shift Report

Pick a Reserve Action

A capacity remediation report can turn remaining reserve into a small action label without depending on host metrics.

Program

Play the program to choose reserve and inspect the capacity action.

reserve
capacity_shift_report.f90
Replay: real traced execution (multi-file project)
program capacity_shift_report_demo
    implicit none
    integer :: reserve
    character(len=8) :: action

    reserve = 8
    if (reserve >= 15) then
        action = 'hold'
    else if (reserve >= 8) then
        action = 'shift'
    else
        action = 'shed'
    end if
    print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)
end program capacity_shift_report_demo

program capacity_shift_report_demo
    implicit none
    integer :: reserve
    character(len=8) :: action

    reserve = 4
    if (reserve >= 15) then
        action = 'hold'
    else if (reserve >= 8) then
        action = 'shift'
    else
        action = 'shed'
    end if
    print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)
end program capacity_shift_report_demo

program capacity_shift_report_demo
    implicit none
    integer :: reserve
    character(len=8) :: action

    reserve = 16
    if (reserve >= 15) then
        action = 'hold'
    else if (reserve >= 8) then
        action = 'shift'
    else
        action = 'shed'
    end if
    print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)
end program capacity_shift_report_demo

  1. reserve ← 8

    6reserve = 87if (reserve >= 15) then
    values this step8reserve

  2. if (reserve >= 15) then

    6reserve = 87if (reserve >= 15) then8    action = 'hold'
    values this step8reserve

  3. else if (reserve >= 8) then

    8    action = 'hold'9else if (reserve >= 8) then10    action = 'shift'
    values this step8reserve

  4. action ← shift

    9else if (reserve >= 8) then10    action = 'shift'11else
    values this stepshiftaction

  5. print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)

    13    end if14    print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)15end program capacity_shift_report_demo
    outputreserve=8 shift
    values this step8reserveshiftaction

  1. reserve ← 4

    6reserve = 47if (reserve >= 15) then
    values this step4reserve

  2. if (reserve >= 15) then

    6reserve = 47if (reserve >= 15) then8    action = 'hold'
    values this step4reserve

  3. else if (reserve >= 8) then

    8    action = 'hold'9else if (reserve >= 8) then10    action = 'shift'
    values this step4reserve

  4. action ← shed

    11else12    action = 'shed'13end if
    values this stepshedaction

  5. print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)

    13    end if14    print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)15end program capacity_shift_report_demo
    outputreserve=4 shed
    values this step4reserveshedaction

  1. reserve ← 16

    6reserve = 167if (reserve >= 15) then
    values this step16reserve

  2. if (reserve >= 15) then

    6reserve = 167if (reserve >= 15) then8    action = 'hold'
    values this step16reserve

  3. action ← hold

    7if (reserve >= 15) then8    action = 'hold'9else if (reserve >= 8) then
    values this stepholdaction

  4. print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)

    13    end if14    print '(A, I0, 1X, A)', 'reserve=', reserve, trim(action)15end program capacity_shift_report_demo
    outputreserve=16 hold
    values this step16reserveholdaction
reserve selector `reserve` is a scalar report signal that stays simple enough for deterministic replay variants.
remediation tiers Higher reserve can hold steady, medium reserve shifts load, and low reserve sheds optional work.
operator output The report line exposes both the numeric reserve and the action label.