#Saber model for HUF75332P3, HUF75332G3 & HUF75332S3S
#.subckt huf75332p3  2 1 3     
#*nom temp=25 deg c
#* revised 17feb99  
#
template huf75332p3 n2,n1,n3
electrical n2,n1,n3
{
var i iscl
d..model dbodymod =  (is=1.3e-12, xti=6, cjo=1.7e-9,tt=4.0e-8,m=0.45,vj=0.75)
d..model dbreakmod = ()
d..model dplcapmod =  (cjo=1.8e-9,is=1e-30,m=0.9,vj=1.45)
m..model mmedmod = (type=_n,vto=3.183,kp=2,is=1e-30, tox=1)
m..model mstrongmod = (type=_n,vto=3.66,kp=51.5,is=1e-30, tox=1)
m..model mweakmod = (type=_n,vto=2.703,kp=0.008,is=1e-30, tox=1) 
sw_vcsp..model s1amod =  (ron=1e-5,roff=0.1,von=-8,voff=-3)
sw_vcsp..model s1bmod =  (ron=1e-5,roff=0.1,von=-3,voff=-8)
sw_vcsp..model s2amod =  (ron=1e-5,roff=0.1,von=0,voff=0.5)
sw_vcsp..model s2bmod =  (ron=1e-5,roff=0.1,von=0.5,voff=0)
c.ca n12 n8 = 1.8e-9
c.cb n15 n14 = 1.73e-9
c.cin n6 n8 = 1.19e-9

d.dbody n7 n71 = model=dbodymod
res.rdbody n71 n5 =3.0e-3, tc1=2.7e-3, tc2=7e-7
d.dbreak n72 n11 = model=dbreakmod
res.rdbreak n72 n5 =1.71e-2, tc1=-4e-4, tc2=-1.55e-5
d.dplcap n10 n5 = model=dplcapmod

spe.ebreak n11 n7 n17 n18 = 58.85
spe.eds n14 n8 n5 n8 = 1
spe.egs n13 n8 n6 n8 = 1
spe.esg n6 n10 n6 n8 = 1
spe.evthres n6 n21 n19 n8 = 1
spe.evtemp n20 n6 n18 n22 = 1

i.it n8 n17 = 1
l.lgate n1 n9 = 1e-9
l.ldrain n2 n5 = 1e-9
l.lsource n3 n7 = 1e-9
k.k1 i(l.lgate) i(l.lsource) = l(l.lgate), l(l.lsource), 0.0085

res.rlgate n1 n9 = 10
res.rldrain n2 n5 = 10
res.rlsource n3 n7 = 10

m.mmed n16 n6 n8 n8 = model=mmedmod, l=1u, w=1u
m.mstrong n16 n6 n8 n8 = model=mstrongmod, l=1u, w=1u 
m.mweak n16 n21 n8 n8 = model=mweakmod, l=1u, w=1u
    
res.rbreak n17 n18  = 1, tc1=1.05e-3,tc2=4.5e-7
res.rdrain n50 n16  = 4.5e-3, tc1=1.16e-2,tc2=1.7e-5
res.rslc1 n5 n51  = 1e-6, tc1=3.96e-3,tc2=2.7e-6
res.rslc2 n5 n50 = 1e3
res.rgate n9 n20 = 1.3
res.rsource n8 n7  = 5.95e-3, tc1=1e-3,tc2=1e-5
res.rvthres n22 n8  = 1, tc1=-2.8e-3,tc2=-1.0e-5
res.rvtemp n18 n19  = 1, tc1=-2.75e-3,tc2=0.5e-6

sw_vcsp.s1a n6 n12 n13 n8 = model=s1amod
sw_vcsp.s1b n13 n12 n13 n8 = model=s1bmod
sw_vcsp.s2a n6 n15 n14 n13 = model=s2amod
sw_vcsp.s2b n13 n15 n14 n13 = model=s2bmod

v.vbat n22 n19 = dc=1
equations {
i (n51->n50) +=iscl
iscl: v(n51,n50) = ((v(n5,n51)/(1e-9+abs(v(n5,n51))))*((abs(v(n5,n51)*1e6/180))** 4.6))
}
}
#
#*thermal model subcircuit
#*11feb99
#.subckt huf75332p3_thermal th tl
#
template thermal_model th tl
thermal_c th, tl
{
ctherm.ctherm1 th c2 =4.00e-3	   
ctherm.ctherm2 c2 c3 =7.00e-3
ctherm.ctherm3 c3 c4 =7.50e-3
ctherm.ctherm4 c4 c5 =8.00e-3
ctherm.ctherm5 c5 c6 =1.85e-2
ctherm.ctherm6 c6 tl =12.55

rtherm.rtherm1 th c2 =7.09e-3
rtherm.rtherm2 c2 c3 =1.77e-2
rtherm.rtherm3 c3 c4 =4.97e-2
rtherm.rtherm4 c4 c5 =2.79e-1
rtherm.rtherm5 c5 c6 =4.21e-1
rtherm.rtherm6 c6 tl =5.58e-2
}