Guest User

Untitled

a guest
Apr 12th, 2020
61
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.54 KB | None | 0 0
  1. let x_L = [1.0, 1.0, 1.0, 1.0]
  2. let x_U = [5.0, 5.0, 5.0, 5.0]
  3. proc eval_f_12805296(n`gensym12805297: Index; x`gensym12805298: ptr Number;
  4. new_x`gensym12805299: Bool;
  5. obj_value`gensym12805300: ptr Number;
  6. user_data`gensym12805301: UserDataPtr): Bool {.cdecl, exportc.} =
  7. result =
  8. ## Callback function for evaluating objective function
  9. let x = cast[ptr UncheckedArray[Number]](x`gensym12805298)
  10. obj_value`gensym12805300[] = x[0] * x[3] * (x[0] + x[1] + x[2]) + x[2]
  11. 1
Advertisement
Add Comment
Please, Sign In to add comment