Starting an example with torch

bioptim/examples/getting_started/_l4c_generated/l4casadi_f.cpp

@@ -0,0 +1,111 @@
+#include <l4casadi.hpp>
+
+L4CasADi l4casadi("/home/pariterre/Programmation/Technopole/bioptim/bioptim/examples/getting_started/_l4c_generated", "l4casadi_f", 1, 6, 1, 2, "cpu", true, true, true, false, true, false);
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+#include <math.h>
+
+#ifndef casadi_real
+#define casadi_real double
+#endif
+
+#ifndef casadi_int
+#define casadi_int long long int
+#endif
+
+/* Symbol visibility in DLLs */
+#ifndef CASADI_SYMBOL_EXPORT
+  #if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)
+    #if defined(STATIC_LINKED)
+      #define CASADI_SYMBOL_EXPORT
+    #else
+      #define CASADI_SYMBOL_EXPORT __declspec(dllexport)
+    #endif
+  #elif defined(__GNUC__) && defined(GCC_HASCLASSVISIBILITY)
+    #define CASADI_SYMBOL_EXPORT __attribute__ ((visibility ("default")))
+  #else
+    #define CASADI_SYMBOL_EXPORT
+  #endif
+#endif
+
+// Function l4casadi_f
+
+static const casadi_int l4casadi_f_s_in0[3] = { 1, 6, 1};
+static const casadi_int l4casadi_f_s_out0[3] = { 1, 2, 1};
+
+// Only single input, single output is supported at the moment
+CASADI_SYMBOL_EXPORT casadi_int l4casadi_f_n_in(void) { return 1;}
+CASADI_SYMBOL_EXPORT casadi_int l4casadi_f_n_out(void) { return 1;}
+
+CASADI_SYMBOL_EXPORT const casadi_int* l4casadi_f_sparsity_in(casadi_int i) {
+  switch (i) {
+    case 0: return l4casadi_f_s_in0;
+    default: return 0;
+  }
+}
+
+CASADI_SYMBOL_EXPORT const casadi_int* l4casadi_f_sparsity_out(casadi_int i) {
+  switch (i) {
+    case 0: return l4casadi_f_s_out0;
+    default: return 0;
+  }
+}
+
+CASADI_SYMBOL_EXPORT int l4casadi_f(const casadi_real** arg, casadi_real** res, casadi_int* iw, casadi_real* w, int mem){
+  l4casadi.forward(arg[0], res[0]);
+  return 0;
+}
+
+// Jacobian l4casadi_f
+
+CASADI_SYMBOL_EXPORT casadi_int jac_l4casadi_f_n_in(void) { return 2;}
+CASADI_SYMBOL_EXPORT casadi_int jac_l4casadi_f_n_out(void) { return 1;}
+
+CASADI_SYMBOL_EXPORT int jac_l4casadi_f(const casadi_real** arg, casadi_real** res, casadi_int* iw, casadi_real* w, int mem){
+  l4casadi.jac(arg[0], res[0]);
+  return 0;
+}
+
+
+
+// adj1 l4casadi_f
+
+CASADI_SYMBOL_EXPORT casadi_int adj1_l4casadi_f_n_in(void) { return 3;}
+CASADI_SYMBOL_EXPORT casadi_int adj1_l4casadi_f_n_out(void) { return 1;}
+
+CASADI_SYMBOL_EXPORT int adj1_l4casadi_f(const casadi_real** arg, casadi_real** res, casadi_int* iw, casadi_real* w, int mem){
+  // adj1 [i0, out_o0, adj_o0] -> [out_adj_i0]
+  l4casadi.adj1(arg[0], arg[2], res[0]);
+  return 0;
+}
+
+
+// jac_adj1 l4casadi_f
+
+CASADI_SYMBOL_EXPORT casadi_int jac_adj1_l4casadi_f_n_in(void) { return 4;}
+CASADI_SYMBOL_EXPORT casadi_int jac_adj1_l4casadi_f_n_out(void) { return 3;}
+
+CASADI_SYMBOL_EXPORT int jac_adj1_l4casadi_f(const casadi_real** arg, casadi_real** res, casadi_int* iw, casadi_real* w, int mem){
+  // jac_adj1 [i0, out_o0, adj_o0, out_adj_i0] -> [jac_adj_i0_i0, jac_adj_i0_out_o0, jac_adj_i0_adj_o0]
+  if (res[1] != NULL) {
+    l4casadi.invalid_argument("jac_adj_i0_out_o0 is not provided by L4CasADi. If you need this feature, please contact the L4CasADi developer.");
+  }
+  if (res[2] != NULL) {
+    l4casadi.invalid_argument("jac_adj_i0_adj_o0 is not provided by L4CasADi. If you need this feature, please contact the L4CasADi developer.");
+  }
+  if (res[0] == NULL) {
+    l4casadi.invalid_argument("L4CasADi can only provide jac_adj_i0_i0 for jac_adj1_l4casadi_f function. If you need this feature, please contact the L4CasADi developer.");
+  }
+  l4casadi.jac_adj1(arg[0], arg[2], res[0]);
+  return 0;
+}
+
+
+
+
+#ifdef __cplusplus
+} /* extern "C" */
+#endif