1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
// This file is part of fityk program. Copyright 2001-2013 Marcin Wojdyr
// Licence: GNU General Public License ver. 2+
#ifndef FITYK_MGR_H_
#define FITYK_MGR_H_
#include <map>
#include "fityk.h"
#include "tplate.h" // Tplate::Ptr
namespace fityk {
class Variable;
class Function;
class BasicContext;
class Model;
struct FunctionSum;
/// keeps all functions and variables
class FITYK_API ModelManager
{
public:
static bool is_auto(const std::string& name)
{ return !name.empty() && name[0] == '_'; }
ModelManager(const BasicContext* ctx);
~ModelManager();
Model* create_model();
void delete_model(Model *m);
//int assign_variable(const std::string &name, const std::string &rhs);
int assign_var_copy(const std::string &name, const std::string &orig);
int make_variable(const std::string &name, VMData* vd);
void delete_variables(const std::vector<std::string> &name);
/// returns -1 if not found or idx in variables if found
int find_variable_nr(const std::string &name) const;
const Variable* find_variable(const std::string &name) const;
int gpos_to_vpos(int gpos) const;
const Variable* gpos_to_var(int gpos) const
{ return variables_[gpos_to_vpos(gpos)]; }
/// remove unreffered variables and parameters
void remove_unreferred();
/// remove unreffered functions
void auto_remove_functions();
bool is_function_referred(int n) const;
// returns the global array of parameters
const std::vector<realt>& parameters() const { return parameters_; }
const std::vector<Variable*>& variables() const { return variables_; }
const Variable* get_variable(int n) const { return variables_[n]; }
//Variable* get_variable(int n) { return variables_[n]; }
void set_domain(int n, const RealRange& domain);
/// returns index of the new function in functions_
int assign_func(const std::string &name, Tplate::Ptr tp,
std::vector<VMData*> &args);
/// returns index of the new function in functions_
int assign_func_copy(const std::string &name, const std::string &orig);
void substitute_func_param(const std::string &name,
const std::string ¶m,
VMData* vd);
void delete_funcs(const std::vector<std::string> &names);
///returns -1 if not found or idx in functions_ if found
int find_function_nr(const std::string &name) const;
const Function* find_function(const std::string &name) const;
const std::vector<Function*>& functions() const { return functions_; }
const Function* get_function(int n) const { return functions_[n]; }
/// calculate value and derivatives of all variables;
/// do precomputations for all functions
void use_parameters();
void use_external_parameters(const std::vector<realt> &ext_param);
void put_new_parameters(const std::vector<realt> &aa);
realt variation_of_a(int n, realt variat) const;
std::vector<std::string>
get_variable_references(const std::string &name) const;
void update_indices_in_models();
void do_reset();
std::vector<std::string> share_par_cmd(const std::string& par, bool share);
std::string next_var_name(); ///generate name for "anonymous" variable
std::string next_func_name(); ///generate name for "anonymous" function
private:
const BasicContext* ctx_;
std::vector<Model*> models_;
std::vector<realt> parameters_;
/// sorted, a doesn't depend on b if idx(a)>idx(b)
std::vector<Variable*> variables_;
std::vector<Function*> functions_;
int var_autoname_counter_; ///for names for "anonymous" variables
int func_autoname_counter_; ///for names for "anonymous" functions
int add_variable(Variable* new_var, bool old_domain);
void sort_variables();
int copy_and_add_variable(const std::string& name,
const Variable* orig,
const std::map<int,std::string>& varmap);
int add_func(Function* func);
//std::string get_or_make_variable(const std::string& func);
bool is_variable_referred(int i, std::string *first_referrer = NULL);
void reindex_all();
std::string name_var_copy(const Variable* v);
void update_indices(FunctionSum& sum);
void eval_tilde(std::vector<int>::iterator op,
std::vector<int>& code, const std::vector<realt>& nums);
};
// used in mgr.cpp and udf.cpp
Variable* make_compound_variable(const std::string &name, VMData* vd,
const std::vector<Variable*>& all_variables);
} // namespace fityk
#endif
|
