mirror of
https://github.com/Cantera/cantera.git
synced 2025-02-25 18:55:29 -06:00
Implemented fixes, so that a python demo problem would work as advertised.
This commit is contained in:
Harry Moffat
@@ -6,400 +6,515 @@ using namespace std;
|
|||||||
|
|
||||||
namespace Cantera {
|
namespace Cantera {
|
||||||
|
|
||||||
static Func1* checkDupl(Func1& f) {
|
|
||||||
if (f.parent() != 0)
|
|
||||||
return &f.duplicate();
|
|
||||||
else
|
|
||||||
return &f;
|
|
||||||
}
|
|
||||||
|
|
||||||
Func1& Sin1::derivative() const {
|
Func1::Func1() :
|
||||||
Func1* c = new Cos1(m_c);
|
m_c(0.0),
|
||||||
Func1* r = &newTimesConstFunction(*c, m_c);
|
m_f1(0),
|
||||||
|
m_f2(0),
|
||||||
|
m_parent(0)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1::Func1(const Func1 &right) :
|
||||||
|
m_c(right.m_c),
|
||||||
|
m_f1(right.m_f1),
|
||||||
|
m_f2(right.m_f2),
|
||||||
|
m_parent(right.m_parent)
|
||||||
|
{
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1::~Func1() {
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1& Func1::operator=(const Func1 &right) {
|
||||||
|
if (&right == this) return *this;
|
||||||
|
m_c = right.m_c;
|
||||||
|
m_f1 = right.m_f1;
|
||||||
|
m_f2 = right.m_f2;
|
||||||
|
m_parent = right.m_parent;
|
||||||
|
return *this;
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1& Func1::duplicate() const {
|
||||||
|
Func1 *nfunc = new Func1(*this);
|
||||||
|
return *nfunc;
|
||||||
|
}
|
||||||
|
|
||||||
|
int Func1::ID() const {
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Calls method eval to evaluate the function
|
||||||
|
doublereal Func1::operator()(doublereal t) const {
|
||||||
|
return eval(t);
|
||||||
|
}
|
||||||
|
|
||||||
|
// Evaluate the function.
|
||||||
|
doublereal Func1::eval(doublereal t) const {
|
||||||
|
return 0.0;
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1& Func1::derivative() const {
|
||||||
|
cout << "derivative error... ERR: ID = " << ID() << endl;
|
||||||
|
cout << write("x") << endl;
|
||||||
|
return *(new Func1);
|
||||||
|
}
|
||||||
|
|
||||||
|
bool Func1::isIdentical(Func1& other) const {
|
||||||
|
if ((ID() != other.ID()) || (m_c != other.m_c))
|
||||||
|
return false;
|
||||||
|
if (m_f1) {
|
||||||
|
if (!other.m_f1) return false;
|
||||||
|
if (!m_f1->isIdentical(*other.m_f1)) return false;
|
||||||
|
}
|
||||||
|
if (m_f2) {
|
||||||
|
if (!other.m_f2) return false;
|
||||||
|
if (!m_f2->isIdentical(*other.m_f2)) return false;
|
||||||
|
}
|
||||||
|
return true;
|
||||||
|
}
|
||||||
|
|
||||||
|
//! accessor function for the returned constant
|
||||||
|
doublereal Func1::c() const {
|
||||||
|
return m_c;
|
||||||
|
}
|
||||||
|
|
||||||
|
// Function to set the storred constant
|
||||||
|
void Func1::setC(doublereal c) {
|
||||||
|
m_c = c;
|
||||||
|
}
|
||||||
|
|
||||||
|
//! accessor function for m_f1
|
||||||
|
Func1& Func1::func1() const {
|
||||||
|
return *m_f1;
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1& Func1::func2() const {
|
||||||
|
return *m_f2;
|
||||||
|
}
|
||||||
|
|
||||||
|
int Func1::order() const {
|
||||||
|
return 3;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
Func1& Func1::func1_dup() const {
|
||||||
|
return m_f1->duplicate();
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
Func1& Func1::func2_dup() const {
|
||||||
|
return m_f2->duplicate();
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
Func1* Func1::parent() const {
|
||||||
|
return m_parent;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
void Func1::setParent(Func1* p) {
|
||||||
|
m_parent = p;
|
||||||
|
}
|
||||||
|
|
||||||
|
/*****************************************************************************/
|
||||||
|
|
||||||
|
string Sin1::write(string arg) const {
|
||||||
|
string c = "";
|
||||||
|
if (m_c != 1.0) c = fp2str(m_c);
|
||||||
|
return "\\sin(" + c + arg + ")";
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1& Sin1::derivative() const {
|
||||||
|
Func1* c = new Cos1(m_c);
|
||||||
|
Func1* r = &newTimesConstFunction(*c, m_c);
|
||||||
#ifdef DEBUG_FUNC
|
#ifdef DEBUG_FUNC
|
||||||
cout << "Sin1::derivative: \n";
|
cout << "Sin1::derivative: \n";
|
||||||
cout << "function = \'" + write("x") + "\'\n";
|
cout << "function = \'" + write("x") + "\'\n";
|
||||||
cout << "derivative = \'" + r->write("x") + "\'\n";
|
cout << "derivative = \'" + r->write("x") + "\'\n";
|
||||||
#endif
|
#endif
|
||||||
return *r;
|
return *r;
|
||||||
|
}
|
||||||
|
/*****************************************************************************/
|
||||||
|
|
||||||
|
Func1& Cos1::derivative() const {
|
||||||
|
Func1* s = new Sin1(m_c);
|
||||||
|
Func1* r = &newTimesConstFunction(*s, -m_c);
|
||||||
|
#ifdef DEBUG_FUNC
|
||||||
|
cout << "Cos1::derivative: \n";
|
||||||
|
cout << "function = \'" + write("x") + "\'\n";
|
||||||
|
cout << "derivative = \'" + r->write("x") + "\'\n";
|
||||||
|
#endif
|
||||||
|
return *r;
|
||||||
|
}
|
||||||
|
|
||||||
|
std::string Cos1::write(std::string arg) const {
|
||||||
|
string c = "";
|
||||||
|
if (m_c != 1.0) c = fp2str(m_c);
|
||||||
|
return "\\cos("+c+arg+")";
|
||||||
|
}
|
||||||
|
|
||||||
|
/**************************************************************************/
|
||||||
|
|
||||||
|
Func1& Exp1::derivative() const {
|
||||||
|
Func1* f = new Exp1(m_c);
|
||||||
|
if (m_c != 1.0)
|
||||||
|
return newTimesConstFunction(*f, m_c);
|
||||||
|
else
|
||||||
|
return *f;
|
||||||
|
}
|
||||||
|
|
||||||
|
std::string Exp1::write(std::string arg) const {
|
||||||
|
string c = "";
|
||||||
|
if (m_c != 1.0) c = fp2str(m_c);
|
||||||
|
return "\\exp("+c+arg+")";
|
||||||
|
}
|
||||||
|
|
||||||
|
/******************************************************************************/
|
||||||
|
|
||||||
|
Func1& Pow1::derivative() const {
|
||||||
|
Func1* r;
|
||||||
|
if (m_c == 0.0) {
|
||||||
|
r = new Const1(0.0);
|
||||||
|
}
|
||||||
|
else if (m_c == 1.0) {
|
||||||
|
r = new Const1(1.0);
|
||||||
|
}
|
||||||
|
else {
|
||||||
|
Func1* f = new Pow1(m_c - 1.0);
|
||||||
|
r = &newTimesConstFunction(*f, m_c);
|
||||||
|
}
|
||||||
|
#ifdef DEBUG_FUNC
|
||||||
|
cout << "Pow1::derivative: \n";
|
||||||
|
cout << "function = \'" + write("x") + "\'\n";
|
||||||
|
cout << "derivative = \'" + r->write("x") + "\'\n";
|
||||||
|
#endif
|
||||||
|
return *r;
|
||||||
|
}
|
||||||
|
|
||||||
|
string Func1::write(std::string arg) const {
|
||||||
|
return "<unknown " + int2str(ID()) + ">("+arg+")";
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
string Pow1::write(string arg) const {
|
||||||
|
//cout << "Pow1" << endl;
|
||||||
|
string c = "";
|
||||||
|
if (m_c == 0.5) {
|
||||||
|
return "\\sqrt{" + arg + "}";
|
||||||
}
|
}
|
||||||
|
if (m_c == -0.5) {
|
||||||
Func1& Cos1::derivative() const {
|
return "\\frac{1}{\\sqrt{" + arg + "}}";
|
||||||
Func1* s = new Sin1(m_c);
|
}
|
||||||
Func1* r = &newTimesConstFunction(*s, -m_c);
|
if (m_c != 1.0) {
|
||||||
#ifdef DEBUG_FUNC
|
c = fp2str(m_c);
|
||||||
cout << "Cos1::derivative: \n";
|
return "\\left("+arg+"\\right)^{"+c+"}";
|
||||||
cout << "function = \'" + write("x") + "\'\n";
|
|
||||||
cout << "derivative = \'" + r->write("x") + "\'\n";
|
|
||||||
#endif
|
|
||||||
return *r;
|
|
||||||
}
|
}
|
||||||
|
else {
|
||||||
Func1& Exp1::derivative() const {
|
return arg;
|
||||||
Func1* f = new Exp1(m_c);
|
|
||||||
if (m_c != 1.0)
|
|
||||||
return newTimesConstFunction(*f, m_c);
|
|
||||||
else
|
|
||||||
return *f;
|
|
||||||
}
|
}
|
||||||
|
}
|
||||||
|
|
||||||
Func1& Pow1::derivative() const {
|
|
||||||
Func1* r;
|
|
||||||
if (m_c == 0.0) {
|
|
||||||
r = new Const1(0.0);
|
|
||||||
}
|
|
||||||
else if (m_c == 1.0) {
|
|
||||||
r = new Const1(1.0);
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
Func1* f = new Pow1(m_c - 1.0);
|
|
||||||
r = &newTimesConstFunction(*f, m_c);
|
|
||||||
}
|
|
||||||
#ifdef DEBUG_FUNC
|
|
||||||
cout << "Pow1::derivative: \n";
|
|
||||||
cout << "function = \'" + write("x") + "\'\n";
|
|
||||||
cout << "derivative = \'" + r->write("x") + "\'\n";
|
|
||||||
#endif
|
|
||||||
return *r;
|
|
||||||
}
|
|
||||||
|
|
||||||
string Func1::write(std::string arg) const {
|
string Const1::write(string arg) const {
|
||||||
return "<unknown " + int2str(ID()) + ">("+arg+")";
|
//cout << "Const1" << endl;
|
||||||
}
|
string c = "";
|
||||||
|
c = fp2str(m_c);
|
||||||
|
return c;
|
||||||
|
}
|
||||||
|
|
||||||
string Sin1::write(string arg) const {
|
string Ratio1::write(string arg) const {
|
||||||
string c = "";
|
//cout << "Ratio1" << endl;
|
||||||
if (m_c != 1.0) c = fp2str(m_c);
|
return "\\frac{" + m_f1->write(arg) + "}{"
|
||||||
return "\\sin("+c+arg+")";
|
+ m_f2->write(arg) + "}";
|
||||||
}
|
}
|
||||||
|
|
||||||
string Cos1::write(string arg) const {
|
string Product1::write(string arg) const {
|
||||||
string c = "";
|
//cout << "Product1" << endl;
|
||||||
if (m_c != 1.0) c = fp2str(m_c);
|
string s = m_f1->write(arg);
|
||||||
return "\\cos("+c+arg+")";
|
if (m_f1->order() < order()) s = "\\left(" + s + "\\right)";
|
||||||
}
|
string s2 = m_f2->write(arg);
|
||||||
|
if (m_f2->order() < order()) s2 = "\\left(" + s2 + "\\right)";
|
||||||
|
return s + " " + s2;
|
||||||
|
}
|
||||||
|
|
||||||
string Pow1::write(string arg) const {
|
string Sum1::write(string arg) const {
|
||||||
//cout << "Pow1" << endl;
|
//cout << "Sum1" << endl;
|
||||||
string c = "";
|
string s1 = m_f1->write(arg);
|
||||||
if (m_c == 0.5) {
|
string s2 = m_f2->write(arg);
|
||||||
return "\\sqrt{" + arg + "}";
|
if (s2[0] == '-') return s1 + " - " + s2.substr(1,s2.size());
|
||||||
}
|
else return s1 + " + " + s2;
|
||||||
if (m_c == -0.5) {
|
}
|
||||||
return "\\frac{1}{\\sqrt{" + arg + "}}";
|
|
||||||
}
|
|
||||||
if (m_c != 1.0) {
|
|
||||||
c = fp2str(m_c);
|
|
||||||
return "\\left("+arg+"\\right)^{"+c+"}";
|
|
||||||
}
|
|
||||||
else {
|
|
||||||
return arg;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
string Exp1::write(string arg) const {
|
string Diff1::write(string arg) const {
|
||||||
string c = "";
|
//cout << "Diff1" << endl;
|
||||||
if (m_c != 1.0) c = fp2str(m_c);
|
string s1 = m_f1->write(arg);
|
||||||
return "\\exp("+c+arg+")";
|
string s2 = m_f2->write(arg);
|
||||||
}
|
if (s2[0] == '-') return s1 + " + " + s2.substr(1,s2.size());
|
||||||
|
else return s1 + " - " + s2;
|
||||||
|
}
|
||||||
|
|
||||||
string Const1::write(string arg) const {
|
string Composite1::write(string arg) const {
|
||||||
//cout << "Const1" << endl;
|
//cout << "Composite1" << endl;
|
||||||
string c = "";
|
string g = m_f2->write(arg);
|
||||||
c = fp2str(m_c);
|
return m_f1->write(g);
|
||||||
return c;
|
}
|
||||||
}
|
|
||||||
|
|
||||||
string Ratio1::write(string arg) const {
|
string TimesConstant1::write(string arg) const {
|
||||||
//cout << "Ratio1" << endl;
|
//cout << "TimesConstant1" << endl;
|
||||||
return "\\frac{" + m_f1->write(arg) + "}{"
|
string s = m_f1->write(arg);
|
||||||
+ m_f2->write(arg) + "}";
|
if (m_f1->order() < order()) s = "\\left(" + s + "\\right)";
|
||||||
}
|
if (m_c == 1.0) return s;
|
||||||
|
if (m_c == -1.0) return "-"+s;
|
||||||
|
char n = s[0];
|
||||||
|
if (n >= '0' && n <= '9')
|
||||||
|
s = "\\left(" + s + "\\right)";
|
||||||
|
return fp2str(m_c) + s;
|
||||||
|
}
|
||||||
|
|
||||||
string Product1::write(string arg) const {
|
string PlusConstant1::write(string arg) const {
|
||||||
//cout << "Product1" << endl;
|
//cout << "PlusConstant1" << endl;
|
||||||
string s = m_f1->write(arg);
|
if (m_c == 0.0) return m_f1->write(arg);
|
||||||
if (m_f1->order() < order()) s = "\\left(" + s + "\\right)";
|
return m_f1->write(arg) + " + " + fp2str(m_c);
|
||||||
string s2 = m_f2->write(arg);
|
}
|
||||||
if (m_f2->order() < order()) s2 = "\\left(" + s2 + "\\right)";
|
|
||||||
return s + " " + s2;
|
|
||||||
}
|
|
||||||
|
|
||||||
string Sum1::write(string arg) const {
|
doublereal Func1::isProportional(TimesConstant1& other) {
|
||||||
//cout << "Sum1" << endl;
|
if (isIdentical(other.func1())) return other.c();
|
||||||
string s1 = m_f1->write(arg);
|
return 0.0;
|
||||||
string s2 = m_f2->write(arg);
|
}
|
||||||
if (s2[0] == '-') return s1 + " - " + s2.substr(1,s2.size());
|
doublereal Func1::isProportional(Func1& other) {
|
||||||
else return s1 + " + " + s2;
|
if (isIdentical(other)) return 1.0;
|
||||||
}
|
else return 0.0;
|
||||||
|
}
|
||||||
|
|
||||||
string Diff1::write(string arg) const {
|
static bool isConstant(Func1& f) {
|
||||||
//cout << "Diff1" << endl;
|
if (f.ID() == ConstFuncType)
|
||||||
string s1 = m_f1->write(arg);
|
return true;
|
||||||
string s2 = m_f2->write(arg);
|
else
|
||||||
if (s2[0] == '-') return s1 + " + " + s2.substr(1,s2.size());
|
return false;
|
||||||
else return s1 + " - " + s2;
|
}
|
||||||
}
|
|
||||||
|
|
||||||
string Composite1::write(string arg) const {
|
static bool isZero(Func1& f) {
|
||||||
//cout << "Composite1" << endl;
|
if (f.ID() == ConstFuncType && f.c() == 0.0)
|
||||||
string g = m_f2->write(arg);
|
return true;
|
||||||
return m_f1->write(g);
|
else
|
||||||
}
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
string TimesConstant1::write(string arg) const {
|
static bool isOne(Func1& f) {
|
||||||
//cout << "TimesConstant1" << endl;
|
if (f.ID() == ConstFuncType && f.c() == 1.0)
|
||||||
string s = m_f1->write(arg);
|
return true;
|
||||||
if (m_f1->order() < order()) s = "\\left(" + s + "\\right)";
|
else
|
||||||
if (m_c == 1.0) return s;
|
return false;
|
||||||
if (m_c == -1.0) return "-"+s;
|
}
|
||||||
char n = s[0];
|
|
||||||
if (n >= '0' && n <= '9')
|
|
||||||
s = "\\left(" + s + "\\right)";
|
|
||||||
return fp2str(m_c) + s;
|
|
||||||
}
|
|
||||||
|
|
||||||
string PlusConstant1::write(string arg) const {
|
static bool isTimesConst(Func1& f) {
|
||||||
//cout << "PlusConstant1" << endl;
|
if (f.ID() == TimesConstantFuncType)
|
||||||
if (m_c == 0.0) return m_f1->write(arg);
|
return true;
|
||||||
return m_f1->write(arg) + " + " + fp2str(m_c);
|
else
|
||||||
}
|
return false;
|
||||||
|
}
|
||||||
|
|
||||||
doublereal Func1::isProportional(TimesConstant1& other) {
|
static bool isExp(Func1& f) {
|
||||||
if (isIdentical(other.func1())) return other.c();
|
if (f.ID() == ExpFuncType)
|
||||||
return 0.0;
|
return true;
|
||||||
}
|
else
|
||||||
doublereal Func1::isProportional(Func1& other) {
|
return false;
|
||||||
if (isIdentical(other)) return 1.0;
|
}
|
||||||
else return 0.0;
|
|
||||||
}
|
|
||||||
|
|
||||||
static bool isConstant(Func1& f) {
|
static bool isPow(Func1& f) {
|
||||||
if (f.ID() == ConstFuncType)
|
if (f.ID() == PowFuncType)
|
||||||
return true;
|
return true;
|
||||||
else
|
else
|
||||||
return false;
|
return false;
|
||||||
}
|
}
|
||||||
|
|
||||||
static bool isZero(Func1& f) {
|
Func1& newSumFunction(Func1& f1, Func1& f2) {
|
||||||
if (f.ID() == ConstFuncType && f.c() == 0.0)
|
if (f1.isIdentical(f2))
|
||||||
return true;
|
return newTimesConstFunction(f1, 2.0);
|
||||||
else
|
if (isZero(f1)) {
|
||||||
return false;
|
delete &f1;
|
||||||
|
return f2;
|
||||||
}
|
}
|
||||||
|
if (isZero(f2)) {
|
||||||
static bool isOne(Func1& f) {
|
delete &f2;
|
||||||
if (f.ID() == ConstFuncType && f.c() == 1.0)
|
return f1;
|
||||||
return true;
|
|
||||||
else
|
|
||||||
return false;
|
|
||||||
}
|
}
|
||||||
|
doublereal c = f1.isProportional(f2);
|
||||||
static bool isTimesConst(Func1& f) {
|
if (c != 0) {
|
||||||
if (f.ID() == TimesConstantFuncType)
|
if (c == -1.0)
|
||||||
return true;
|
return *(new Const1(0.0));
|
||||||
else
|
else {
|
||||||
return false;
|
return newTimesConstFunction(f1, c + 1.0);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
return *(new Sum1(f1, f2));
|
||||||
|
}
|
||||||
|
|
||||||
static bool isExp(Func1& f) {
|
Func1& newDiffFunction(Func1& f1, Func1& f2) {
|
||||||
if (f.ID() == ExpFuncType)
|
if (isZero(f2)) {
|
||||||
return true;
|
delete &f2; return f1;
|
||||||
else
|
|
||||||
return false;
|
|
||||||
}
|
}
|
||||||
|
if (f1.isIdentical(f2)) {
|
||||||
static bool isPow(Func1& f) {
|
delete &f1; delete &f2;
|
||||||
if (f.ID() == PowFuncType)
|
return *(new Const1(0.0));
|
||||||
return true;
|
|
||||||
else
|
|
||||||
return false;
|
|
||||||
}
|
}
|
||||||
|
doublereal c = f1.isProportional(f2);
|
||||||
Func1& newSumFunction(Func1& f1, Func1& f2) {
|
if (c != 0.0) {
|
||||||
if (f1.isIdentical(f2))
|
if (c == 1.0) return *(new Const1(0.0));
|
||||||
return newTimesConstFunction(f1, 2.0);
|
else return newTimesConstFunction(f1, 1.0 - c);
|
||||||
if (isZero(f1)) {
|
|
||||||
delete &f1;
|
|
||||||
return f2;
|
|
||||||
}
|
|
||||||
if (isZero(f2)) {
|
|
||||||
delete &f2;
|
|
||||||
return f1;
|
|
||||||
}
|
|
||||||
doublereal c = f1.isProportional(f2);
|
|
||||||
if (c != 0) {
|
|
||||||
if (c == -1.0)
|
|
||||||
return *(new Const1(0.0));
|
|
||||||
else {
|
|
||||||
return newTimesConstFunction(f1, c + 1.0);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
return *(new Sum1(f1, f2));
|
|
||||||
}
|
}
|
||||||
|
return *(new Diff1(f1, f2));
|
||||||
|
}
|
||||||
|
|
||||||
Func1& newDiffFunction(Func1& f1, Func1& f2) {
|
Func1& newProdFunction(Func1& f1, Func1& f2) {
|
||||||
if (isZero(f2)) {
|
if (isOne(f1)) {
|
||||||
delete &f2; return f1;
|
delete &f1; return f2;
|
||||||
}
|
}
|
||||||
if (f1.isIdentical(f2)) {
|
if (isOne(f2)) {
|
||||||
delete &f1; delete &f2;
|
delete &f2; return f1;
|
||||||
return *(new Const1(0.0));
|
}
|
||||||
}
|
if (isZero(f1) || isZero(f2)) {
|
||||||
doublereal c = f1.isProportional(f2);
|
delete &f1; delete &f2;
|
||||||
if (c != 0.0) {
|
return *(new Const1(0.0));
|
||||||
if (c == 1.0) return *(new Const1(0.0));
|
}
|
||||||
else return newTimesConstFunction(f1, 1.0 - c);
|
if (isConstant(f1) && isConstant(f2)) {
|
||||||
}
|
doublereal c1c2 = f1.c() * f2.c();
|
||||||
return *(new Diff1(f1, f2));
|
delete &f1; delete &f2;
|
||||||
|
return *(new Const1(c1c2));
|
||||||
|
}
|
||||||
|
if (isConstant(f1)) {
|
||||||
|
doublereal c = f1.c();
|
||||||
|
delete &f1;
|
||||||
|
return newTimesConstFunction(f2, c);
|
||||||
|
}
|
||||||
|
if (isConstant(f2)) {
|
||||||
|
doublereal c = f2.c();
|
||||||
|
delete &f2;
|
||||||
|
return newTimesConstFunction(f1, c);
|
||||||
}
|
}
|
||||||
|
|
||||||
Func1& newProdFunction(Func1& f1, Func1& f2) {
|
|
||||||
if (isOne(f1)) {
|
|
||||||
delete &f1; return f2;
|
|
||||||
}
|
|
||||||
if (isOne(f2)) {
|
|
||||||
delete &f2; return f1;
|
|
||||||
}
|
|
||||||
if (isZero(f1) || isZero(f2)) {
|
|
||||||
delete &f1; delete &f2;
|
|
||||||
return *(new Const1(0.0));
|
|
||||||
}
|
|
||||||
if (isConstant(f1) && isConstant(f2)) {
|
|
||||||
doublereal c1c2 = f1.c() * f2.c();
|
|
||||||
delete &f1; delete &f2;
|
|
||||||
return *(new Const1(c1c2));
|
|
||||||
}
|
|
||||||
if (isConstant(f1)) {
|
|
||||||
doublereal c = f1.c();
|
|
||||||
delete &f1;
|
|
||||||
return newTimesConstFunction(f2, c);
|
|
||||||
}
|
|
||||||
if (isConstant(f2)) {
|
|
||||||
doublereal c = f2.c();
|
|
||||||
delete &f2;
|
|
||||||
return newTimesConstFunction(f1, c);
|
|
||||||
}
|
|
||||||
|
|
||||||
if (isPow(f1) && isPow(f2)) {
|
if (isPow(f1) && isPow(f2)) {
|
||||||
Func1& p = *(new Pow1(f1.c() + f2.c()));
|
Func1& p = *(new Pow1(f1.c() + f2.c()));
|
||||||
delete &f1; delete &f2;
|
delete &f1; delete &f2;
|
||||||
return p;
|
return p;
|
||||||
}
|
|
||||||
|
|
||||||
if (isExp(f1) && isExp(f2)) {
|
|
||||||
Func1& p = *(new Exp1(f1.c() + f2.c()));
|
|
||||||
delete &f1; delete &f2;
|
|
||||||
return p;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool tc1 = isTimesConst(f1);
|
|
||||||
bool tc2 = isTimesConst(f2);
|
|
||||||
|
|
||||||
if (tc1 || tc2) {
|
|
||||||
doublereal c1 = 1.0, c2 = 1.0;
|
|
||||||
Func1 *ff1 = 0, *ff2 = 0;
|
|
||||||
if (tc1) {
|
|
||||||
c1 = f1.c();
|
|
||||||
ff1 = &f1.func1_dup();
|
|
||||||
delete &f1;
|
|
||||||
}
|
|
||||||
else ff1 = &f1;
|
|
||||||
if (tc2) {
|
|
||||||
c2 = f2.c();
|
|
||||||
ff2 = &f2.func1_dup();
|
|
||||||
delete &f2;
|
|
||||||
}
|
|
||||||
else ff2 = &f2;
|
|
||||||
Func1& p = newProdFunction(*ff1, *ff2);
|
|
||||||
|
|
||||||
if (c1*c2 != 1.0) {
|
|
||||||
return newTimesConstFunction(p, c1*c2);
|
|
||||||
}
|
|
||||||
else
|
|
||||||
return p;
|
|
||||||
}
|
|
||||||
else
|
|
||||||
return *(new Product1(f1, f2));
|
|
||||||
}
|
}
|
||||||
|
|
||||||
Func1& newRatioFunction(Func1& f1, Func1& f2) {
|
if (isExp(f1) && isExp(f2)) {
|
||||||
if (isOne(f2)) return f1;
|
Func1& p = *(new Exp1(f1.c() + f2.c()));
|
||||||
if (isZero(f1)) return *(new Const1(0.0));
|
delete &f1; delete &f2;
|
||||||
if (f1.isIdentical(f2)) {
|
return p;
|
||||||
delete &f1; delete &f2;
|
|
||||||
return *(new Const1(1.0));
|
|
||||||
}
|
|
||||||
if (f1.ID() == PowFuncType && f2.ID() == PowFuncType) {
|
|
||||||
return *(new Pow1(f1.c() - f2.c()));
|
|
||||||
}
|
|
||||||
if (f1.ID() == ExpFuncType && f2.ID() == ExpFuncType) {
|
|
||||||
return *(new Exp1(f1.c() - f2.c()));
|
|
||||||
}
|
|
||||||
return *(new Ratio1(f1, f2));
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
bool tc1 = isTimesConst(f1);
|
||||||
|
bool tc2 = isTimesConst(f2);
|
||||||
|
|
||||||
|
if (tc1 || tc2) {
|
||||||
|
doublereal c1 = 1.0, c2 = 1.0;
|
||||||
|
Func1 *ff1 = 0, *ff2 = 0;
|
||||||
|
if (tc1) {
|
||||||
|
c1 = f1.c();
|
||||||
|
ff1 = &f1.func1_dup();
|
||||||
|
delete &f1;
|
||||||
|
}
|
||||||
|
else ff1 = &f1;
|
||||||
|
if (tc2) {
|
||||||
|
c2 = f2.c();
|
||||||
|
ff2 = &f2.func1_dup();
|
||||||
|
delete &f2;
|
||||||
|
}
|
||||||
|
else ff2 = &f2;
|
||||||
|
Func1& p = newProdFunction(*ff1, *ff2);
|
||||||
|
|
||||||
|
if (c1*c2 != 1.0) {
|
||||||
|
return newTimesConstFunction(p, c1*c2);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
return p;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
return *(new Product1(f1, f2));
|
||||||
|
}
|
||||||
|
|
||||||
|
Func1& newRatioFunction(Func1& f1, Func1& f2) {
|
||||||
|
if (isOne(f2)) return f1;
|
||||||
|
if (isZero(f1)) return *(new Const1(0.0));
|
||||||
|
if (f1.isIdentical(f2)) {
|
||||||
|
delete &f1; delete &f2;
|
||||||
|
return *(new Const1(1.0));
|
||||||
|
}
|
||||||
|
if (f1.ID() == PowFuncType && f2.ID() == PowFuncType) {
|
||||||
|
return *(new Pow1(f1.c() - f2.c()));
|
||||||
|
}
|
||||||
|
if (f1.ID() == ExpFuncType && f2.ID() == ExpFuncType) {
|
||||||
|
return *(new Exp1(f1.c() - f2.c()));
|
||||||
|
}
|
||||||
|
return *(new Ratio1(f1, f2));
|
||||||
|
}
|
||||||
|
|
||||||
Func1& newCompositeFunction(Func1& f1, Func1& f2) {
|
Func1& newCompositeFunction(Func1& f1, Func1& f2) {
|
||||||
//#ifdef DEBUG_FUNC
|
//#ifdef DEBUG_FUNC
|
||||||
//cout << "creating new composite function." << endl;
|
//cout << "creating new composite function." << endl;
|
||||||
//cout << "f1 = " << f1.write("x") << " " << f1.ID() << endl;
|
//cout << "f1 = " << f1.write("x") << " " << f1.ID() << endl;
|
||||||
//cout << "f2 = " << f2.write("x") << " " << f2.ID() << endl;
|
//cout << "f2 = " << f2.write("x") << " " << f2.ID() << endl;
|
||||||
//#endif
|
//#endif
|
||||||
if (isZero(f1)) {
|
if (isZero(f1)) {
|
||||||
delete &f1; delete &f2;
|
delete &f1; delete &f2;
|
||||||
return *(new Const1(0.0));
|
return *(new Const1(0.0));
|
||||||
}
|
|
||||||
if (isConstant(f1)) {
|
|
||||||
delete &f2;
|
|
||||||
return f1;
|
|
||||||
}
|
|
||||||
if (isPow(f1) && f1.c() == 1.0) {
|
|
||||||
delete &f1;
|
|
||||||
return f2;
|
|
||||||
}
|
|
||||||
if (isPow(f1) && f1.c() == 0.0) {
|
|
||||||
delete &f1;
|
|
||||||
delete &f2;
|
|
||||||
return *(new Const1(1.0));
|
|
||||||
}
|
|
||||||
if (isPow(f1) && isPow(f2)) {
|
|
||||||
doublereal c1c2 = f1.c() * f2.c();
|
|
||||||
delete &f1;
|
|
||||||
delete &f2;
|
|
||||||
return *(new Pow1(c1c2));
|
|
||||||
}
|
|
||||||
return *(new Composite1(f1, f2));
|
|
||||||
}
|
}
|
||||||
|
if (isConstant(f1)) {
|
||||||
|
delete &f2;
|
||||||
|
return f1;
|
||||||
|
}
|
||||||
|
if (isPow(f1) && f1.c() == 1.0) {
|
||||||
|
delete &f1;
|
||||||
|
return f2;
|
||||||
|
}
|
||||||
|
if (isPow(f1) && f1.c() == 0.0) {
|
||||||
|
delete &f1;
|
||||||
|
delete &f2;
|
||||||
|
return *(new Const1(1.0));
|
||||||
|
}
|
||||||
|
if (isPow(f1) && isPow(f2)) {
|
||||||
|
doublereal c1c2 = f1.c() * f2.c();
|
||||||
|
delete &f1;
|
||||||
|
delete &f2;
|
||||||
|
return *(new Pow1(c1c2));
|
||||||
|
}
|
||||||
|
return *(new Composite1(f1, f2));
|
||||||
|
}
|
||||||
|
|
||||||
Func1& newTimesConstFunction(Func1& f, doublereal c) {
|
Func1& newTimesConstFunction(Func1& f, doublereal c) {
|
||||||
if (c == 0.0) {
|
if (c == 0.0) {
|
||||||
delete &f;
|
delete &f;
|
||||||
return *(new Const1(0.0));
|
return *(new Const1(0.0));
|
||||||
}
|
|
||||||
if (c == 1.0) {
|
|
||||||
return f;
|
|
||||||
}
|
|
||||||
if (f.ID() == TimesConstantFuncType) {
|
|
||||||
f.setC(f.c() * c);
|
|
||||||
return f;
|
|
||||||
}
|
|
||||||
return *(new TimesConstant1(f, c));
|
|
||||||
}
|
}
|
||||||
|
if (c == 1.0) {
|
||||||
|
return f;
|
||||||
|
}
|
||||||
|
if (f.ID() == TimesConstantFuncType) {
|
||||||
|
f.setC(f.c() * c);
|
||||||
|
return f;
|
||||||
|
}
|
||||||
|
return *(new TimesConstant1(f, c));
|
||||||
|
}
|
||||||
|
|
||||||
Func1& newPlusConstFunction(Func1& f, doublereal c) {
|
Func1& newPlusConstFunction(Func1& f, doublereal c) {
|
||||||
if (c == 0.0) {
|
if (c == 0.0) {
|
||||||
return f;
|
return f;
|
||||||
}
|
|
||||||
if (isConstant(f)) {
|
|
||||||
doublereal cc = f.c() + c;
|
|
||||||
delete &f;
|
|
||||||
return *(new Const1(cc));
|
|
||||||
}
|
|
||||||
if (f.ID() == PlusConstantFuncType) {
|
|
||||||
f.setC(f.c() + c);
|
|
||||||
return f;
|
|
||||||
}
|
|
||||||
return *(new PlusConstant1(f, c));
|
|
||||||
}
|
}
|
||||||
|
if (isConstant(f)) {
|
||||||
|
doublereal cc = f.c() + c;
|
||||||
|
delete &f;
|
||||||
|
return *(new Const1(cc));
|
||||||
|
}
|
||||||
|
if (f.ID() == PlusConstantFuncType) {
|
||||||
|
f.setC(f.c() + c);
|
||||||
|
return f;
|
||||||
|
}
|
||||||
|
return *(new PlusConstant1(f, c));
|
||||||
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user