luke/ngspice
1
0
Fork 0
mirror of https://git.code.sf.net/p/ngspice/ngspice synced 2026-08-22 05:47:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

avoid escape sequence %M, show hierarchical name

Browse Source 
* it will cause printf to fail
This commit is contained in:
Guilherme Brondani Torri
2017-09-19 21:00:25 +02:00
committed by rlar
parent fd016412cb
commit 6c6d8cc932
1 changed files with 28 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/spicelib/devices/adms/bsim6/admsva/bsim6.va
+28 -28
View File
@@ -181,7 +181,7 @@
Rend = Rsh * Weffcj / (3.0 * nuEnd * (DMCG + DMCI)); \ Rend = Rsh * Weffcj / (3.0 * nuEnd * (DMCG + DMCI)); \
end \ end \
else begin \ else begin \
`STROBE2("Warning: (instance %M) Specified RGEO = %d not matched (BSIM6RdsEndIso), \ `STROBE2("Warning: (instance BSIM6) Specified RGEO = %d not matched (BSIM6RdsEndIso), \
Rend is set to zero.", rgeo); \ Rend is set to zero.", rgeo); \
Rend = 0.0; \ Rend = 0.0; \
end \ end \
@@ -203,7 +203,7 @@
Rend = Rsh * Weffcj / (3.0 * nuEnd * (DMCG + DMCI)); \ Rend = Rsh * Weffcj / (3.0 * nuEnd * (DMCG + DMCI)); \
end \ end \
else begin \ else begin \
`STROBE2("Warning: (instance %M) Specified RGEO=%d not matched (BSIM6RdsEndIso \ `STROBE2("Warning: (instance BSIM6) Specified RGEO=%d not matched (BSIM6RdsEndIso \
type 2), Rend is set to zero.", rgeo); \ type 2), Rend is set to zero.", rgeo); \
Rend = 0.0; \ Rend = 0.0; \
end \ end \
@@ -229,7 +229,7 @@
Rend = Rsh * Weffcj / (6.0 * nuEnd * DMCG); \ Rend = Rsh * Weffcj / (6.0 * nuEnd * DMCG); \
end \ end \
else begin \ else begin \
`STROBE2("Warning: (instance %M) Specified RGEO = %d not matched (BSIM6RdsEndSha), \ `STROBE2("Warning: (instance BSIM6) Specified RGEO = %d not matched (BSIM6RdsEndSha), \
Rend is set to zero.", rgeo); \ Rend is set to zero.", rgeo); \
Rend = 0.0; \ Rend = 0.0; \
end \ end \
@@ -251,7 +251,7 @@
Rend = Rsh * Weffcj / (6.0 * nuEnd * DMCG); \ Rend = Rsh * Weffcj / (6.0 * nuEnd * DMCG); \
end \ end \
else begin \ else begin \
`STROBE2("Warning: (instance %M) Specified RGEO=%d not matched (BSIM6RdsEndSha \ `STROBE2("Warning: (instance BSIM6) Specified RGEO=%d not matched (BSIM6RdsEndSha \
type 2), Rend is set to zero.", rgeo); \ type 2), Rend is set to zero.", rgeo); \
Rend = 0.0; \ Rend = 0.0; \
end \ end \
@@ -373,7 +373,7 @@
end \ end \
end \ end \
else begin \ else begin \
`STROBE2("Warning: (instance %M) Specified RGEO=%d not matched (BSIM6RdseffGeo \ `STROBE2("Warning: (instance BSIM6) Specified RGEO=%d not matched (BSIM6RdseffGeo \
), Rint is set to zero.", rgeo); \ ), Rint is set to zero.", rgeo); \
Rint = 0.0; \ Rint = 0.0; \
end \ end \
@@ -384,7 +384,7 @@
else \ else \
Rtot = Rint * Rend / (Rint + Rend); \ Rtot = Rint * Rend / (Rint + Rend); \
if (Rtot==0.0) \ if (Rtot==0.0) \
`STROBE("Warning: (instance %M) Zero resistance returned from RdseffGeo"); \ `STROBE("Warning: (instance BSIM6) Zero resistance returned from RdseffGeo"); \
end end
//****************** Effective PS,PD,AS,AD Calculation. Ref: BSIM4 **************************** //****************** Effective PS,PD,AS,AD Calculation. Ref: BSIM4 ****************************
@@ -475,7 +475,7 @@
Ad = ADiso + (nf - 1.0) * ADsha;\ Ad = ADiso + (nf - 1.0) * ADsha;\
end \ end \
else begin \ else begin \
`STROBE2("Warning: (instance %M) Specified GEO=%d not matched (BSIM6RdseffGeo \ `STROBE2("Warning: (instance BSIM6) Specified GEO=%d not matched (BSIM6RdseffGeo \
), PS,PD,AS,AD set to zero.", geo); \ ), PS,PD,AS,AD set to zero.", geo); \
Ps = 0;\ Ps = 0;\
Pd = 0;\ Pd = 0;\
@@ -2015,13 +2015,13 @@ analog begin
Lnew = L_mult + XL; Lnew = L_mult + XL;
if (Lnew <= 0) begin if (Lnew <= 0) begin
$strobe("Fatal: Ldrawn*LMLT+XL = %e for %M is non-positive", Lnew); $strobe("Fatal: Ldrawn*LMLT+XL = %e for BSIM6 is non-positive", Lnew);
$finish(0); $finish(0);
end end
W_by_NF = W_mult/NF ; W_by_NF = W_mult/NF ;
Wnew = W_by_NF +XW; Wnew = W_by_NF +XW;
if (Wnew <= 0) begin if (Wnew <= 0) begin
$strobe("Fatal: W/NF*WMLT+XW = %e for %M is non-positive", Wnew); $strobe("Fatal: W/NF*WMLT+XW = %e for BSIM6 is non-positive", Wnew);
$finish(0); $finish(0);
end end
// Binning // Binning
@@ -2037,41 +2037,41 @@ analog begin
dWIV = WINT + WL * L_WLN + WW * W_WWN + WWL * LW_WLN_WWN; dWIV = WINT + WL * L_WLN + WW * W_WWN + WWL * LW_WLN_WWN;
Leff = Lnew - 2.0*dLIV; Leff = Lnew - 2.0*dLIV;
if (Leff <= 0) begin if (Leff <= 0) begin
$strobe("Fatal: Effective channel length = %e for %M is non-positive", Leff); $strobe("Fatal: Effective channel length = %e for BSIM6 is non-positive", Leff);
$finish(0); $finish(0);
end else if (Leff<=1.0e-9) end else if (Leff<=1.0e-9)
$strobe("Warning: Effective channel length = %e for %M is <= 1.0e-9. Recommended Leff >= 1e-8", Leff); $strobe("Warning: Effective channel length = %e for BSIM6 is <= 1.0e-9. Recommended Leff >= 1e-8", Leff);
Weff = Wnew - 2.0*dWIV; Weff = Wnew - 2.0*dWIV;
if (Weff <= 0) begin if (Weff <= 0) begin
$strobe("Fatal: Effective channel Width = %e for %M is non-positive", Weff); $strobe("Fatal: Effective channel Width = %e for BSIM6 is non-positive", Weff);
$finish(0); $finish(0);
end else if (Weff<=1.0e-9) end else if (Weff<=1.0e-9)
$strobe("Warning: Effective channel width = %e for %M is <= 1.0e-9. Recommended Weff >= 1e-8", Leff); $strobe("Warning: Effective channel width = %e for BSIM6 is <= 1.0e-9. Recommended Weff >= 1e-8", Leff);
//Leff and Weff for CV //Leff and Weff for CV
dLCV = DLC + LLC * L_LLN + LWC * W_LWN + LWLC * LW_LLN_LWN; dLCV = DLC + LLC * L_LLN + LWC * W_LWN + LWLC * LW_LLN_LWN;
dWCV = DWC + WLC * L_WLN + WWC * W_WWN + WWLC * LW_WLN_WWN; dWCV = DWC + WLC * L_WLN + WWC * W_WWN + WWLC * LW_WLN_WWN;
Lact = Lnew - 2.0*dLCV; Lact = Lnew - 2.0*dLCV;
if (Lact <= 0) begin if (Lact <= 0) begin
$strobe("Fatal: Effective channel length for CV = %e for %M is non-positive", Lact); $strobe("Fatal: Effective channel length for CV = %e for BSIM6 is non-positive", Lact);
$finish(0); $finish(0);
end else if (Lact<=1.0e-9) end else if (Lact<=1.0e-9)
$strobe("Warning: Effective channel length for CV = %e for %M is <= 1.0e-9. Recommended Leff >= 1e-8", Leff); $strobe("Warning: Effective channel length for CV = %e for BSIM6 is <= 1.0e-9. Recommended Leff >= 1e-8", Leff);
Wact = Wnew - 2.0*dWCV; Wact = Wnew - 2.0*dWCV;
if (Wact <= 0) begin if (Wact <= 0) begin
$strobe("Fatal: Effective channel width for CV = %e for %M is non-positive", Wact); $strobe("Fatal: Effective channel width for CV = %e for BSIM6 is non-positive", Wact);
$finish(0); $finish(0);
end else if (Wact<=1.0e-9) end else if (Wact<=1.0e-9)
$strobe("Warning: Effective channel width for CV = %e for %M is <= 1.0e-9. Recommended Weff >= 1e-8", Leff); $strobe("Warning: Effective channel width for CV = %e for BSIM6 is <= 1.0e-9. Recommended Weff >= 1e-8", Leff);
//Weffcj for Diode, GIDL etc. //Weffcj for Diode, GIDL etc.
dWJ = DWJ + WLC / pow(Lnew,WLN) + WWC / pow(Wnew,WWN) + WWLC / pow(Lnew,WLN) / pow(Wnew,WWN); dWJ = DWJ + WLC / pow(Lnew,WLN) + WWC / pow(Wnew,WWN) + WWLC / pow(Lnew,WLN) / pow(Wnew,WWN);
Weffcj = Wnew - 2.0*dWJ; Weffcj = Wnew - 2.0*dWJ;
if (Weffcj <= 0) begin if (Weffcj <= 0) begin
$strobe("Fatal: Effective channel width for S/D junctions = %e for %M is non-positive", Weffcj); $strobe("Fatal: Effective channel width for S/D junctions = %e for BSIM6 is non-positive", Weffcj);
$finish(0); $finish(0);
end end
@@ -2088,7 +2088,7 @@ analog begin
L_WLN1 = L_WLN; L_WLN1 = L_WLN;
if (DLBIN != 0) begin if (DLBIN != 0) begin
if(DLBIN<=-Lnew) begin if(DLBIN<=-Lnew) begin
$strobe("Fatal: DLBIN for %M = %e is <= -Ldrawn*LMLT", DLBIN); $strobe("Fatal: DLBIN for BSIM6 = %e is <= -Ldrawn*LMLT", DLBIN);
$finish(0); $finish(0);
end else begin end else begin
L_LLN1 = pow(Lnew+DLBIN, -LLN); L_LLN1 = pow(Lnew+DLBIN, -LLN);
@@ -2100,7 +2100,7 @@ analog begin
W_WWN1 = W_WWN; W_WWN1 = W_WWN;
if (DWBIN != 0) begin if (DWBIN != 0) begin
if(DWBIN<=-Wnew) begin if(DWBIN<=-Wnew) begin
$strobe("Fatal: DWBIN for %M = %e is <= -Wdrawn*WMLT", DWBIN); $strobe("Fatal: DWBIN for BSIM6 = %e is <= -Wdrawn*WMLT", DWBIN);
$finish(0); $finish(0);
end else begin end else begin
W_LWN1 = pow(Wnew+DWBIN, -LWN); W_LWN1 = pow(Wnew+DWBIN, -LWN);
@@ -2115,12 +2115,12 @@ analog begin
Leff1 = Lnew - 2.0*dLB + DLBIN; Leff1 = Lnew - 2.0*dLB + DLBIN;
if (Leff1 <= 0) begin if (Leff1 <= 0) begin
$strobe("Fatal: Effective channel length for binning = %e for %M is non-positive", Leff1); $strobe("Fatal: Effective channel length for binning = %e for BSIM6 is non-positive", Leff1);
$finish(0); $finish(0);
end end
Weff1 = Wnew - 2.0*dWB + DWBIN; Weff1 = Wnew - 2.0*dWB + DWBIN;
if (Weff1 <= 0) begin if (Weff1 <= 0) begin
$strobe("Fatal: Effective channel width for binning = %e for %M is non-positive", Weff1); $strobe("Fatal: Effective channel width for binning = %e for BSIM6 is non-positive", Weff1);
$finish(0); $finish(0);
end end
@@ -2674,7 +2674,7 @@ analog begin
else begin else begin
Grgeltd = 1.0e3; /* mho */ Grgeltd = 1.0e3; /* mho */
if (RGATEMOD != 0) if (RGATEMOD != 0)
`STROBE("Warning: (instance %M) The gate conductance reset to 1.0e3 mho."); `STROBE("Warning: (instance BSIM6) The gate conductance reset to 1.0e3 mho.");
end end
`else `else
if(RGATEMOD != 0) if(RGATEMOD != 0)
@@ -2881,7 +2881,7 @@ DevTemp = $temperature + DTEMP;
else else
ASeff=temp_ASeff; ASeff=temp_ASeff;
if(ASeff<0.0) begin if(ASeff<0.0) begin
$strobe("Warning: (instance %M) ASeff = %e is negative, set to zero.", ASeff); $strobe("Warning: (instance BSIM6) ASeff = %e is negative, set to zero.", ASeff);
ASeff=0.0; ASeff=0.0;
end end
@@ -2890,7 +2890,7 @@ DevTemp = $temperature + DTEMP;
else else
ADeff=temp_ADeff; ADeff=temp_ADeff;
if(ADeff<0.0) begin if(ADeff<0.0) begin
$strobe("Warning: (instance %M) ADeff = %e is negative, set to zero.", ADeff); $strobe("Warning: (instance BSIM6) ADeff = %e is negative, set to zero.", ADeff);
ADeff=0.0; ADeff=0.0;
end end
@@ -2903,7 +2903,7 @@ DevTemp = $temperature + DTEMP;
end else begin end else begin
PSeff=temp_PSeff; PSeff=temp_PSeff;
if(PSeff<0.0) begin // final check if(PSeff<0.0) begin // final check
$strobe("Warning: (instance %M) PSeff = %e is negative.Set to 0.0", PSeff); $strobe("Warning: (instance BSIM6) PSeff = %e is negative.Set to 0.0", PSeff);
PSeff=0.0; PSeff=0.0;
end end
end end
@@ -2916,7 +2916,7 @@ DevTemp = $temperature + DTEMP;
end else begin end else begin
PDeff=temp_PDeff; PDeff=temp_PDeff;
if(PDeff<0.0) begin // final check if(PDeff<0.0) begin // final check
$strobe("Warning: (instance %M) PDeff = %e is negative.Set to 0.0", PDeff); $strobe("Warning: (instance BSIM6) PDeff = %e is negative.Set to 0.0", PDeff);
PDeff=0.0; PDeff=0.0;
end end
end end
@@ -3053,7 +3053,7 @@ DevTemp = $temperature + DTEMP;
exp(-20.0 * T1 * T2) ) / Wdrn; exp(-20.0 * T1 * T2) ) / Wdrn;
end end
else else
`STROBE("Warning: (Instance %M) No WPE as none of SCA, SCB, SCC, SC is given and/or SC not positive."); `STROBE("Warning: (Instance BSIM6) No WPE as none of SCA, SCB, SCC, SC is given and/or SC not positive.");
end end
end end