#set the interstitial model information
array set $Base {Abs.Error {Double 1.0e7}}

array set $Base {KnI2 {Double {[DiffLimit Silicon I2 1.1]}}}
array set $Base {KfI2 {Double {[DiffLimit Silicon I2 0.0]}}}

array set $Base {KfI {Double {[DiffLimit Silicon Int 0.1]}}}
array set $Base {BindI {Double {[ConcBind Silicon 4.8 2.275]}}}

array set $Base {KfV2 {Double {[DiffLimit Silicon V2 0.0]}}}
array set $Base {KfV {Double {[DiffLimit Silicon Vac 0.0]}}}

#equation procedure
array set $Base {EquationProc {String 311Eqn}}
#array set $Base {ComputeNode {String {1.0}}}

return 
