**** 45B_DC Composite DHT *****************************************
* Created on 06/02/2024 15:04 using paint_kit.jar 3.1
* by: Jac van de Walle 
* www.dmitrynizh.com/tubeparams_image.htm
* Plate Curves image file: http://www.emissionlabs.com/datasheets/45B-DC.jpg
* Data source link: http://www.emissionlabs.com/datasheets/EML45B.html
*----------------------------------------------------------------------------------
.SUBCKT DHT_45B_DC 1 2 3 4 ; P G K1 K2
+ PARAMS: CCG=3P  CGP=1.4P CCP=1.9P RFIL=10
+ MU=3.906 KG1=2565 KP=59 KVB=3.375 VCT=-2.085 EX=1.414 RGI=2000
* Vp_MAX=550 Ip_MAX=160 Vg_step=10 Vg_start=0 Vg_count=11
* Rp=4000 Vg_ac=55 P_max=22 Vg_qui=-48 Vp_qui=300
* X_MIN=116 Y_MIN=40 X_SIZE=700 Y_SIZE=562 FSZ_X=1531 FSZ_Y=892 XYGrid=false
* showLoadLine=n showIp=y isDHT=y isPP=n isAsymPP=n showDissipLimit=y 
* showIg1=n gridLevel2=n isInputSnapped=n  
* XYProjections=n harmonicPlot=n dissipPlot=n 
*----------------------------------------------------------------------------------
RFIL_LEFT    3  31 {RFIL/4}
RFIL_RIGHT   4  41 {RFIL/4}
RFIL_MIDDLE1 31 34 {RFIL/4}
RFIL_MIDDLE2 34 41 {RFIL/4}
E11 32 0  VALUE={V(1,31)/KP*LOG(1+EXP(KP*(1/MU+V(2,31)/SQRT(KVB+V(1,31)*V(1,31)))))} 
E12 42 0  VALUE={V(1,41)/KP*LOG(1+EXP(KP*(1/MU+V(2,41)/SQRT(KVB+V(1,41)*V(1,41)))))} 
RE11 32 0 1G 
RE12 42 0 1G 
G11 1 31 VALUE={(PWR(V(32),EX)+PWRS(V(32),EX))/(2*KG1)} 
G12 1 41 VALUE={(PWR(V(42),EX)+PWRS(V(42),EX))/(2*KG1)} 
RCP1 1 34 1G 
C1 2 34 {CCG} ; CATHODE-GRID 
C2 2 1 {CGP} ; GRID=PLATE 
C3 1 34 {CCP} ; CATHODE-PLATE 
D3 5 3 DX ; FOR GRID CURRENT 
D4 6 4 DX ; FOR GRID CURRENT 
RG1 2 5 {2*RGI} ; FOR GRID CURRENT 
RG2 2 6 {2*RGI} ; FOR GRID CURRENT 
.MODEL DX D(IS=1N RS=1 CJO=10PF TT=1N) 
.ENDS 
*$