26 #ifndef CASADI_FUNCTION_INTERNAL_HPP
27 #define CASADI_FUNCTION_INTERNAL_HPP
29 #include "function.hpp"
32 #include "code_generator.hpp"
33 #include "importer.hpp"
34 #include "options.hpp"
35 #include "shared_object.hpp"
37 #ifdef CASADI_WITH_THREAD
38 #ifdef CASADI_WITH_THREAD_MINGW
39 #include <mingw.mutex.h>
46 #define INPUTSCHEME(name)
49 #define OUTPUTSCHEME(name)
55 std::vector<std::pair<std::string, T>>
zip(
const std::vector<std::string>&
id,
56 const std::vector<T>& mat) {
57 casadi_assert_dev(
id.size()==mat.size());
58 std::vector<std::pair<std::string, T>> r(
id.size());
59 for (casadi_uint i=0; i<r.size(); ++i) r[i] = std::make_pair(
id[i], mat[i]);
68 std::map<std::string, FStats>
fstats;
75 bool added = fstats.insert(std::make_pair(s,
FStats())).second;
76 casadi_assert(added,
"Duplicate stat: '" + s +
"'");
111 void construct(
const Dict& opts);
122 virtual Dict generate_options(
const std::string& target)
const;
127 void print_options(std::ostream &stream)
const;
132 void print_option(
const std::string &name, std::ostream &stream)
const;
137 bool has_option(
const std::string &option_name)
const;
142 virtual void change_option(
const std::string& option_name,
const GenericType& option_value);
152 virtual void init(
const Dict& opts);
160 virtual void finalize();
163 int checkout()
const;
166 void release(
int mem)
const;
169 void* memory(
int ind)
const;
172 bool has_memory(
int ind)
const;
189 virtual int init_mem(
void* mem)
const;
197 virtual Dict get_stats(
void* mem)
const;
207 void print(
const char* fmt, ...)
const;
212 void sprint(
char* buf,
size_t buf_sz,
const char* fmt, ...)
const;
217 void format_time(
char* buffer,
double time)
const;
222 void print_time(
const std::map<std::string, FStats>& fstats)
const;
269 #ifdef CASADI_WITH_THREAD
271 mutable std::mutex mtx_;
276 mutable std::vector<void*> mem_;
279 mutable std::stack<int> unused_;
315 Dict generate_options(
const std::string& target)
const override;
320 void change_option(
const std::string& option_name,
const GenericType& option_value)
override;
325 void init(
const Dict& opts)
override;
330 void finalize()
override;
343 Dict get_stats(
void* mem)
const override;
348 Function self()
const {
return shared_from_this<Function>();}
351 virtual Function factory(
const std::string& name,
352 const std::vector<std::string>& s_in,
353 const std::vector<std::string>& s_out,
355 const Dict& opts)
const;
358 virtual std::vector<std::string> get_function()
const;
361 virtual const Function& get_function(
const std::string &name)
const;
364 virtual bool has_function(
const std::string& fname)
const {
return false;}
367 void add_embedded(std::map<FunctionInternal*, Function>& all_fun,
368 const Function& dep, casadi_int max_depth)
const;
371 virtual void find(std::map<FunctionInternal*, Function>& all_fun, casadi_int max_depth)
const {}
381 virtual std::vector<bool> which_depends(
const std::string& s_in,
382 const std::vector<std::string>& s_out,
383 casadi_int order,
bool tr=
false)
const;
397 int eval_gen(
const double** arg,
double** res, casadi_int* iw,
double* w,
void* mem,
398 bool always_inline,
bool never_inline)
const;
399 virtual int eval(
const double** arg,
double** res, casadi_int* iw,
double* w,
void* mem)
const;
406 casadi_int* iw,
SXElem* w,
void* mem,
bool always_inline,
bool never_inline)
const;
412 bool always_inline,
bool never_inline)
const;
418 virtual std::vector<DM> eval_dm(
const std::vector<DM>& arg)
const;
427 bool always_inline,
bool never_inline)
const {
428 return eval_sx(arg, res, iw, w, mem, always_inline, never_inline);
431 bool always_inline,
bool never_inline)
const {
432 return sp_forward(arg, res, iw, w, mem);
441 bool always_inline,
bool never_inline)
const;
445 casadi_int npar,
bool always_inline,
bool never_inline)
const;
452 void call(
const std::vector<M>& arg, std::vector<M>& res,
453 bool always_inline,
bool never_inline)
const;
461 static bool check_mat(
const Sparsity& arg,
const Sparsity& inp, casadi_int& npar);
474 void check_arg(
const std::vector<M>& arg, casadi_int& npar)
const;
487 void check_res(
const std::vector<M>& res, casadi_int& npar)
const;
498 template<
typename M>
bool
499 matching_arg(
const std::vector<M>& arg, casadi_int& npar)
const;
509 template<
typename M>
bool
510 matching_res(
const std::vector<M>& arg, casadi_int& npar)
const;
515 template<
typename M> std::vector<M>
516 replace_arg(
const std::vector<M>& arg, casadi_int npar)
const;
521 template<
typename M> std::vector<M>
522 project_arg(
const std::vector<M>& arg, casadi_int npar)
const;
527 template<
typename M> std::vector<M>
528 project_res(
const std::vector<M>& arg, casadi_int npar)
const;
533 template<
typename M> std::vector<M>
534 replace_res(
const std::vector<M>& res, casadi_int npar)
const;
539 template<
typename M> std::vector<std::vector<M>>
540 replace_fseed(
const std::vector<std::vector<M>>& fseed, casadi_int npar)
const;
545 template<
typename M> std::vector<std::vector<M>>
546 replace_aseed(
const std::vector<std::vector<M>>& aseed, casadi_int npar)
const;
553 std::map<std::string, M> convert_arg(
const std::vector<M>& arg)
const;
555 std::vector<M> convert_arg(
const std::map<std::string, M>& arg)
const;
557 std::map<std::string, M> convert_res(
const std::vector<M>& res)
const;
559 std::vector<M> convert_res(
const std::map<std::string, M>& res)
const;
566 std::vector<double> nz_in(
const std::vector<DM>& arg)
const;
567 std::vector<double> nz_out(
const std::vector<DM>& res)
const;
568 std::vector<DM> nz_in(
const std::vector<double>& arg)
const;
569 std::vector<DM> nz_out(
const std::vector<double>& res)
const;
576 virtual void call_forward(
const std::vector<MX>& arg,
const std::vector<MX>& res,
577 const std::vector<std::vector<MX> >& fseed,
578 std::vector<std::vector<MX> >& fsens,
579 bool always_inline,
bool never_inline)
const;
580 virtual void call_forward(
const std::vector<SX>& arg,
const std::vector<SX>& res,
581 const std::vector<std::vector<SX> >& fseed,
582 std::vector<std::vector<SX> >& fsens,
583 bool always_inline,
bool never_inline)
const;
590 virtual void call_reverse(
const std::vector<MX>& arg,
const std::vector<MX>& res,
591 const std::vector<std::vector<MX> >& aseed,
592 std::vector<std::vector<MX> >& asens,
593 bool always_inline,
bool never_inline)
const;
594 virtual void call_reverse(
const std::vector<SX>& arg,
const std::vector<SX>& res,
595 const std::vector<std::vector<SX> >& aseed,
596 std::vector<std::vector<SX> >& asens,
597 bool always_inline,
bool never_inline)
const;
603 std::vector<MX> mapsum_mx(
const std::vector<MX > &arg,
const std::string& parallelization);
616 virtual Function get_jacobian(
const std::string& name,
617 const std::vector<std::string>& inames,
618 const std::vector<std::string>& onames,
619 const Dict& opts)
const;
627 Sparsity& jac_sparsity(casadi_int oind, casadi_int iind,
bool compact,
bool symmetric)
const;
629 virtual Sparsity get_jac_sparsity(casadi_int oind, casadi_int iind,
bool symmetric)
const;
633 static std::string
forward_name(
const std::string& fcn, casadi_int nfwd) {
634 return "fwd" +
str(nfwd) +
"_" + fcn;
638 std::string diff_prefix(
const std::string& prefix)
const;
648 Function forward(casadi_int nfwd)
const;
650 virtual Function get_forward(casadi_int nfwd,
const std::string& name,
651 const std::vector<std::string>& inames,
652 const std::vector<std::string>& onames,
653 const Dict& opts)
const;
657 static std::string
reverse_name(
const std::string& fcn, casadi_int nadj) {
658 return "adj" +
str(nadj) +
"_" + fcn;
671 virtual Function get_reverse(casadi_int nadj,
const std::string& name,
672 const std::vector<std::string>& inames,
673 const std::vector<std::string>& onames,
674 const Dict& opts)
const;
680 template<
typename MatType>
681 static MatType ensure_stacked(
const MatType& v,
const Sparsity& sp, casadi_int n);
686 virtual Function slice(
const std::string& name,
const std::vector<casadi_int>& order_in,
687 const std::vector<casadi_int>& order_out,
const Dict& opts)
const;
692 virtual const Function& oracle()
const;
697 bool has_derivative()
const;
702 virtual double ad_weight()
const;
709 virtual double sp_weight()
const;
715 virtual const SX sx_in(casadi_int ind)
const;
716 virtual const SX sx_out(casadi_int ind)
const;
717 virtual const std::vector<SX> sx_in()
const;
718 virtual const std::vector<SX> sx_out()
const;
719 virtual const MX mx_in(casadi_int ind)
const;
720 virtual const MX mx_out(casadi_int ind)
const;
721 virtual const std::vector<MX> mx_in()
const;
722 virtual const std::vector<MX> mx_out()
const;
723 const DM dm_in(casadi_int ind)
const;
724 const DM dm_out(casadi_int ind)
const;
725 const std::vector<DM> dm_in()
const;
726 const std::vector<DM> dm_out()
const;
730 virtual std::vector<MX> free_mx()
const;
733 virtual std::vector<SX> free_sx()
const;
743 virtual void generate_lifted(
Function& vdef_fcn,
Function& vinit_fcn)
const;
748 virtual casadi_int n_instructions()
const;
753 virtual casadi_int instruction_id(casadi_int k)
const;
758 virtual std::vector<casadi_int> instruction_input(casadi_int k)
const;
763 virtual double instruction_constant(casadi_int k)
const;
768 virtual std::vector<casadi_int> instruction_output(casadi_int k)
const;
773 virtual casadi_int n_nodes()
const;
778 virtual MX instruction_MX(casadi_int k)
const;
783 virtual SX instructions_sx()
const;
803 bool incache(
const std::string& fname,
Function& f,
const std::string& suffix=
"")
const;
808 void tocache(
const Function& f,
const std::string& suffix=
"")
const;
814 void tocache_if_missing(
Function& f,
const std::string& suffix=
"")
const;
819 void codegen(
CodeGenerator& g,
const std::string& fname)
const;
834 virtual std::string codegen_name(
const CodeGenerator& g,
bool ns=
true)
const;
839 std::string codegen_mem(
CodeGenerator& g,
const std::string& index=
"mem")
const;
879 std::string signature(
const std::string& fname)
const;
884 std::string signature_unrolled(
const std::string& fname)
const;
904 virtual std::string generate_dependencies(
const std::string& fname,
const Dict& opts)
const;
919 virtual void export_code(
const std::string& lang,
920 std::ostream &stream,
const Dict& options)
const;
935 void disp(std::ostream& stream,
bool more)
const override;
945 std::string definition()
const;
950 void print_dimensions(std::ostream &stream)
const;
955 virtual std::vector<std::string> get_free()
const;
960 void get_partition(casadi_int iind, casadi_int oind,
Sparsity& D1,
Sparsity& D2,
961 bool compact,
bool symmetric,
962 bool allow_forward,
bool allow_reverse)
const;
968 casadi_int nnz_in()
const;
969 casadi_int
nnz_in(casadi_int ind)
const {
return sparsity_in(ind).nnz(); }
970 casadi_int nnz_out()
const;
971 casadi_int
nnz_out(casadi_int ind)
const {
return sparsity_out(ind).nnz(); }
978 casadi_int numel_in()
const;
979 casadi_int
numel_in(casadi_int ind)
const {
return sparsity_in(ind).numel(); }
980 casadi_int
numel_out(casadi_int ind)
const {
return sparsity_out(ind).numel(); }
981 casadi_int numel_out()
const;
988 casadi_int
size1_in(casadi_int ind)
const {
return sparsity_in(ind).size1(); }
989 casadi_int
size2_in(casadi_int ind)
const {
return sparsity_in(ind).size2(); }
990 casadi_int
size1_out(casadi_int ind)
const {
return sparsity_out(ind).size1(); }
991 casadi_int
size2_out(casadi_int ind)
const {
return sparsity_out(ind).size2(); }
992 std::pair<casadi_int, casadi_int>
size_in(casadi_int ind)
const {
993 return sparsity_in(ind).size();
995 std::pair<casadi_int, casadi_int>
size_out(casadi_int ind)
const {
996 return sparsity_out(ind).size();
1012 bool all_scalar()
const;
1015 virtual bool jac_is_symm(casadi_int oind, casadi_int iind)
const;
1018 Sparsity to_compact(casadi_int oind, casadi_int iind,
const Sparsity& sp)
const;
1021 Sparsity from_compact(casadi_int oind, casadi_int iind,
const Sparsity& sp)
const;
1025 Sparsity get_jac_sparsity_gen(casadi_int oind, casadi_int iind)
const;
1028 Sparsity get_jac_sparsity_hierarchical(casadi_int oind, casadi_int iind)
const;
1033 Sparsity get_jac_sparsity_hierarchical_symm(casadi_int oind, casadi_int iind)
const;
1036 virtual std::vector<MX> symbolic_output(
const std::vector<MX>& arg)
const;
1042 virtual size_t get_n_in();
1043 virtual size_t get_n_out();
1051 virtual std::string get_name_in(casadi_int i);
1052 virtual std::string get_name_out(casadi_int i);
1077 return std::vector<double>(nnz_in(ind), 1.);
1081 return std::vector<double>(nnz_out(ind), 1.);
1101 virtual Sparsity get_sparsity_in(casadi_int i);
1106 virtual Sparsity get_sparsity_out(casadi_int i);
1122 for (casadi_int i=0; i<name_in_.size(); ++i) {
1123 if (name_in_[i]==name)
return i;
1125 casadi_error(
"FunctionInternal::index_in: could not find entry \""
1126 + name +
"\". Available names are: " +
str(name_in_) +
".");
1134 for (casadi_int i=0; i<name_out_.size(); ++i) {
1135 if (name_out_[i]==name)
return i;
1137 casadi_error(
"FunctionInternal::index_out: could not find entry \""
1138 + name +
"\". Available names are: " +
str(name_out_) +
".");
1145 virtual int sp_forward(
const bvec_t** arg,
bvec_t** res,
1146 casadi_int* iw,
bvec_t* w,
void* mem)
const;
1151 virtual int sp_forward_block(
const bvec_t** arg,
bvec_t** res,
1152 casadi_int* iw,
bvec_t* w,
void* mem, casadi_int oind, casadi_int iind)
const;
1157 virtual int sp_reverse(
bvec_t** arg,
bvec_t** res, casadi_int* iw,
bvec_t* w,
void* mem)
const;
1162 void sz_work(
size_t& sz_arg,
size_t& sz_res,
size_t& sz_iw,
size_t& sz_w)
const;
1167 size_t sz_arg()
const {
return sz_arg_per_ + sz_arg_tmp_;}
1172 size_t sz_res()
const {
return sz_res_per_ + sz_res_tmp_;}
1177 size_t sz_iw()
const {
return sz_iw_per_ + sz_iw_tmp_;}
1182 size_t sz_w()
const {
return sz_w_per_ + sz_w_tmp_;}
1188 virtual size_t codegen_sz_arg(
const CodeGenerator& g)
const;
1189 virtual size_t codegen_sz_res(
const CodeGenerator& g)
const;
1197 void alloc_arg(
size_t sz_arg,
bool persistent=
false);
1202 void alloc_res(
size_t sz_res,
bool persistent=
false);
1207 void alloc_iw(
size_t sz_iw,
bool persistent=
false);
1212 void alloc_w(
size_t sz_w,
bool persistent=
false);
1217 void alloc(
const Function& f,
bool persistent=
false,
int num_threads=1);
1222 virtual void set_work(
void* mem,
const double**& arg,
double**& res,
1223 casadi_int*& iw,
double*& w)
const {}
1228 virtual void set_temp(
void* mem,
const double** arg,
double** res,
1229 casadi_int* iw,
double* w)
const {}
1234 void setup(
void* mem,
const double** arg,
double** res, casadi_int* iw,
double* w)
const;
1240 virtual bool fwdViaJac(casadi_int nfwd)
const;
1241 virtual bool adjViaJac(casadi_int nadj)
const;
1245 virtual Dict info()
const;
1250 Function map(casadi_int n,
const std::string& parallelization)
const;
1255 void generate_in(
const std::string& fname,
const double** arg)
const;
1256 void generate_out(
const std::string& fname,
double** res)
const;
1333 mutable std::vector<Sparsity> jac_sparsity_[2];
1335 #ifdef CASADI_WITH_THREADSAFE_SYMBOLICS
1337 mutable std::mutex jac_sparsity_mtx_;
1355 bool enable_forward_, enable_reverse_, enable_jacobian_,
enable_fd_;
1356 bool enable_forward_op_, enable_reverse_op_, enable_jacobian_op_,
enable_fd_op_;
1399 #ifdef CASADI_WITH_THREAD
1400 mutable std::atomic<casadi_int> dump_count_;
1408 virtual bool is_a(
const std::string& type,
bool recursive)
const;
1413 virtual void merge(
const std::vector<MX>& arg,
1414 std::vector<MX>& subs_from, std::vector<MX>& subs_to)
const;
1419 template<
typename MatType>
1420 static bool purgable(
const std::vector<MatType>& seed);
1425 template<
typename MatType>
1426 std::vector<std::vector<MatType> >
1427 fwd_seed(casadi_int nfwd)
const;
1432 template<
typename MatType>
1433 std::vector<std::vector<MatType> >
1434 symbolicAdjSeed(casadi_int nadj,
const std::vector<MatType>& v)
const;
1452 void print_in(std::ostream &stream,
const double** arg,
bool truncate)
const;
1457 void print_out(std::ostream &stream,
double** res,
bool truncate)
const;
1463 void set_jac_sparsity(casadi_int oind, casadi_int iind,
const Sparsity& sp);
1468 casadi_int get_dump_id()
const;
1469 void dump_in(casadi_int
id,
const double** arg)
const;
1470 void dump_out(casadi_int
id,
double** res)
const;
1477 size_t sz_arg_per_, sz_res_per_, sz_iw_per_, sz_w_per_;
1482 size_t sz_arg_tmp_, sz_res_tmp_, sz_iw_tmp_, sz_w_tmp_;
1486 template<
typename MatType>
1488 for (
auto i=v.begin(); i!=v.end(); ++i) {
1489 if (!i->is_zero())
return false;
1494 template<
typename MatType>
1495 std::vector<std::vector<MatType> >
1498 std::vector<std::vector<MatType>> fseed(nfwd);
1499 for (casadi_int dir=0; dir<nfwd; ++dir) {
1500 fseed[dir].resize(
n_in_);
1501 for (casadi_int iind=0; iind<
n_in_; ++iind) {
1502 std::string n =
"f" +
str(dir) +
"_" +
name_in_[iind];
1504 fseed[dir][iind] = MatType::sym(n, sp);
1510 template<
typename MatType>
1511 std::vector<std::vector<MatType> >
1513 symbolicAdjSeed(casadi_int nadj,
const std::vector<MatType>& v)
const {
1514 std::vector<std::vector<MatType> > aseed(nadj, v);
1515 for (casadi_int dir=0; dir<nadj; ++dir) {
1518 for (
typename std::vector<MatType>::iterator i=aseed[dir].begin();
1519 i!=aseed[dir].end();
1522 std::stringstream ss;
1524 if (nadj>1) ss << dir <<
"_";
1535 template<
typename M>
1537 bool always_inline,
bool never_inline)
const {
1541 bool matrix_call =
false;
1542 std::pair<casadi_int, casadi_int> sz;
1543 for (
auto&& a : arg) {
1544 if (!a.is_scalar() && !a.is_empty()) {
1549 }
else if (a.size()!=sz) {
1551 matrix_call =
false;
1562 for (
auto&& a : res) a = z;
1564 std::vector<M> arg1 = arg, res1;
1565 for (casadi_int c=0; c<sz.second; ++c) {
1566 for (casadi_int r=0; r<sz.first; ++r) {
1568 for (casadi_int i=0; i<arg.size(); ++i) {
1569 if (arg[i].size()==sz) arg1[i] = arg[i](r, c);
1572 call(arg1, res1, always_inline, never_inline);
1574 casadi_assert_dev(res.size() == res1.size());
1575 for (casadi_int i=0; i<res.size(); ++i) res[i](r, c) = res1[i];
1584 casadi_int npar = 1;
1586 return call(
replace_arg(arg, npar), res, always_inline, never_inline);
1590 call_gen(arg, res, npar, always_inline, never_inline);
1593 template<
typename M>
1595 project_arg(
const std::vector<M>& arg, casadi_int npar)
const {
1596 casadi_assert_dev(arg.size()==
n_in_);
1599 std::vector<bool> mapped(
n_in_);
1600 for (casadi_int i=0; i<
n_in_; ++i) {
1601 mapped[i] = arg[i].size2()!=
size2_in(i);
1605 std::vector<bool> matching(
n_in_);
1606 bool any_mismatch =
false;
1607 for (casadi_int i=0; i<
n_in_; ++i) {
1609 matching[i] = arg[i].sparsity().is_stacked(
sparsity_in(i), npar);
1613 any_mismatch = any_mismatch || !matching[i];
1618 std::vector<M> arg2(arg);
1619 for (casadi_int i=0; i<
n_in_; ++i) {
1622 arg2[i] = project(arg2[i], repmat(
sparsity_in(i), 1, npar));
1633 template<
typename M>
1635 project_res(
const std::vector<M>& arg, casadi_int npar)
const {
1639 template<
typename D>
1642 casadi_int npar,
bool always_inline,
bool never_inline)
const {
1643 std::vector< Matrix<D> > arg2 =
project_arg(arg, npar);
1646 std::vector<bool> mapped(
n_in_);
1647 for (casadi_int i=0; i<
n_in_; ++i) {
1648 mapped[i] = arg[i].size2()!=
size2_in(i);
1653 for (casadi_int i=0; i<
n_out_; ++i) {
1654 if (!res[i].sparsity().is_stacked(
sparsity_out(i), npar)) {
1660 std::vector<casadi_int> iw_tmp(
sz_iw());
1661 std::vector<D> w_tmp(
sz_w());
1664 std::vector<const D*> argp(
sz_arg());
1665 for (casadi_int i=0; i<
n_in_; ++i) argp[i]=
get_ptr(arg2[i]);
1668 std::vector<D*> resp(
sz_res());
1669 for (casadi_int i=0; i<
n_out_; ++i) resp[i]=
get_ptr(res[i]);
1672 for (casadi_int p=0; p<npar; ++p) {
1676 always_inline, never_inline)) {
1680 if (p==npar-1)
break;
1681 for (casadi_int i=0; i<
n_in_; ++i)
if (mapped[i]) argp[i] +=
nnz_in(i);
1686 template<
typename M>
1688 casadi_assert(arg.size()==
n_in_,
"Incorrect number of inputs: Expected "
1690 for (casadi_int i=0; i<
n_in_; ++i) {
1693 std::string d_arg =
str(arg[i].size1()) +
"-by-" +
str(arg[i].size2());
1695 std::string e =
"Input " +
str(i) +
" (" +
name_in_[i] +
") has mismatching shape. "
1696 "Got " + d_arg +
". Allowed dimensions, in general, are:\n"
1697 " - The input dimension N-by-M (here " + d_in +
")\n"
1698 " - A scalar, i.e. 1-by-1\n"
1699 " - M-by-N if N=1 or M=1 (i.e. a transposed vector)\n"
1700 " - N-by-M1 if K*M1=M for some K (argument repeated horizontally)\n";
1702 e +=
" - N-by-P*M, indicating evaluation with multiple arguments (P must be a "
1703 "multiple of " +
str(npar) +
" for consistency with previous inputs)";
1710 template<
typename M>
1712 casadi_assert(res.size()==
n_out_,
"Incorrect number of outputs: Expected "
1714 for (casadi_int i=0; i<
n_out_; ++i) {
1716 "Output " +
str(i) +
" (" +
name_out_[i] +
") has mismatching shape. "
1721 template<
typename M>
1724 for (casadi_int i=0; i<
n_in_; ++i) {
1725 if (arg.at(i).size1()!=
size1_in(i))
return false;
1726 if (arg.at(i).size2()!=
size2_in(i) && arg.at(i).size2()!=npar*
size2_in(i))
return false;
1731 template<
typename M>
1734 for (casadi_int i=0; i<
n_out_; ++i) {
1735 if (res.at(i).size1()!=
size1_out(i))
return false;
1736 if (res.at(i).size2()!=
size2_out(i) && res.at(i).size2()!=npar*
size2_out(i))
return false;
1741 template<
typename M>
1743 if (arg.size()==inp.
size()) {
1746 }
else if (arg.is_empty()) {
1748 return M(inp.
size());
1749 }
else if (arg.is_scalar()) {
1752 }
else if (arg.is_vector() && inp.
size()==std::make_pair(arg.size2(), arg.size1())) {
1755 }
else if (arg.size1()==inp.
size1() && arg.size2()>0 && inp.
size2()>0
1756 && inp.
size2()%arg.size2()==0) {
1758 return repmat(arg, 1, inp.
size2()/arg.size2());
1760 casadi_assert_dev(npar!=-1);
1762 return repmat(arg, 1, (npar*inp.
size2())/arg.size2());
1766 template<
typename M>
1768 replace_arg(
const std::vector<M>& arg, casadi_int npar)
const {
1769 std::vector<M> r(arg.size());
1774 template<
typename M>
1776 replace_res(
const std::vector<M>& res, casadi_int npar)
const {
1777 std::vector<M> r(res.size());
1782 template<
typename M>
1784 replace_fseed(
const std::vector<std::vector<M> >& fseed, casadi_int npar)
const {
1785 std::vector<std::vector<M> > r(fseed.size());
1786 for (casadi_int d=0; d<r.size(); ++d) r[d] =
replace_arg(fseed[d], npar);
1790 template<
typename M>
1792 replace_aseed(
const std::vector<std::vector<M> >& aseed, casadi_int npar)
const {
1793 std::vector<std::vector<M> > r(aseed.size());
1794 for (casadi_int d=0; d<r.size(); ++d) r[d] =
replace_res(aseed[d], npar);
1798 template<
typename M>
1801 casadi_assert(arg.size()==
n_in_,
"Incorrect number of inputs: Expected "
1803 std::map<std::string, M> ret;
1804 for (casadi_int i=0;i<
n_in_;++i) {
1810 template<
typename M>
1812 convert_arg(
const std::map<std::string, M>& arg)
const {
1814 std::vector<M> arg_v(
n_in_);
1815 for (casadi_int i=0; i<arg_v.size(); ++i) {
1820 for (
auto&& e : arg) {
1821 arg_v.at(
index_in(e.first)) = e.second;
1827 template<
typename M>
1830 casadi_assert(res.size()==
n_out_,
"Incorrect number of outputs: Expected "
1832 std::map<std::string, M> ret;
1833 for (casadi_int i=0;i<
n_out_;++i) {
1839 template<
typename M>
1841 convert_res(
const std::map<std::string, M>& res)
const {
1843 std::vector<M> res_v(
n_out_);
1844 for (casadi_int i=0; i<res_v.size(); ++i) {
1845 res_v[i] = std::numeric_limits<double>::quiet_NaN();
1849 for (
auto&& e : res) {
1856 template<
typename MatType>
1859 if (v.size1() == sp.
size1() && v.size2() == n * sp.
size2()) {
1861 if (v.nnz() != 0 && !v.sparsity().is_stacked(sp, n)) {
1862 return project(v, repmat(sp, 1, n));
1866 casadi_assert_dev(v.is_empty());
Helper class for C code generation.
Helper class for Serialization.
Internal class for Function.
bool has_refcount_
Reference counting in codegen?
casadi_int size1_in(casadi_int ind) const
Input/output dimensions.
virtual std::string codegen_mem_type() const
Thread-local memory object type.
std::string jit_serialize_
Serialize behaviour.
std::vector< M > project_arg(const std::vector< M > &arg, casadi_int npar) const
Project sparsities.
virtual bool has_sprev() const
Is the class able to propagate seeds through the algorithm?
casadi_int nnz_out(casadi_int ind) const
Number of input/output nonzeros.
double jac_penalty_
Penalty factor for using a complete Jacobian to calculate directional derivatives.
void call_gen(const MXVector &arg, MXVector &res, casadi_int npar, bool always_inline, bool never_inline) const
Call a function, overloaded.
std::vector< Sparsity > sparsity_in_
Input and output sparsity.
virtual bool has_forward(casadi_int nfwd) const
Return function that calculates forward derivatives.
static std::string forward_name(const std::string &fcn, casadi_int nfwd)
Helper function: Get name of forward derivative function.
virtual void jit_dependencies(const std::string &fname)
Jit dependencies.
void check_arg(const std::vector< M > &arg, casadi_int &npar) const
Check if input arguments have correct length and dimensions.
std::vector< std::vector< M > > replace_fseed(const std::vector< std::vector< M >> &fseed, casadi_int npar) const
Replace 0-by-0 forward seeds.
std::vector< bool > is_diff_out_
std::vector< std::vector< MatType > > fwd_seed(casadi_int nfwd) const
Symbolic expressions for the forward seeds.
std::string jit_name_
Name if jit source file.
int eval_gen(const SXElem **arg, SXElem **res, casadi_int *iw, SXElem *w, void *mem, bool always_inline, bool never_inline) const
Evaluate a function, overloaded.
virtual void codegen_free_mem(CodeGenerator &g) const
Codegen for free_mem.
std::string compiler_plugin_
Just-in-time compiler.
casadi_release_t release_
Release redirected to a C function.
std::pair< casadi_int, casadi_int > size_in(casadi_int ind) const
Input/output dimensions.
virtual bool has_eval_dm() const
Evaluate with DM matrices.
virtual std::vector< double > get_nominal_out(casadi_int ind) const
const Options & get_options() const override
Options.
virtual void codegen_incref(CodeGenerator &g) const
Codegen incref for dependencies.
Function custom_jacobian_
virtual void find(std::map< FunctionInternal *, Function > &all_fun, casadi_int max_depth) const
const Sparsity & sparsity_in(casadi_int ind) const
Input/output sparsity.
void * user_data_
User-set field.
std::vector< M > replace_arg(const std::vector< M > &arg, casadi_int npar) const
Replace 0-by-0 inputs.
virtual bool has_jac_sparsity(casadi_int oind, casadi_int iind) const
Get Jacobian sparsity.
int eval_gen(const bvec_t **arg, bvec_t **res, casadi_int *iw, bvec_t *w, void *mem, bool always_inline, bool never_inline) const
Evaluate a function, overloaded.
virtual void set_work(void *mem, const double **&arg, double **&res, casadi_int *&iw, double *&w) const
Set the (persistent) work vectors.
std::string jit_base_name_
static std::map< std::string, ProtoFunction *(*)(DeserializingStream &)> deserialize_map
std::vector< std::vector< MatType > > symbolicAdjSeed(casadi_int nadj, const std::vector< MatType > &v) const
Symbolic expressions for the adjoint seeds.
double ad_weight_
Weighting factor for derivative calculation and sparsity pattern calculation.
virtual bool has_jacobian() const
Return Jacobian of all input elements with respect to all output elements.
bool inputs_check_
Errors are thrown if numerical values of inputs look bad.
casadi_int nnz_in(casadi_int ind) const
Number of input/output nonzeros.
bool jit_
Use just-in-time compiler.
casadi_int index_out(const std::string &name) const
Get output scheme index by name.
virtual double get_min_in(casadi_int ind) const
Get smallest input value.
eval_t eval_
Numerical evaluation redirected to a C function.
casadi_int numel_out(casadi_int ind) const
Number of input/output elements.
virtual std::string getAdaptorSolverName() const
Obtain solver name from Adaptor.
void * alloc_mem() const override
Create memory block.
virtual bool uses_output() const
Do the derivative functions need nondifferentiated outputs?
size_t n_in_
Number of inputs and outputs.
std::map< std::string, M > convert_res(const std::vector< M > &res) const
Convert from/to input/output lists/map.
size_t sz_res() const
Get required length of res field.
casadi_int size2_out(casadi_int ind) const
Input/output dimensions.
virtual void set_temp(void *mem, const double **arg, double **res, casadi_int *iw, double *w) const
Set the (temporary) work vectors.
bool matching_arg(const std::vector< M > &arg, casadi_int &npar) const
Check if input arguments that needs to be replaced.
std::vector< M > project_res(const std::vector< M > &arg, casadi_int npar) const
Project sparsities.
casadi_int size1_out(casadi_int ind) const
Input/output dimensions.
std::pair< casadi_int, casadi_int > size_out(casadi_int ind) const
Input/output dimensions.
virtual bool has_function(const std::string &fname) const
WeakCache< std::string, Function > cache_
Function cache.
casadi_checkout_t checkout_
Checkout redirected to a C function.
casadi_int nnz_in() const
Number of input/output nonzeros.
virtual void disp_more(std::ostream &stream) const
Print more.
static const Options options_
Options.
casadi_int numel_in(casadi_int ind) const
Number of input/output elements.
std::vector< M > replace_res(const std::vector< M > &res, casadi_int npar) const
Replace 0-by-0 outputs.
virtual bool get_diff_in(casadi_int i)
Which inputs are differentiable.
bool jit_temp_suffix_
Use a temporary name.
casadi_int max_num_dir_
Maximum number of sensitivity directions.
virtual std::vector< double > get_nominal_in(casadi_int ind) const
void call(const std::vector< M > &arg, std::vector< M > &res, bool always_inline, bool never_inline) const
Call a function, templated.
const Sparsity & sparsity_out(casadi_int ind) const
Input/output sparsity.
bool matching_res(const std::vector< M > &arg, casadi_int &npar) const
Check if output arguments that needs to be replaced.
casadi_int index_in(const std::string &name) const
Get input scheme index by name.
size_t sz_w() const
Get required length of w field.
bool jit_cleanup_
Cleanup jit source file.
static MatType ensure_stacked(const MatType &v, const Sparsity &sp, casadi_int n)
Ensure that a matrix's sparsity is a horizontal multiple of another, or empty.
Dict stats_
Dict of statistics (resulting from evaluate)
int eval_gen(const double **arg, double **res, casadi_int *iw, double *w, void *mem, bool always_inline, bool never_inline) const
Evaluate numerically.
bool all_scalar() const
Are all inputs and outputs scalar.
casadi_int nnz_out() const
Number of input/output nonzeros.
size_t sz_arg() const
Get required length of arg field.
virtual double get_abstol() const
Get absolute tolerance.
virtual bool has_codegen() const
Is codegen supported?
static bool check_mat(const Sparsity &arg, const Sparsity &inp, casadi_int &npar)
void check_res(const std::vector< M > &res, casadi_int &npar) const
Check if output arguments have correct length and dimensions.
virtual bool has_free() const
Does the function have free variables.
virtual bool has_reverse(casadi_int nadj) const
Return function that calculates adjoint derivatives.
std::map< std::string, M > convert_arg(const std::vector< M > &arg) const
Convert from/to input/output lists/map.
virtual double get_reltol() const
Get relative tolerance.
std::vector< bool > is_diff_in_
Are inputs and outputs differentiable?
size_t sz_iw() const
Get required length of iw field.
virtual void codegen_decref(CodeGenerator &g) const
Codegen decref for dependencies.
static bool purgable(const std::vector< MatType > &seed)
Can a derivative direction be skipped.
Dict cache_init_
Values to prepopulate the function cache with.
void free_mem(void *mem) const override
Free memory block.
std::vector< std::string > name_out_
virtual bool get_diff_out(casadi_int i)
Which outputs are differentiable.
Function derivative_of_
If the function is the derivative of another function.
virtual bool has_spfwd() const
Is the class able to propagate seeds through the algorithm?
static std::string reverse_name(const std::string &fcn, casadi_int nadj)
Helper function: Get name of adjoint derivative function.
std::vector< std::vector< M > > replace_aseed(const std::vector< std::vector< M >> &aseed, casadi_int npar) const
Replace 0-by-0 reverse seeds.
casadi_int size2_in(casadi_int ind) const
Input/output dimensions.
virtual double get_default_in(casadi_int ind) const
Get default input value.
std::vector< std::string > name_in_
Input and output scheme.
virtual double get_max_in(casadi_int ind) const
Get largest input value.
std::map< std::string, std::vector< std::string > > AuxOut
static Matrix< Scalar > zeros(casadi_int nrow=1, casadi_int ncol=1)
Create a dense matrix or a matrix with specified sparsity with all entries zero.
Generic data type, can hold different types such as bool, casadi_int, std::string etc.
Sparse matrix class. SX and DM are specializations.
Base class for FunctionInternal and LinsolInternal.
bool error_on_fail_
Throw an exception on failure?
virtual void serialize_type(SerializingStream &s) const
Serialize type information.
virtual void * alloc_mem() const
Create memory block.
virtual const Options & get_options() const
Options.
bool regularity_check_
Errors are thrown when NaN is produced.
virtual void free_mem(void *mem) const
Free memory block.
void * memory(int ind) const
Memory objects.
bool verbose_
Verbose printout.
virtual std::string serialize_base_function() const
String used to identify the immediate FunctionInternal subclass.
virtual void check_mem_count(casadi_int n) const
Check for validatity of memory object count.
static const Options options_
Options.
The basic scalar symbolic class of CasADi.
Helper class for Serialization.
casadi_int size1() const
Get the number of rows.
casadi_int size2() const
Get the number of columns.
std::pair< casadi_int, casadi_int > size() const
Get the shape.
const double eps
Machine epsilon.
unsigned long long bvec_t
int(* casadi_checkout_t)(void)
Function pointer types for the C API.
std::vector< std::pair< std::string, T > > zip(const std::vector< std::string > &id, const std::vector< T > &mat)
M replace_mat(const M &arg, const Sparsity &inp, casadi_int npar)
int(* eval_t)(const double **arg, double **res, casadi_int *iw, double *w, int)
Function pointer types for the C API.
std::vector< MX > MXVector
std::string str(const T &v)
String representation, any type.
GenericType::Dict Dict
C++ equivalent of Python's dict or MATLAB's struct.
void(* casadi_release_t)(int)
Function pointer types for the C API.
T * get_ptr(std::vector< T > &v)
Get a pointer to the data contained in the vector.
std::vector< T > reverse(const std::vector< T > &v)
Reverse a list.
Function memory with temporary work vectors.
Options metadata for a class.
Function memory with temporary work vectors.
std::map< std::string, FStats > fstats
void add_stat(const std::string &s)