Chaste Release::3.1
RegularStimulus.cpp
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 
00037 #include "RegularStimulus.hpp"
00038 #include <cmath>
00039 #include <cassert>
00040 
00041 #include <iostream>
00042 
00043 RegularStimulus::RegularStimulus(double magnitudeOfStimulus, double duration, double period, double startTime, double stopTime)
00044 {
00045     assert(period > 0);
00046     assert(period >= duration);
00047 
00048     mMagnitudeOfStimulus = magnitudeOfStimulus;
00049     mDuration = duration;
00050     mPeriod = period;
00051     mStartTime = startTime;
00052     mStopTime = stopTime;
00053 
00054     //Swell duration to avoid rounding issues
00055     mDuration += period*DBL_EPSILON;
00056 }
00057 
00058 double RegularStimulus::GetStimulus(double time)
00059 {
00060     /*
00061      *  This covers a borderline case where start time is larger than period
00062      * and period divides start time, e.g. start_time=2 period=1.
00063      *
00064      * fmod() will return -0 in this case and will therefore switch the stimulus on.
00065      */
00066     if (time < mStartTime)
00067     {
00068         return 0.0;
00069     }
00070 
00071     double beatTime = fmod(time-mStartTime,mPeriod);
00072 
00073     if (beatTime >=0 && beatTime <= mDuration && time <= mStopTime)
00074     {
00075         return mMagnitudeOfStimulus;
00076     }
00077     else
00078     {
00079         return 0.0;
00080     }
00081 }
00082 
00083 double RegularStimulus::GetPeriod()
00084 {
00085     return mPeriod;
00086 }
00087 
00088 double RegularStimulus::GetMagnitude()
00089 {
00090     return mMagnitudeOfStimulus;
00091 }
00092 
00093 double RegularStimulus::GetDuration()
00094 {
00095     return mDuration;
00096 }
00097 
00098 double RegularStimulus::GetStartTime()
00099 {
00100     return mStartTime;
00101 }
00102 
00103 void RegularStimulus::SetPeriod(double period)
00104 {
00105     mPeriod = period;
00106 }
00107 
00108 void RegularStimulus::SetDuration(double duration)
00109 {
00110     mDuration = duration;
00111 }
00112 
00113 void RegularStimulus::SetStartTime(double startTime)
00114 {
00115     mStartTime = startTime;
00116 }
00117 
00118 void RegularStimulus::SetStopTime(double stopTime)
00119 {
00120     mStopTime = stopTime;
00121 }
00122 
00123 // Serialization for Boost >= 1.36
00124 #include "SerializationExportWrapperForCpp.hpp"
00125 CHASTE_CLASS_EXPORT(RegularStimulus)