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 00036 #include "UblasIncludes.hpp" 00037 #include "AbstractVanLeeuwen2009WntSwatCellCycleModel.hpp" 00038 00039 AbstractVanLeeuwen2009WntSwatCellCycleModel::AbstractVanLeeuwen2009WntSwatCellCycleModel(boost::shared_ptr<AbstractCellCycleModelOdeSolver> pOdeSolver) 00040 : AbstractWntOdeBasedCellCycleModel(pOdeSolver) 00041 { 00042 } 00043 00044 void AbstractVanLeeuwen2009WntSwatCellCycleModel::ChangeCellProliferativeTypeDueToCurrentBetaCateninLevel() 00045 { 00046 assert(mpOdeSystem != NULL); 00047 assert(mpCell != NULL); 00048 double beta_catenin_level = mpOdeSystem->rGetStateVariables()[16] 00049 + mpOdeSystem->rGetStateVariables()[17] 00050 + mpOdeSystem->rGetStateVariables()[18] 00051 + mpOdeSystem->rGetStateVariables()[19]; 00052 00053 CellProliferativeType cell_type = TRANSIT; 00054 00055 // For mitogenic stimulus of 1/25.0 in Wnt equations 00056 if (beta_catenin_level < 10.188) 00057 { 00058 cell_type = DIFFERENTIATED; 00059 } 00060 00061 mpCell->SetCellProliferativeType(cell_type); 00062 } 00063 00064 void AbstractVanLeeuwen2009WntSwatCellCycleModel::Initialise() 00065 { 00066 assert(mpOdeSystem == NULL); 00067 assert(mpCell != NULL); 00068 00069 double wnt_level = GetWntLevel(); 00070 00071 InitialiseOdeSystem(wnt_level, mpCell->GetMutationState()); 00072 00073 mpOdeSystem->SetStateVariables(mpOdeSystem->GetInitialConditions()); 00074 00075 ChangeCellProliferativeTypeDueToCurrentBetaCateninLevel(); 00076 } 00077 00078 void AbstractVanLeeuwen2009WntSwatCellCycleModel::AdjustOdeParameters(double currentTime) 00079 { 00080 // Pass this time step's Wnt stimulus into the solver as a constant over this timestep. 00081 mpOdeSystem->rGetStateVariables()[21] = GetWntLevel(); 00082 00083 // Use the cell's current mutation status as another input 00084 static_cast<VanLeeuwen2009WntSwatCellCycleOdeSystem*>(mpOdeSystem)->SetMutationState(mpCell->GetMutationState()); 00085 } 00086 00087 double AbstractVanLeeuwen2009WntSwatCellCycleModel::GetMembraneBoundBetaCateninLevel() 00088 { 00089 return mpOdeSystem->rGetStateVariables()[13] + mpOdeSystem->rGetStateVariables()[14]; 00090 } 00091 00092 double AbstractVanLeeuwen2009WntSwatCellCycleModel::GetCytoplasmicBetaCateninLevel() 00093 { 00094 return mpOdeSystem->rGetStateVariables()[7] + mpOdeSystem->rGetStateVariables()[8] 00095 + mpOdeSystem->rGetStateVariables()[9] + mpOdeSystem->rGetStateVariables()[10] 00096 + mpOdeSystem->rGetStateVariables()[11]; 00097 } 00098 00099 double AbstractVanLeeuwen2009WntSwatCellCycleModel::GetNuclearBetaCateninLevel() 00100 { 00101 return mpOdeSystem->rGetStateVariables()[16] + 00102 mpOdeSystem->rGetStateVariables()[17] + 00103 mpOdeSystem->rGetStateVariables()[18] + 00104 mpOdeSystem->rGetStateVariables()[19]; 00105 } 00106 00107 void AbstractVanLeeuwen2009WntSwatCellCycleModel::OutputCellCycleModelParameters(out_stream& rParamsFile) 00108 { 00109 // No new parameters to output 00110 00111 // Call method on direct parent class 00112 AbstractWntOdeBasedCellCycleModel::OutputCellCycleModelParameters(rParamsFile); 00113 }