getdualray
| getdualray | 
  Purpose
 
 
 Get a dual ray for an infeasible problem.
 
 
  Synopsis
 
  function getdualray(ray:array(set of linctr) of real):boolean 
 
  Argument
 
 | 
     ray 
     | 
     An array of reals over all constraints in the problem (as loaded) in which the dual ray is returned.
     | 
  Return value
 
 
 This procedure returns the dual ray found for the problem if the problem is found to be dual unbounded (thus primal infeasible) and one is available.
 
  Example
 
 declarations
 all_constraints : set of linctr
 dual_ray : array(all_constraints) of real
end-declarations
if getprobstat <> XPRS_INF then
  writeln("Problem not infeasible.")
else
  HasRay := getdualray(dual_ray)
  if HasRay then
   writeln("Dual ray:")
   forall (c in all_constraints)
     writeln(getname(c), " ", dual_ray(c))
  else
   writeln("No dual ray was found")
  end-if
end-if
  Further information
 
 
 1. The return value of the function is true if a dual ray is available, and false otherwise.
 
 
 2. The dimension and base set of the
 ray argument will be set up by the function.
 
 
  Related topics
 
  
  Module
 
  
