00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019 #include "Power.h"
00020
00021 using std::ostringstream;
00022 using namespace Marsyas;
00023
00024 Power::Power(mrs_string name):MarSystem("Power",name)
00025 {
00026 addControls();
00027 }
00028
00029 Power::Power(const Power& a) : MarSystem(a)
00030 {
00031 }
00032
00033 Power::~Power()
00034 {
00035 }
00036
00037
00038 MarSystem*
00039 Power::clone() const
00040 {
00041 return new Power(*this);
00042 }
00043
00044 void
00045 Power::addControls()
00046 {
00047
00048 }
00049
00050 void
00051 Power::myUpdate(MarControlPtr sender)
00052 {
00053 (void) sender;
00054 MRSDIAG("Power.cpp - Power:myUpdate");
00055
00056 setctrl("mrs_natural/onSamples", 1);
00057 setctrl("mrs_natural/onObservations",
00058 getctrl("mrs_natural/inObservations"));
00059 setctrl("mrs_real/osrate",
00060 getctrl("mrs_real/israte"));
00061
00062 mrs_string inObsNames = ctrl_inObsNames_->to<mrs_string>();
00063 ctrl_onObsNames_->setValue(obsNamesAddPrefix(inObsNames, "Power_"), NOUPDATE);
00064 }
00065
00066
00067 void
00068 Power::myProcess(realvec& in, realvec& out)
00069 {
00070 mrs_natural t,o;
00071
00072
00073 out.setval(0.0);
00074 for (o=0; o < inObservations_; o++)
00075 {
00076 mrs_real tmp=0;
00077 for (t = 0; t < inSamples_; t++)
00078 {
00079 tmp+= in(o,t)*in(o,t);
00080 }
00081 out(o,0) = sqrt(tmp);
00082 }
00083 }
00084
00085
00086
00087
00088
00089
00090
00091
00092