*****************************Svetlana SV572-3 Low Mu Audio Tube Spice Model "Dream" Version 1.0 (Pspice sintax)**************************************            
*************************created by Leonardo Di Carlo on 21th March 2008************************                             
*$
.SUBCKT SV572-3 1 2 3                                                                                                        
*              A G F                                                                                                        
+PARAMS: CFG=7P  CGP=8P CFP=3P  D1=3.4 K1=1.02 Voff=0 Isat=700e-3 SF=0.7
*
E1 100 0 Value={IF(V(2,3)<-280,-280,IF(V(2,3)>=-280&V(2,3)<80,V(2,3),80))};
E2 200 0 Value={IF(V(2,3)<-160,-160,IF(V(2,3)>=-160&V(2,3)<80,V(2,3),80))};
*
GH 13 0 POLY(1) (200,0) 8.030133367270649 0.075152544063703 7.596647483913951e-005 -6.213860038831039e-007
VH 14 13 0
RH 14 0 1P
*
GH2 9 0 Value={IF(V(2,3)>0,-(I(VH)**1.15)+((I(VH)**1.15)+I(VH))*(1-EXP(2*(-V(1,3)/(V(2,3)+20)))),I(VH))}
VH2 10 9 0
RH2 10 0 1P 
*
GG 11 0 POLY(1) (100,0) 1.531508753165868e-004 1.738547202224439e-007 -3.259113456835586e-010 -1.417322354012128e-012
VG 12 11 0
RG 12 0 1P
*
GMU 15 0 POLY(1) (100,0) 3.816634008260211 0.003207875342411 1.045424134288312e-005 1.170362802347800e-008
VMU 16 15 0
RMU 16 0 1P
*
GSpacefrac 17 0 Value={(I(VG)*(PWR(V(2,3)+I(VH2)+V(1,3)/I(VMU),1.5)+PWRS(V(2,3)+I(VH2)+V(1,3)/I(VMU),1.5))/2)/Isat} 
VSpacefrac 18 17 0 
RSpacefrac 18 0 1P
*
Gspace 31 0 Value={IF(I(VSpacefrac)<SF,I(VSpacefrac)*Isat,(SF+((I(VSpacefrac)-SF)*(1-SF))/(1-2*SF+I(VSpacefrac)))*Isat)}
Vspace 32 31 0
Rspace 32 0 1P
*
Ggrid1 20 0 Value={IF(V(2,3)>=Voff,I(VSpace)/(1+D1*(V(1,3)/(V(2,3)+(-Voff)))**K1),0)} 
Vgrid1 21 20 0   
Rgrid1 21 0 1P                                                                    
GPlate1 22 0 Value={I(Vspace)-I(Vgrid1)}                                   
VPlate1 23 22 0                                                          
RPlate1 23 0 1P
*
FPlate 1 3 VPlate1 1 
FGrid 2 3 Vgrid1 1
C1 2 3 {CFG}                                                                          
C2 2 1 {CGP}                                                                          
C3 1 3 {CFP}                                                                          
.ENDS    
*$