Category : C++ Source Code
Archive   : IDIOMS.ZIP
Filename : 5-19.C

 
Output of file : 5-19.C contained in archive : IDIOMS.ZIP
/* Copyright (c) 1992 by AT&T Bell Laboratories. */
/* Advanced C++ Programming Styles and Idioms */
/* James O. Coplien */
/* All rights reserved. */

#include

typedef double time;

class SeriesRLCStepResponse {
public:
virtual complex current(time t) { return object->current(t); };
double frequency() const { return 1.0 / (L * C); }
SeriesRLCStepResponse(double r, double l,
double c, double initialCurrent, short isenvelope=1);
protected:
double R, L, C, currentT0;
double alpha;
complex omegad, a1, b1, a2, b2, s1, s2;
private:
SeriesRLCStepResponse *object;
};

class UnderDampedResponse: public SeriesRLCStepResponse {
public:
UnderDampedResponse(double r, double l, double c, double i) :
SeriesRLCStepResponse(r,l,c,i,0) { }
complex current(time t) {
return exp(-alpha * t) * (b1 * cos(omegad * t) +
b2 * sin(omegad * t));
}
};

class OverDampedResponse: public SeriesRLCStepResponse {
public:
OverDampedResponse(double r, double l, double c, double i) :
SeriesRLCStepResponse(r,l,c,i,0) { }
complex current(time t) {
return a1 * exp(s1 * t) + a2 * exp(s2 * t);
}
};

class CriticallyDampedResponse: public SeriesRLCStepResponse {
public:
CriticallyDampedResponse(double r, double l, double c, double i) :
SeriesRLCStepResponse(r,l,c,i,0) { }
complex criticallyDampedResponse(time t) {
return exp(-alpha * t) * (a1 * t + a2);
}
};

SeriesRLCStepResponse::SeriesRLCStepResponse(
double r, double l, double c, double initialCurrent,
short isenvelope) {
R = r; L = l; C = c; currentT0 = initialCurrent;
alpha = R / (L + L);
// calculation of a1, b1, a2, b2, etc
if (isenvelope) {
if (alpha < frequency()) {
object = new UnderDampedResponse(r, l, c, initialCurrent);
} else if (alpha > frequency()) {
object = new OverDampedResponse(r, l, c, initialCurrent);
} else {
object = new CriticallyDampedResponse(r, l, c, initialCurrent);
}
} else {
omegad = sqrt(frequency() * frequency() - alpha * alpha);
}
}

int main() {
SeriesRLCStepResponse afilter(0.0, 0.0, 0.0, 0.0);
complex i10 = afilter.current(10.0);
}


  3 Responses to “Category : C++ Source Code
Archive   : IDIOMS.ZIP
Filename : 5-19.C
”

  1. Daniel says:
    January 27, 2013 at 3:59 pm

    Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. Joshie says:
    March 18, 2014 at 4:57 pm

    This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. DiskingRound says:
    January 14, 2015 at 10:57 pm

    But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/