File indexing completed on 2024-04-28 05:43:16 

0001 /***************************************************************************
0002  *   Copyright (C) 2003-2004 by David Saxton                               *
0003  *   david@bluehaze.org                                                    *
0004  *                                                                         *
0005  *   This program is free software; you can redistribute it and/or modify  *
0006  *   it under the terms of the GNU General Public License as published by  *
0007  *   the Free Software Foundation; either version 2 of the License, or     *
0008  *   (at your option) any later version.                                   *
0009  ***************************************************************************/
0010 
0011 #include "vcvs.h"
0012 #include "elementset.h"
0013 
0014 VCVS::VCVS(const double gain)
0015     : Element::Element()
0016 {
0017     m_g = gain;
0018     m_numCBranches = 1;
0019     m_numCNodes = 4;
0020 }
0021 
0022 VCVS::~VCVS()
0023 {
0024 }
0025 
0026 void VCVS::setGain(const double g)
0027 {
0028     if (g == m_g)
0029         return;
0030 
0031     if (p_eSet)
0032         p_eSet->setCacheInvalidated();
0033 
0034     m_g = -m_g;
0035     add_initial_dc();
0036 
0037     m_g = g;
0038     add_initial_dc();
0039 }
0040 
0041 void VCVS::add_initial_dc()
0042 {
0043     if (!b_status)
0044         return;
0045 
0046     A_c(0, 0) -= m_g;
0047     A_c(0, 1) += m_g;
0048     A_b(2, 0) = 1;
0049     A_c(0, 2) = 1;
0050     A_b(3, 0) = -1;
0051     A_c(0, 3) = -1;
0052 }
0053 
0054 void VCVS::updateCurrents()
0055 {
0056     if (!b_status)
0057         return;
0058     m_cnodeI[0] = m_cnodeI[1] = 0.;
0059     m_cnodeI[3] = p_cbranch[0]->i;
0060     m_cnodeI[2] = -m_cnodeI[3];
0061 }