steelT.sa1a

steelT.sa1a

solve;

display total_profit >steelT.sens;

commands steelT.sa1b;

let avail[3] := avail[3] + 5;