| 
     
      
      
      From: <mh...@ia...> - 2018-10-19 19:40:21
      
     
   | 
On 2018-10-19 14:15, Dominique Michel wrote:
[..]
> I try to run the same circuit and simulation using an ECC85/6AQ8 valve
> with another Ayumi's model, and it work fine with it:
[..]
> I am a little bit lost here. What can I do to make that oscillator to
> run with that f. EF89 pentode model? It work on the bench with both
> valves.
That model and its default parameters has too many flaws to list here.
It exposed a latent problem in my Koren.lib ( the argument of LOG(x)
should be positive ), and I thank you for bringing that to my attention.
Try the below, it oscillates at ~5 MHz with les than 0.5% of THD.
-marcel
~~~
.TITLE Clapp oscillator
.func limpow(x,y) { (x <= 0) ? 0  : 2*PWR(x,y) }
.func plog(x)   { (x <= 0) ? 1u : log(x) }
******************
.subckt pentode1 1 2 3 4 MU=9.98 EX=0.944 KG1=165.6 KG2=4500 KP=38.07 
KVB=35.4 VCT=0 RGI=1000 CCG=14p CPG1=0.8p CCP=12p $ A G2 G1 C
RE1  7 0  1MEG    $ dummy so node 7 has 2 connections
E1   7 0  value = { v(2,4)/kp*plog(1+exp((1/mu+v(3,4)/v(2,4))*kp)) } $ 
E1 breaks up long equation for g1.
G1   1 4  value = { limpow(v(7),ex)/kg1*atan(v(1,4)/kvb) }
G2   2 4  value = { (exp(ex*(plog((v(2,4)/mu)+v(3,4)))))/kg2 }
RCP  1 4  1G      $ for convergence	A  - C
C1   3 4  {ccg}   $ cathode-grid 1	C  - G1
C2   1 3  {cpg1}  $ grid 1-plate	G1 - A
C3   1 4  {ccp}   $ cathode-plate	A  - C
R1   3 5  {rgi}   $ for grid current	G1 - 5
D3   5 4  DX      $ for grid current	5  - C
.ends pentode1
******************
.SUBCKT EF89  1 2 3 4 		$ A G2 G1 C (Pentode)
* La Radiotechnique AKA 6DA6
X1 1 2 3 4 PENTODE1 MU=30.52 EX=1.350 KG1=926.7 KG2=4500 KP=39.49 
KVB=23.6 VCT=0.00 RGI=2000 CCG=5.5p CPG1=0.0p CCP=5.1p
.ENDS EF89
*****************
* Main circuit
Rbias 6      sortie 2.7k
Cbias 6      sortie 3.3n
X1    1      1      grille 6  EF89
RL2   5      0      8.1
Rconv 0      3      1e12
L2    sortie 5      0.00163
C1    2      sortie 680p
C2    sortie 0      680p
Ro    4      2      4.6
Lo    4      3      100u
Co    0      3      345p
C3    2      grille 100p
Rg    grille 0      1e6
VG1   1      0      DC=158V
.control
	listing e
	TRAN 5n 200u 0 5n UIC
	write clapp.raw
	plot v(sortie)
	rusage all
.endc
.END
~~~
 |