Model
proc slotboom.ohmic.contact {Contact} {
set vt 0.02558357
set ni 1.1e10
pdbSetBoolean $Contact SBn Flux 1
pdbSetBoolean $Contact SBp Flux 1
pdbSetBoolean $Contact DevPsi Flux 1
pdbSetBoolean $Contact SBn Fixed 1
pdbSetBoolean $Contact SBp Fixed 1
pdbSetBoolean $Contact DevPsi Fixed 1
pdbSetDouble $Contact SBp Flux.Scale 1.619e-19
pdbSetDouble $Contact SBn Flux.Scale 1.619e-19
pdbSetString $Contact DevPsi Equation "ND - NA - $ni*exp((DevPsi)/$vt)*SBn + $ni*exp((-DevPsi)/$vt)*SBp"
pdbSetString $Contact SBn Equation "-$vt*log(SBn)-$Contact"
pdbSetString $Contact SBp Equation "$vt*log(SBp)-$Contact"
pdbSetString $Contact Equation "1.619e-19 * (Flux_SBp - Flux_SBn)"
}