Chaste Release::3.1
|
00001 /* 00002 00003 Copyright (c) 2005-2012, University of Oxford. 00004 All rights reserved. 00005 00006 University of Oxford means the Chancellor, Masters and Scholars of the 00007 University of Oxford, having an administrative office at Wellington 00008 Square, Oxford OX1 2JD, UK. 00009 00010 This file is part of Chaste. 00011 00012 Redistribution and use in source and binary forms, with or without 00013 modification, are permitted provided that the following conditions are met: 00014 * Redistributions of source code must retain the above copyright notice, 00015 this list of conditions and the following disclaimer. 00016 * Redistributions in binary form must reproduce the above copyright notice, 00017 this list of conditions and the following disclaimer in the documentation 00018 and/or other materials provided with the distribution. 00019 * Neither the name of the University of Oxford nor the names of its 00020 contributors may be used to endorse or promote products derived from this 00021 software without specific prior written permission. 00022 00023 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" 00024 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 00025 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 00026 ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE 00027 LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 00028 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE 00029 GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 00030 HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 00031 LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT 00032 OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 00033 00034 */ 00035 #include "FitzHughNagumo1961OdeSystem.hpp" 00036 #include "OdeSystemInformation.hpp" 00037 #include <cmath> 00038 00039 // 00040 // Model-scope constant parameters 00041 // 00042 const double FitzHughNagumo1961OdeSystem::mAlpha = -0.08; 00043 const double FitzHughNagumo1961OdeSystem::mGamma = 3.00; 00044 const double FitzHughNagumo1961OdeSystem::mEpsilon = 0.005; 00045 00046 00047 FitzHughNagumo1961OdeSystem::FitzHughNagumo1961OdeSystem( 00048 boost::shared_ptr<AbstractIvpOdeSolver> pOdeSolver, 00049 boost::shared_ptr<AbstractStimulusFunction> pIntracellularStimulus) 00050 : AbstractCardiacCell(pOdeSolver, 2, 0, pIntracellularStimulus) 00051 { 00052 mpSystemInfo = OdeSystemInformation<FitzHughNagumo1961OdeSystem>::Instance(); 00053 00054 Init(); 00055 } 00056 00057 FitzHughNagumo1961OdeSystem::~FitzHughNagumo1961OdeSystem(void) 00058 { 00059 } 00060 00061 void FitzHughNagumo1961OdeSystem::EvaluateYDerivatives(double time, const std::vector<double> &rY, std::vector<double>& rDY) 00062 { 00063 double membrane_V = rY[0]; // v 00064 double recovery_variable = rY[1]; // w 00065 00066 double i_stim = GetIntracellularAreaStimulus(time); 00067 00068 // dV/dt 00069 double membrane_V_prime = 0; 00070 // do not update voltage if the mSetVoltageDerivativeToZero flag has been set 00071 if (!mSetVoltageDerivativeToZero) 00072 { 00073 membrane_V_prime = membrane_V*(membrane_V-mAlpha)*(1-membrane_V)-recovery_variable+i_stim; 00074 } 00075 00076 // dw/dt 00077 double recovery_variable_prime = mEpsilon*(membrane_V-mGamma*recovery_variable); 00078 00079 rDY[0] = membrane_V_prime; 00080 rDY[1] = recovery_variable_prime; 00081 } 00082 00083 double FitzHughNagumo1961OdeSystem::GetIIonic(const std::vector<double>* pStateVariables) 00084 { 00085 if (!pStateVariables) pStateVariables = &mStateVariables; 00086 double membrane_V = (*pStateVariables)[mVoltageIndex]; 00087 double recovery_variable = (*pStateVariables)[1]; 00088 double fake_ionic_current = membrane_V*(membrane_V-mAlpha)*(1-membrane_V)-recovery_variable; 00089 return fake_ionic_current; 00090 } 00091 00092 00093 00094 00095 template<> 00096 void OdeSystemInformation<FitzHughNagumo1961OdeSystem>::Initialise(void) 00097 { 00098 /* 00099 * State variables 00100 */ 00101 this->mVariableNames.push_back("V"); 00102 this->mVariableUnits.push_back("mV"); 00103 this->mInitialConditions.push_back(0.0); 00104 00105 this->mVariableNames.push_back("w"); 00106 this->mVariableUnits.push_back(""); 00107 this->mInitialConditions.push_back(0.0); 00108 00109 this->mInitialised = true; 00110 }