casadi_bound_consistency.hpp
1 //
2 // MIT No Attribution
3 //
4 // Copyright (C) 2010-2023 Joel Andersson, Joris Gillis, Moritz Diehl, KU Leuven.
5 //
6 // Permission is hereby granted, free of charge, to any person obtaining a copy of this
7 // software and associated documentation files (the "Software"), to deal in the Software
8 // without restriction, including without limitation the rights to use, copy, modify,
9 // merge, publish, distribute, sublicense, and/or sell copies of the Software, and to
10 // permit persons to whom the Software is furnished to do so.
11 //
12 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED,
13 // INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A
14 // PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
15 // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
16 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
17 // SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
18 //
19 
20 
21 // C-REPLACE "fmax" "casadi_fmax"
22 // C-REPLACE "fmin" "casadi_fmin"
23 // C-REPLACE "std::isinf" "casadi_isinf"
24 
25 // SYMBOL "bound_consistency"
26 template<typename T1>
27 void casadi_bound_consistency(casadi_int n, T1* x, T1* lam,
28  const T1* lbx, const T1* ubx) {
29  // Local variables
30  casadi_int i;
31  T1 lb, ub;
32  // Loop over variables
33  for (i=0; i<n; ++i) {
34  // Get bounds
35  lb = lbx ? lbx[i] : 0.;
36  ub = ubx ? ubx[i] : 0.;
37  // Make sure bounds are respected
38  x[i] = fmin(fmax(x[i], lb), ub);
39  // Adjust multipliers
40  if (std::isinf(lb) && std::isinf(ub)) {
41  // Both multipliers are infinite
42  lam[i] = 0.;
43  } else if (std::isinf(lb) || x[i] - lb > ub - x[i]) {
44  // Infinite lower bound or closer to upper bound than lower bound
45  lam[i] = fmax(0., lam[i]);
46  } else if (std::isinf(ub) || x[i] - lb < ub - x[i]) {
47  // Infinite upper bound or closer to lower bound than upper bound
48  lam[i] = fmin(0., lam[i]);
49  }
50  }
51 }