81 radians = here->SRCacPhase *
M_PI / 180.0;
88 if (here->SRCfuncTGiven) {
90 "%s: no DC value, transient time 0 value used",
95 "%s: has no value, DC 0 assumed",
131 "%s: unknown controlling source %s",namarray);
137 TSTALLOC(SRCposIbrptr, SRCposNode, SRCbranch)
138 TSTALLOC(SRCnegIbrptr, SRCnegNode, SRCbranch)
139 TSTALLOC(SRCibrNegptr, SRCbranch, SRCnegNode)
140 TSTALLOC(SRCibrPosptr, SRCbranch, SRCposNode)
145 if (here->SRCacGiven)
146 TSTALLOC(SRCibrIbrptr, SRCbranch, SRCbranch)
148 if (ckt->CKTpreload) {
162 TSTALLOC(SRCibrContBrptr, SRCbranch, SRCcontBranch)
164 here->SRCdcFunc = src_ccvs;
167 else
if (here->SRCvcCoeffGiven) {
168 TSTALLOC(SRCibrContPosptr, SRCbranch, SRCcontPosNode)
169 TSTALLOC(SRCibrContNegptr, SRCbranch, SRCcontNegNode)
171 here->SRCdcFunc = src_vcvs;
178 TSTALLOC(SRCposContBrptr,SRCposNode,SRCcontBranch)
179 TSTALLOC(SRCnegContBrptr,SRCnegNode,SRCcontBranch)
181 here->SRCdcFunc = src_cccs;
184 else
if (here->SRCvcCoeffGiven) {
185 TSTALLOC(SRCposContPosptr, SRCposNode, SRCcontPosNode)
186 TSTALLOC(SRCposContNegptr, SRCposNode, SRCcontNegNode)
187 TSTALLOC(SRCnegContPosptr, SRCnegNode, SRCcontPosNode)
188 TSTALLOC(SRCnegContNegptr, SRCnegNode, SRCcontNegNode)
190 here->SRCdcFunc = src_vccs;
195 if (here->SRCtree ==
NULL) {
234 "%s: unknown controlling source %s",namarray);
239 TSTALLOC(SRCposptr[j++],SRCbranch,SRCcontBranch);
242 TSTALLOC(SRCposptr[j++],SRCposNode,SRCcontBranch);
243 TSTALLOC(SRCposptr[j++],SRCnegNode,SRCcontBranch);
struct sSRCinstance * SRCnextInstance
#define TSTALLOC(ptr, first, second)
SRCinstance * SRCinstances
#define MY_TSTALLOC(ptr, first, second)
struct sSRCmodel * SRCnextModel