#set the absolute error bound
array set $Base {Abs.Error {Double 1.0}}

array set $Base {BaseDefect {String I2}}

#set the binding with Interstitials
array set $Base {Kforward {Double {[expr 4.0 * [DiffLimit Si I2 0.0]]}}}
array set $Base {Bind {Double {[ConcBind Si 0.0 0.8]}}} 

array set $Base {Cstar {Double {[pdbGetDouble Si I2 Cstar] * [pdbGetDouble Si I2 Cstar] / [pdbGetDouble Si I4 Bind]}}}

#recombination with di-vacancies
array set $Base {RecombDefect {String V2}}
array set $Base {KRecomb {Double {4.0*[DiffLimit Si V2 0.0]}}}

array set $Base {EquationProc {String SmicEqn}}
array set $Base {ComputeNode {String {I2 > 1.0e8 || I4 > 100.0}}}

return {Abs.Error Bind Cstar BaseDefect Kforward RecombDefect KRecomb}
