enable OP information for hicum0 and mextram
This commit is contained in:
Holger Vogt
parent
176023f470
commit
8a21f6f2c0
|
|
@ -141,7 +141,7 @@ organization and externally, subject to the following restrictions.
|
|||
`include "discipline.h"
|
||||
|
||||
// Comment this line, if calculation of operating point values should be omitted
|
||||
//`define CALC_OP
|
||||
`define CALC_OP
|
||||
|
||||
// Comment this line, if calculation of noise analysis should be omitted
|
||||
//`define CALC_NOISE
|
||||
|
|
@ -1139,7 +1139,7 @@ module hic0_full (c,b,e,s,tnode);
|
|||
if (flsh == 0 || rth < `MIN_R) begin
|
||||
I(br_sht) <+ Vrth/`MIN_R;
|
||||
end else begin
|
||||
I(br_sht) <+ Vrth/rth-pterm; //`P(spectre:gmin="add");
|
||||
I(br_sht) <+ Vrth/rth_t-pterm; //`P(spectre:gmin="add");
|
||||
I(br_sht) <+ ddt(cth*Vrth);
|
||||
end
|
||||
// ******************************************
|
||||
|
|
@ -1192,14 +1192,18 @@ module hic0_full (c,b,e,s,tnode);
|
|||
|
||||
|
||||
`ifdef CALC_OP
|
||||
if (analysis("static")) begin : OP_calculation
|
||||
// if (analysis("static")) begin : OP_calculation
|
||||
begin : OP_calculation
|
||||
real oRPIi, oRMUi, oROi, gAVL;
|
||||
real Cdei, Cdci, Cjei, Cjci, Cjcx, CBC;
|
||||
real R_tot;
|
||||
|
||||
IB = I(<b>);
|
||||
IC = I(<c>);
|
||||
ISUB = I(<s>);
|
||||
// IB = I(<b>);
|
||||
// IC = I(<c>);
|
||||
// ISUB = I(<s>);
|
||||
IB = ibe;
|
||||
IC = it;
|
||||
ISUB = ijsc;
|
||||
IAVL = iavl;
|
||||
|
||||
VBE = V(b,e);
|
||||
|
|
@ -1207,7 +1211,8 @@ module hic0_full (c,b,e,s,tnode);
|
|||
VCE = V(c,e);
|
||||
VSC = V(s,c);
|
||||
|
||||
GMi = ddx(it_wop,V(bi));
|
||||
// GMi = ddx(it_wop,V(bi));
|
||||
GMi = ddx(it,V(bi));
|
||||
|
||||
oRPIi = ddx(ijbe,V(bi));
|
||||
RPIi = 1.0/(oRPIi+1e-12);
|
||||
|
|
|
|||
|
|
@ -23,8 +23,11 @@
|
|||
`define VEXLIM 400.0
|
||||
`define PI 3.1415926
|
||||
|
||||
`define NGSPICE_ADMS
|
||||
|
||||
// Desriptions and units
|
||||
`ifdef __VAMS_COMPACT_MODELING__
|
||||
//`ifdef __VAMS_COMPACT_MODELING__
|
||||
`ifdef NGSPICE_ADMS
|
||||
`define OPP(nam,uni,des) (* desc="des", units="uni" *) real nam;
|
||||
`define PAR(des,uni) (* desc="des", units="uni" *) parameter real
|
||||
`define PAI(des,uni) (* desc="des", units="uni" *) parameter integer
|
||||
|
|
|
|||
|
|
@ -9,7 +9,8 @@ else
|
|||
my_gmin = $simparam("gmin");
|
||||
|
||||
// Initialize model constants
|
||||
|
||||
`INITIAL_INSTANCE
|
||||
begin
|
||||
// Impact ionization constants (NPN - PNP)
|
||||
|
||||
if (TYPE == 1) begin
|
||||
|
|
@ -85,4 +86,4 @@ inv_VGZEB_Tr = 1.0 / VGZEB_Tr;
|
|||
inv_VDE = 1.0 / VDE;
|
||||
|
||||
// end: RvdT, November 2008; Zener tunneling current model
|
||||
|
||||
end
|
||||
|
|
|
|||
|
|
@ -6,12 +6,14 @@
|
|||
// Evaluate the operating point (output) variables
|
||||
begin
|
||||
|
||||
`ifdef __VAMS_COMPACT_MODELING__
|
||||
|
||||
//`ifdef __VAMS_COMPACT_MODELING__
|
||||
`ifdef NGSPICE_ADMS
|
||||
|
||||
// The external currents and the current gain
|
||||
OP_ic = I(<c>); // External DC collector current
|
||||
OP_ib = I(<b>); // External DC base Current
|
||||
//OP_ic = I(<c>); // External DC collector current
|
||||
OP_ic = TYPE*Ic1c2; // External DC collector current
|
||||
//OP_ib = I(<b>); // External DC base Current
|
||||
OP_ib = TYPE*Ib1b2; // External DC base Current
|
||||
|
||||
if (OP_ib == 0)
|
||||
begin
|
||||
|
|
@ -23,13 +25,15 @@ begin
|
|||
end
|
||||
|
||||
// begin added in MXT 504.9:
|
||||
OP_ie = I(<e>); // External DC emitter current
|
||||
//OP_ie = I(<e>); // External DC emitter current
|
||||
OP_ie = TYPE*(In+Ib1_s); // External DC emitter current
|
||||
OP_vbe = V(b, e); // External base-emitter bias
|
||||
OP_vce = V(c, e); // External collector-emitter bias
|
||||
OP_vbc = V(b, c); // External base-collector bias
|
||||
|
||||
`ifdef SUBSTRATE
|
||||
OP_is = I(<s>); // External DC emitter current
|
||||
//OP_is = I(<s>); // External DC emitter current
|
||||
OP_is = TYPE*Isub; // External DC emitter current
|
||||
OP_vse = V(s, e); // External substrate-emitter bias
|
||||
OP_vbs = V(b, s); // External base-substrate bias
|
||||
OP_vsc = V(s, c); // External substrate-collector bias
|
||||
|
|
@ -110,7 +114,7 @@ begin
|
|||
|
||||
OP_gmux = ddx( Iavl, V(e1)); // Early effect on avalanche current limitting
|
||||
OP_gmuy = ddx( Iavl, V(c2)); // Conductance of avalanche current
|
||||
OP_gmuz = - ddx(- Iavl, V(c1)); // Conductance of avalanche current
|
||||
OP_gmuz = ddx( Iavl, V(c1)); // Conductance of avalanche current
|
||||
|
||||
// Conductance extrinsic b-c current :
|
||||
OP_gmuex = ddx(Iex+Ib3, V(e))
|
||||
|
|
@ -124,7 +128,7 @@ begin
|
|||
OP_grcvy = - ddx(Ic1c2, V(c2)); // Conductance of epilayer current
|
||||
OP_grcvz = - ddx(Ic1c2, V(c1)); // Conductance of epilayer current
|
||||
|
||||
OP_rbv = 1.0 / (- ddx(Ib1b2, V(b2)) - ddx(Ib1b2, V(c2))); // Base resistance
|
||||
// OP_rbv = 1.0 / (- ddx(Ib1b2, V(b2)) - ddx(Ib1b2, V(c2))); // Base resistance
|
||||
|
||||
OP_grbvx = - ddx(Ib1b2, V(e)) - ddx(Ib1b2, V(e1)); // Early effect on base resistance
|
||||
OP_grbvy = - ddx(Ib1b2, V(c2)); // Early effect on base resistance
|
||||
|
|
@ -145,6 +149,7 @@ begin
|
|||
`endif
|
||||
|
||||
|
||||
|
||||
// Small signal equivalent circuit capacitances
|
||||
OP_scbe = - ddx(Qte_s, V(e)) - ddx(Qte_s, V(e1)); // Capacitance sidewall b-e junction
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue