Clarify intlinprog bug workarounds in tests and examples.

Author: rdzman

lib/t/most_ex6_uc.m

@@ -72,11 +72,13 @@ function most_ex6_uc(quiet)
     mpopt = mpoption(mpopt, 'intlinprog.TolGapAbs', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolGapRel', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolInteger', 1e-6);
-    %% next line is to work around a bug in intlinprog
-    % (Technical Support Case #01841662)
-    % (except actually in this case it triggers it rather than working
-    %  around it, so we comment it out)
-    %mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+%     if have_feature('intlinprog', 'vnum') < 24
+%         %% next line is to work around a bug in intlinprog < R2024a
+%         % (Technical Support Case #01841662)
+%         % (except actually in this case it triggers it rather than working
+%         %  around it, so we comment it out)
+%         mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+%     end
 end
 
 casefile = 'ex_case3b';

lib/t/most_ex7_suc.m

@@ -72,9 +72,13 @@ function most_ex7_suc(quiet)
     mpopt = mpoption(mpopt, 'intlinprog.TolGapAbs', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolGapRel', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolInteger', 1e-6);
-    %% next line is to work around a bug in intlinprog
-    % (Technical Support Case #01841662)
-    mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    if have_feature('intlinprog', 'vnum') < 24
+        %% next line is to work around a bug in intlinprog < R2024a
+        % (Technical Support Case #01841662)
+        % (except actually in this case it triggers it rather than working
+        %  around it, so we comment it out)
+        mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    end
 end
 
 casefile = 'ex_case3b';

lib/t/t_most_30b_1_1_0_uc.m

@@ -31,9 +31,13 @@ function t_most_30b_1_1_0_uc(quiet)
     mpopt = mpoption(mpopt, 'intlinprog.TolGapAbs', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolGapRel', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolInteger', 1e-6);
-    %% next line is to work around a bug in intlinprog
-    % (Technical Support Case #01841662)
-    mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    if have_feature('intlinprog', 'vnum') < 24
+        %% next line is to work around a bug in intlinprog < R2024a
+        % (Technical Support Case #01841662)
+        % (except actually in this case it triggers it rather than working
+        %  around it, so we comment it out)
+        mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    end
 end
 mpoptac = mpoption(mpopt, 'model', 'AC');
 mpoptdc = mpoption(mpopt, 'model', 'DC');

lib/t/t_most_spuc.m

@@ -107,9 +107,13 @@ function t_most_spuc(quiet, create_plots, create_pdfs, savedir)
     mpopt = mpoption(mpopt, 'intlinprog.TolGapAbs', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolGapRel', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolInteger', 1e-6);
-    %% next line is to work around a bug in intlinprog
-    % (Technical Support Case #01841662)
-    mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    if have_feature('intlinprog', 'vnum') < 24
+        %% next line is to work around a bug in intlinprog < R2024a
+        % (Technical Support Case #01841662)
+        % (except actually in this case it triggers it rather than working
+        %  around it, so we comment it out)
+        mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    end
 end
 if ~verbose
     mpopt = mpoption(mpopt, 'out.all', 0);

lib/t/t_most_suc.m

@@ -128,9 +128,13 @@ function t_most_suc(quiet, create_plots, create_pdfs, savedir)
     mpopt = mpoption(mpopt, 'intlinprog.TolGapAbs', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolGapRel', 0);
     mpopt = mpoption(mpopt, 'intlinprog.TolInteger', 1e-6);
-    %% next line is to work around a bug in intlinprog
-    % (Technical Support Case #01841662)
-    mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    if have_feature('intlinprog', 'vnum') < 24
+        %% next line is to work around a bug in intlinprog < R2024a
+        % (Technical Support Case #01841662)
+        % (except actually in this case it triggers it rather than working
+        %  around it, so we comment it out)
+        mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
+    end
 end
 if ~verbose
     mpopt = mpoption(mpopt, 'out.all', 0);

lib/t/t_most_uc.m

@@ -132,16 +132,20 @@ function t_most_uc(quiet, create_plots, create_pdfs, savedir)
         %mpopt = mpoption(mpopt, 'intlinprog.RootLPAlgorithm', 'primal-simplex');
         mpopt = mpoption(mpopt, 'intlinprog.RootLPAlgorithm', 'dual-simplex');
         mpopt = mpoption(mpopt, 'intlinprog.TolInteger', 1e-6);
-        %% next line is to work around a bug in intlinprog
+        %% next line is to work around a bug in intlinprog < R2024a
         % (Technical Support Case #01841662)
         % (except actually in this case it triggers it rather than working
         %  around it, so we comment it out)
         %mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
     elseif have_feature('intlinprog', 'vnum') == 24.001
+        %% next line is to work around a bug in intlinprog R2024a
+        % (Technical Support Case #06920417)
         mpopt = mpoption(mpopt, 'intlinprog.LPPreprocess', 'none');
         s2 = warning('query', 'optim:intlinprog:IgnoreOptions');
         warning('off', 'optim:intlinprog:IgnoreOptions');
     elseif have_feature('intlinprog', 'vnum') == 24.002
+        %% next line is to work around a bug in intlinprog R2024b
+        % (Technical Support Case #07325794)
         mpopt = mpoption(mpopt, 'intlinprog.Presolve', 'off');
     end
 end