model steelT.mod;
data steelT.dat;

for {1..4} {
   solve;

   display total_profit >steelT.sens;

   option display_1col 0;
   option omit_zero_rows 0;
   display Make >steelT.sens;
   display Sell >steelT.sens;

   option display_1col 20;
   option omit_zero_rows 1;
   display Inv >steelT.sens;

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