* * Generic pentode model: 6V6S_AN * Copyright 2003--2008 by Ayumi Nakabayashi, All rights reserved. * Version 3.10, Generated on Mon Aug 04 10:10:20 2014 * Plate * | Screen Grid * | | Control Grid * | | | Cathode * | | | | .SUBCKT 6V6S_AN A G2 G1 K BGG GG 0 V=V(G1,K)+1 BM1 M1 0 V=(0.057229956*(URAMP(V(G2,K))+1e-10))**-0.93001295 BM2 M2 0 V=(0.61728066*(URAMP(V(GG)+URAMP(V(G2,K))/6.6873953)))**2.430013 BP P 0 V=0.00094976167*(URAMP(V(GG)+URAMP(V(G2,K))/10.833638))**1.5 BIK IK 0 V=U(V(GG))*V(P)+(1-U(V(GG)))*0.00060889421*V(M1)*V(M2) BIG IG 0 V=0.00047488083*URAMP(V(G1,K))**1.5*(URAMP(V(G1,K))/(URAMP(V(A,K))+URAMP(V(G1,K)))*1.2+0.4) BIK2 IK2 0 V=V(IK,IG)*(1-0.4*(EXP(-URAMP(V(A,K))/URAMP(V(G2,K))*15)-EXP(-15))) BIG2T IG2T 0 V=V(IK2)*(0.906840231*(1-URAMP(V(A,K))/(URAMP(V(A,K))+10))**1.5+0.093159769) BIK3 IK3 0 V=V(IK2)*(URAMP(V(A,K))+3125)/(URAMP(V(G2,K))+3125) BIK4 IK4 0 V=V(IK3)-URAMP(V(IK3)-(0.00060937203*(URAMP(V(A,K))+URAMP(URAMP(V(G2,K))-URAMP(V(A,K))))**1.5)) BIP IP 0 V=URAMP(V(IK4,IG2T)-URAMP(V(IK4,IG2T)-(0.00060937203*URAMP(V(A,K))**1.5))) BIAK A K I=V(IP)+1e-10*V(A,K) BIG2 G2 K I=URAMP(V(IK4,IP)) BIGK G1 K I=V(IG) * CAPS CGA G1 A 0.7p CGK G1 K 5.4p C12 G1 G2 3.6p CAK A K 8.5p .ENDS