Files
solver/OndselSolver/FunctionX.cpp
aiksiongkoh 3d6a23a678 Cmake gtest (#72)
* Check rackpin and gear for zero radii

* rebase zero-radii-check (#69)

* contributing

* Update push-freecad.yml

updated actions/checkout to v4

* dragging log for debugging

* fix calcdxNorm crash

* setDebug and remove MBDyn*

* Update cmakelists.txt

* fix includes for gcc-14

gcc-14 is more disciplined about not including <algorithm> transitively.

* fix runDragStep

* backhoe files (#65)

* Mark unused variables to silence compiler warnings. (#64)

* Backhoe issues (#67)

* backhoe issues

* runDragStep edit

* backhoe issues

* runDragStep edit

* Reduce large drag step progressively until convergence.

* Switch to using built-in M_PI, even on MSVC (#68)

---------

Co-authored-by: Brad Collette <bradcollette@pop-os.localdomain>
Co-authored-by: mosfet80 <realeandrea@yahoo.it>
Co-authored-by: PaddleStroke <pierrelouis.boyer@gmail.com>
Co-authored-by: Jed Brown <jed@jedbrown.org>
Co-authored-by: sliptonic <shopinthewoods@gmail.com>
Co-authored-by: Chris Hennes <chennes@pioneerlibrarysystem.org>

* in progress

* Gtest added

---------

Co-authored-by: Brad Collette <bradcollette@pop-os.localdomain>
Co-authored-by: mosfet80 <realeandrea@yahoo.it>
Co-authored-by: PaddleStroke <pierrelouis.boyer@gmail.com>
Co-authored-by: Jed Brown <jed@jedbrown.org>
Co-authored-by: sliptonic <shopinthewoods@gmail.com>
Co-authored-by: Chris Hennes <chennes@pioneerlibrarysystem.org>
2024-07-30 14:45:59 -06:00

106 lines
2.6 KiB
C++

/***************************************************************************
* Copyright (c) 2023 Ondsel, Inc. *
* *
* This file is part of OndselSolver. *
* *
* See LICENSE file for details about copyright. *
***************************************************************************/
#include <algorithm>
#include "FunctionX.h"
#include "Constant.h"
#include "Sum.h"
#include "Arguments.h"
using namespace MbD;
MbD::FunctionX::FunctionX(Symsptr arg) : xx(arg)
{
}
void MbD::FunctionX::arguments(Symsptr args)
{
auto arguments = std::static_pointer_cast<Arguments>(args);
assert(arguments->terms->size() == 1);
xx = arguments->terms->front();
}
Symsptr MbD::FunctionX::copyWith(Symsptr self)
{
return self;
}
Symsptr MbD::FunctionX::expandUntil(Symsptr sptr, std::shared_ptr<std::unordered_set<Symsptr>> set)
{
auto itr = std::find_if(set->begin(), set->end(), [sptr](Symsptr sym) {return sptr.get() == sym.get(); });
if (itr != set->end()) return sptr;
auto newx = xx->expandUntil(xx, set);
auto copy = copyWith(newx);
if (newx->isConstant()) {
return sptrConstant(copy->getValue());
}
else {
return copy;
}
}
Symsptr MbD::FunctionX::simplifyUntil(Symsptr sptr, std::shared_ptr<std::unordered_set<Symsptr>> set)
{
auto itr = std::find_if(set->begin(), set->end(), [sptr](Symsptr sym) {return sptr.get() == sym.get(); });
if (itr != set->end()) return sptr;
auto newx = xx->simplifyUntil(xx, set);
auto copy = copyWith(newx);
if (newx->isConstant()) {
return sptrConstant(copy->getValue());
}
else {
return copy;
}
}
Symsptr MbD::FunctionX::differentiateWRT(Symsptr var)
{
if (this == var.get()) return sptrConstant(1.0);
auto dfdx = differentiateWRTx();
auto dxdvar = xx->differentiateWRT(var);
return Symbolic::times(dfdx, dxdvar);
}
Symsptr MbD::FunctionX::differentiateWRTx()
{
assert(false);
return Symsptr();
}
void MbD::FunctionX::createMbD(std::shared_ptr<System> mbdSys, std::shared_ptr<Units> mbdUnits)
{
xx->createMbD(mbdSys, mbdUnits);
}
double MbD::FunctionX::getValue()
{
assert(false);
return 0.0;
}
double MbD::FunctionX::getValue(double arg)
{
double answer;
if (xx->isVariable()) {
auto oldVal = xx->getValue();
xx->setValue(arg);
answer = getValue();
xx->setValue(oldVal);
}
else {
assert(false);
}
return answer;
}
bool MbD::FunctionX::isConstant()
{
return xx->isConstant();
}