summaryrefslogtreecommitdiffstatshomepage
path: root/nl_examples/congoBongo.c
diff options
context:
space:
mode:
Diffstat (limited to 'nl_examples/congoBongo.c')
-rw-r--r--nl_examples/congoBongo.c51
1 files changed, 39 insertions, 12 deletions
diff --git a/nl_examples/congoBongo.c b/nl_examples/congoBongo.c
index 9584de39b88..1a04c0a2ad3 100644
--- a/nl_examples/congoBongo.c
+++ b/nl_examples/congoBongo.c
@@ -49,9 +49,9 @@ NETLIST_START(dummy)
// .END
SOLVER(Solver, 24000)
- PARAM(Solver.ACCURACY, 1e-8)
+ PARAM(Solver.ACCURACY, 1e-7)
PARAM(Solver.NR_LOOPS, 90)
- PARAM(Solver.SOR_FACTOR, 0.00001)
+ PARAM(Solver.SOR_FACTOR, 0.001)
PARAM(Solver.GS_LOOPS, 1)
//PARAM(Solver.GS_THRESHOLD, 99)
PARAM(Solver.ITERATIVE, "SOR")
@@ -334,7 +334,7 @@ NETLIST_START(CongoBongo_schematics)
NET_C(C61.1, R94.2)
NETLIST_END()
-NETLIST_START(opamp)
+NETLIST_START(opamp_mod)
/* Opamp model from
*
@@ -374,13 +374,18 @@ NETLIST_START(opamp)
NET_C(EBUF.ON, fVREF)
/* The opamp model */
- VCCS(G1)
+ LVCCS(G1)
PARAM(G1.RI, RES_K(1000))
-
+#if 0
PARAM(G1.G, 0.0022)
RES(RP1, 1e6)
CAP(CP1, 0.0318e-6)
-
+#else
+ PARAM(G1.G, 0.0002)
+ PARAM(G1.CURLIM, 0.002)
+ RES(RP1, 9.5e6)
+ CAP(CP1, 0.0033e-6)
+#endif
VCVS(EBUF)
PARAM(EBUF.RO, 50)
PARAM(EBUF.G, 1)
@@ -395,21 +400,43 @@ NETLIST_START(opamp)
DIODE(DP,".model tt D(IS=1e-15 N=1)")
DIODE(DN,".model tt D(IS=1e-15 N=1)")
-
+#if 1
NET_C(DP.K, fUH.Q)
NET_C(fUL.Q, DN.A)
NET_C(DP.A, DN.K, RP1.1)
+#else
+ /*
+ * This doesn't add any performance by decreasing iteration loops.
+ * To the contrary, it significantly decreases iterations
+ */
+ RES(RH1, 0.1)
+ RES(RL1, 0.1)
+ NET_C(DP.K, RH1.1)
+ NET_C(RH1.2, fUH.Q)
+ NET_C(fUL.Q, RL1.1)
+ NET_C(RL1.2, DN.A)
+ NET_C(DP.A, DN.K, RP1.1)
+#endif
NET_C(EBUF.IP, RP1.1)
NETLIST_END()
NETLIST_START(MB3614_DIP)
- SUBMODEL(opamp, op1)
- SUBMODEL(opamp, op2)
- SUBMODEL(opamp, op3)
- SUBMODEL(opamp, op4)
-
+#if 1
+ SUBMODEL(opamp_mod, op1)
+ SUBMODEL(opamp_mod, op2)
+ SUBMODEL(opamp_mod, op3)
+ SUBMODEL(opamp_mod, op4)
+#else
+ /* The opamp actually has an FPF of about 500k. This doesn't work here and causes oscillations.
+ * FPF here therefore about half the Solver clock.
+ */
+ OPAMP(op1, ".model MB3614 OPAMP(TYPE=3 VLH=2.0 VLL=0.2 FPF=5 UGF=11k SLEW=0.6M RI=1000k RO=50 DAB=0.002)")
+ OPAMP(op2, ".model MB3614 OPAMP(TYPE=3 VLH=2.0 VLL=0.2 FPF=5 UGF=11k SLEW=0.6M RI=1000k RO=50 DAB=0.002)")
+ OPAMP(op3, ".model MB3614 OPAMP(TYPE=3 VLH=2.0 VLL=0.2 FPF=5 UGF=11k SLEW=0.6M RI=1000k RO=50 DAB=0.002)")
+ OPAMP(op4, ".model MB3614 OPAMP(TYPE=3 VLH=2.0 VLL=0.2 FPF=5 UGF=11k SLEW=0.6M RI=1000k RO=50 DAB=0.002)")
+#endif
ALIAS( 1, op1.OUT)
ALIAS( 2, op1.MINUS)
ALIAS( 3, op1.PLUS)